Runtime error 91 : Besoin d'aide. [Résolu/Fermé]
Signaler
Villette54
Villette54
- Messages postés
- 300
- Date d'inscription
- vendredi 15 mars 2013
- Statut
- Membre
- Dernière intervention
- 31 juillet 2018
Villette54
- Messages postés
- 300
- Date d'inscription
- vendredi 15 mars 2013
- Statut
- Membre
- Dernière intervention
- 31 juillet 2018
A voir également:
- Run time error 91
- Vba error 91 - Meilleures réponses
- Error 91 vba - Meilleures réponses
- Run time error 91 object variable or with block not set ✓ - Forum - VB / VBA
- Run-time error '91': Object variable or With block variable not ✓ - Forum - VB / VBA
- Run time error ✓ - Forum - Windows
- Run time error 339 - Forum - Internet / Réseaux sociaux
- Run time error program c windows system32 atibtmon exe ✓ - Forum - Windows 10
1 réponse
melanie1324
- Messages postés
- 1505
- Date d'inscription
- vendredi 25 mai 2007
- Statut
- Membre
- Dernière intervention
- 31 janvier 2018
Bonjour,
essaie comme ca :
Private Sub Workbook_Open()
dim i as variant
sheets(2).Visible = True 'Cette ligne se met en défaut à l'erreur
sheets(1).Visible = xlVeryHidden
For i = 3 To Sheets.Count
With sheets(i)
.Visible = False
End With
next
For i = 1 To Sheets.Count
With sheets(i)
.Protect Password:="123PA"
End With
next
end sub
essaie comme ca :
Private Sub Workbook_Open()
dim i as variant
sheets(2).Visible = True 'Cette ligne se met en défaut à l'erreur
sheets(1).Visible = xlVeryHidden
For i = 3 To Sheets.Count
With sheets(i)
.Visible = False
End With
next
For i = 1 To Sheets.Count
With sheets(i)
.Protect Password:="123PA"
End With
next
end sub
C'est le dim ws as worksheets qui empêchait la bonne exécution ? Ou le fait que je n'avais pas déclaré ma variable i ?
sauf qu'il fallait dire à quoi était égal ws?
exemple :
ws = sheets(1)
du coup il ne comprenait pas.
Tu n'as pas déclaré la variable i (en soit, la déclaration des variables est facultatif dim i, ws as... mais il vaut mieux le faire).
Ok je comprends mieux,
Merci pour ton aide, et bonne journée.