Macro buiten userform

[masala09]

Oke ik zal dat onthouden. Thanks :thumb:

Bij deze


Einde topic

 

[masala09]

Toch nog even snel terug wat ook te maken heeft met het onderwerp.

Sheets("Hoofdmenu").Shapes(7).TextFrame.Characters.Text = "De Tekst"

Deze moet in een bepaald geval ook worden uitgeschakeld.

Heb het volgende geprobeerd:

Sheets("Hoofdmenu").Shapes(7).enabled=false

en

ActiveSheets("Hoofdmenu").Shapes(7).enabled=false


Deze werkt niet. Wat doe ik hier fout.

 

[edmoor]

Ik heb dat nog niet eerder gebruikt maar volgens mij moet het dan als volgt zijn:
Sheets("Hoofdmenu").Shapes(7).ControlFormat.Enabled = True
Of False uiteraard

 

[snb]

In de bijlage: start de macro in een verkleind VBEditor scherm zodat je de wijzigingen in het werkblad kunt zien.

 

[masala09]

Hoi Edmoor. Helaas die code werkt niet. Mijn maat kwam met een oplossing. Hij gaf aan dat we betreffende knop anders maar gewoon een zelfde macro geven. Instellingen_2. De macro was feitelijk om 1 van de knoppen uit te schakelen daar zij dezelfde code niet hadden. Een betere kijk op de code bleek dat er gewoon een regel bij gezet kon worden. Op deze wijze heeft de knop dezelfde functie als de knop van formulier 7.

We hebben besloten om dit kleinigheidje voor nu toch te laten voor wat het is. Anders verdoen wij onze tijd, blijven we bezig en komen we niet verder.

 

[edmoor]

Ok. Je kunt uiteraard ook bovenin de code kijken welke tekst er op de shape staat en afhankelijk daarvan actie ondernemen.