j'ai fait une petite application qui fonctionne bien en exclusif, cependant
des que je veux partager mon classeur.
et que je veux voir la feuille contacts, j'ai un message d'erreur1004
erreur d'execution
la methode unprotect de la classe worrksheets a echoué
voila ce que j'ai en activate
Private Sub Worksheet_Activate() ' met le bon nom du bouton a l'activation
de la feuille
Sheets("CONTACTS").Unprotect SebOk
'remet les scrollbares
Application.ScreenUpdating = False
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
End With
' autorise le scrollbar sur la plage A5:P jusqu'a la fin
Sheets("CONTACTS").ScrollArea = "A5:P" &
Mid(Range("A5").End(xlDown).Address, 4, 4)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour Gérard,
| la methode unprotect de la classe worrksheets a echoué
Quand tu as un classeur partagé...on ne peut pas modifié facilement le statut "protection" d'une feuille. Le principe est simple... si un des usagers a le pouvoir de modifier le statut de la feuille...ceci que les autres ne peuvent plus intervenir ... et par définition c'est l'inverse de ce qu'est un classeur partagé.
Dans l'aide d'excel, tu trouveras de la lecture sur les classeurs partagés et les restrictions qui leurs sont associées.
Salutations!
"Gerard" a écrit dans le message de news: 43258000$0$27427$ Bonjour
j'ai fait une petite application qui fonctionne bien en exclusif, cependant des que je veux partager mon classeur. et que je veux voir la feuille contacts, j'ai un message d'erreur1004 erreur d'execution la methode unprotect de la classe worrksheets a echoué
voila ce que j'ai en activate
Private Sub Worksheet_Activate() ' met le bon nom du bouton a l'activation de la feuille
Sheets("CONTACTS").Unprotect SebOk 'remet les scrollbares Application.ScreenUpdating = False With ActiveWindow .DisplayHeadings = False .DisplayHorizontalScrollBar = True .DisplayVerticalScrollBar = True
End With ' autorise le scrollbar sur la plage A5:P jusqu'a la fin Sheets("CONTACTS").ScrollArea = "A5:P" & Mid(Range("A5").End(xlDown).Address, 4, 4)
| la methode unprotect de la classe worrksheets a echoué
Quand tu as un classeur partagé...on ne peut pas modifié facilement le statut "protection" d'une feuille. Le principe est simple...
si un des usagers a le pouvoir de modifier le statut de la feuille...ceci que les autres ne peuvent plus intervenir ... et par
définition c'est l'inverse de ce qu'est un classeur partagé.
Dans l'aide d'excel, tu trouveras de la lecture sur les classeurs partagés et les restrictions qui leurs sont associées.
Salutations!
"Gerard" <gege@microsoft.fr> a écrit dans le message de news: 43258000$0$27427$8fcfb975@news.wanadoo.fr...
Bonjour
j'ai fait une petite application qui fonctionne bien en exclusif, cependant
des que je veux partager mon classeur.
et que je veux voir la feuille contacts, j'ai un message d'erreur1004
erreur d'execution
la methode unprotect de la classe worrksheets a echoué
voila ce que j'ai en activate
Private Sub Worksheet_Activate() ' met le bon nom du bouton a l'activation
de la feuille
Sheets("CONTACTS").Unprotect SebOk
'remet les scrollbares
Application.ScreenUpdating = False
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
End With
' autorise le scrollbar sur la plage A5:P jusqu'a la fin
Sheets("CONTACTS").ScrollArea = "A5:P" &
Mid(Range("A5").End(xlDown).Address, 4, 4)
| la methode unprotect de la classe worrksheets a echoué
Quand tu as un classeur partagé...on ne peut pas modifié facilement le statut "protection" d'une feuille. Le principe est simple... si un des usagers a le pouvoir de modifier le statut de la feuille...ceci que les autres ne peuvent plus intervenir ... et par définition c'est l'inverse de ce qu'est un classeur partagé.
Dans l'aide d'excel, tu trouveras de la lecture sur les classeurs partagés et les restrictions qui leurs sont associées.
Salutations!
"Gerard" a écrit dans le message de news: 43258000$0$27427$ Bonjour
j'ai fait une petite application qui fonctionne bien en exclusif, cependant des que je veux partager mon classeur. et que je veux voir la feuille contacts, j'ai un message d'erreur1004 erreur d'execution la methode unprotect de la classe worrksheets a echoué
voila ce que j'ai en activate
Private Sub Worksheet_Activate() ' met le bon nom du bouton a l'activation de la feuille
Sheets("CONTACTS").Unprotect SebOk 'remet les scrollbares Application.ScreenUpdating = False With ActiveWindow .DisplayHeadings = False .DisplayHorizontalScrollBar = True .DisplayVerticalScrollBar = True
End With ' autorise le scrollbar sur la plage A5:P jusqu'a la fin Sheets("CONTACTS").ScrollArea = "A5:P" & Mid(Range("A5").End(xlDown).Address, 4, 4)
