proteger feuille

C

Caillou

XLDnaute Impliqué

• 8 Avril 2011

• #2

Re : proteger feuille

Bonjour,

j'ai donc inserer (ActiveSheet.Unprotect ("****")
ActiveSheet.Protect ("****")

Cliquez pour agrandir...

Je ne vois vois aucun code correspondant à une quelconque protection !

Caillou

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 8 Avril 2011

• #3

Re : proteger feuille

Bonjour,
Pas d'erreur à l'ouverture, sans doute nous donneras tu qq eclaircissements...
Quand on signale une erreur, il est indispensable d'indiquer la ligne incriminée ainsi que le n° de l'erreur associé
A+
kjin

 

Vote positif 0 Vote négatif

M

Mitch

XLDnaute Occasionnel

• 8 Avril 2011

• #4

Bonjour Caillou 😀ans mon fichier joint je n'ai pas de protection a cause du beug
Bonjour Kjin : erreur d'execution 1004 la methode Sort de la classe Range a echoue
dans ThisWorkbook voici la ligne
.Range("A3:G" & .Cells(Rows.Count, 2).End(xlUp).Row).Sort Key1:=.Range("C3"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

 

Vote positif 0 Vote négatif

K

kjin

XLDnaute Barbatruc

• 8 Avril 2011

• #5

Re : Re: proteger feuille

Re,
Comme dit plus haut, pas de bug rencontré, néanmoins, j' ai du mal à comprendre ceci

Code:

.Range("A3:G" & .Cells(Rows.Count, 2).End(xlUp).Row)

Qu'as tu voulu écrire ?
edit : ne serait ce pas

Code:

.Range("A3:G" & .Range("B65000").End(xlUp).Row)

??
A+
kjin

 

Dernière édition: 8 Avril 2011

Vote positif 0 Vote négatif

M

Mitch

XLDnaute Occasionnel

• 8 Avril 2011

• #6

Merci Kjin de m'aider : pour la protection c'est OK je placer mal le code ActiveSheet.Unprotect
je debute donc pour le bout de code je comprend que ce ne soit pas top
Merci

 

Vote positif 0 Vote négatif