Auteur Topic: Niet goed werkende macro ? (gelezen 2841 keer)

EricV · « **Gepost op:** 26 oktober 2006, 10:24:00 »

Goedemorgen,

In een werkmap heb ik meerdere tabbladen.
In blad 1 heb ik de volgende macro toegevoegd:

Private Sub Worksheet_SelectionChange(ByVal target As Range)
If Sheets(1).Range("B2") = 1 Then
Sheets(2).Visible = True
Else
Sheets(2).Visible = False
End If
End Sub

De bedoeling is dat als ik in blad 1 in cel B2 heb staan 1 dan moet tabblad 2 zichtbaar zijn. Als er iets anders staat in cel B2 dan moet tabblad 2 niet zichtbaar zijn.
Helaas werkt dit niet met bovenstaande macro.
Weet iemand wat er fout is en wat er veranderd moet worden om deze macro wel werkend te laten zijn ?

Bedankt,

Eric

cladon · « **Reactie #1 Gepost op:** 26 oktober 2006, 10:44:36 »

Verander

Private Sub Worksheet_SelectionChange(ByVal target As Range)

In

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

EricV · « **Reactie #2 Gepost op:** 26 oktober 2006, 12:37:03 »

Hallo Cladon,

Bedankt voor je snelle reactie.
Je oplossing werkt perfect !
Zelf had ik een fout gemaakt: de code had ik staan in This Workbook, maar ik heb deze verplaatst naar Blad1 en nu werkt het goed.

Een klein algemeen vraagje nog: hoe kan ik nu aangeven dat het probleem is opgelost zodat andere lezers dit ook kunnen zien ?

Gr.
Eric

Emphyrio · « **Reactie #3 Gepost op:** 26 oktober 2006, 12:40:34 »

Hoi EricV,

Citaat

Een klein algemeen vraagje nog: hoe kan ik nu aangeven dat het probleem is opgelost zodat andere lezers dit ook kunnen zien ?

Onderaan rechts, als je post in je topic, zie je een groen vinkje bij opgelost, klik hierop en het zal in het rood verschijnen. Ten teken dat het topic voor jou is afgesloten

Emphyrio

EricV · « **Reactie #4 Gepost op:** 26 oktober 2006, 13:05:34 »

Sorry,

Ik zie nergens een groen vinkje staan en via de Help ben ik ook niet verder gekomen. Helaas.

Eric

Emphyrio · « **Reactie #5 Gepost op:** 26 oktober 2006, 13:11:23 »

Hoi EricV

Een screenshot zegt soms meer dan 1000 woorden

Er zullern wel functies opstaan die jij (en de meeste leden) niet hebt

maar je krijgt zo een idee waar je moet zoeken. Het kan ook zijn dat dit bij jouw rood is .

Emphyrio

EricV · « **Reactie #6 Gepost op:** 26 oktober 2006, 14:34:24 »

Hallo Emphyrio,

Nu ik jou screenshot gezien heb weet ik wat het probleem is.
De laatste regel die ik op mijn scherm zie is die met aan de rechter kant een invulveld met de tekst Ga naar:

De onderste regel van jouw screenshot is op mijn scherm onzichtbaar, vandaar.

Ik weet niet hoe ik dit eventueel kan aanpassen ?

Gr.
Eric

EricV · « **Reactie #7 Gepost op:** 26 oktober 2006, 14:38:10 »

Hallo Emphyrio,

Inmiddels heb ik ontdekt wat de fout is. Met mijn vorige berichtje ben ik wat voorbarig geweest.
Ik heb F11 gedaan (volledig scherm) en dan is de laatste regel van jouw screenshot wel te zien, echter alleen het icoontje met Opgelost (groen vinkje), maar de overige opties die bij jou te zien zijn verschijnen bij mij niet.

Gr.
Eric

Help!

Menu

Hulp bij posten

Zoeken

Recente topics