Fout 1004 tijdens uitvoering bij Excel VBA

Status
Niet open voor verdere reacties.
T

Thijs Zuidland

Nieuwe gebruiker
Lid geworden
9 okt 2009
Berichten
3
ik heb een probleem met opstarten van mijn excelblad.
Tot voor kort liep alles goed. Echter nu krijg ik bij openen van het excelblad de mededeling:

Fout 1004 tijdens uitvoering.
Eigenschap Visble van klasse Worksheet kan niet ingesteld worden.

Ik heb de code erin staan op het blad "gegevens" niet zichtbaar te maken voor gebruikers.
Met een knop "gegevens" op het excelwerkblad kan ik dit blad weer zichtbaar maken met een wachtwoord.

In VBA-workbook heb ik de navolgende code staan:

Code: 
Private Sub Workbook_Open()

ActiveWorkbook.Sheets("Gegevens").Visible = True


Application.DisplayFormulaBar = False
End Sub


Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayFormulaBar = True
End Sub
-------------------------------------------------------------------------------
De volgende code staat op blad 1 (kalender) in VBA

Code: 
Private Sub CommandButton2_Click()



If InputBox("Geef het wachtwoord", "Wachtwoord") = "infodesk" Then

Sheets("Gegevens").Visible = True

Else

Exit Sub

End If



End Sub
Dit werkte goed met het bovenstaande en sinds enkele dagen krijg ik
de fout 1004 op het scherm
wie weet een oplossing voor dit probleem?
 
Laatst bewerkt:
Zou je de code willen opmaken met de CODE knop? Dat maakt de code een stuk beter leesbaar. En al die lege regels voegen ook weinig toe aan de leesbaarheid :)
 
Krijg je die foutmelding na een druk op die knop of bij het openen van het document? Of wellicht bij beide?

Tip:
Inspringpunten op de juiste posities verhogen de leesbaarheid wel aanzienlijk.
 
Heb je misschien ook de werkmap beveiligd? en niet alleen het werkblad
 
Als je het blad Gegevens verborgen wil houden voor gebruikers, waarom maak je het dan al zichtbaar bij het openen v/h bestand ?
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan