erreur 1004

le62

XLDnaute Nouveau
Bonsoir le forum.

Je débute en vba.

J'ai un fichier contenant deux feuilles.( feuille 1 "compte"; feuille 2 "résultasts)
j'ai du vba sur les deux feuilles

sur la feuille 1 "compte" code:

Private Sub CommandButton2_Click()
Sheets("Résultats").Activate
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$5" Then
Sheets("Résultats").Range("B9").CurrentRegion.Offset(1, 0).Clear
Sheets("Compte").Range("B10").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("Compte").Range("D4:D5"), CopyToRange:=Sheets("Résultats").Range("B8:I8")
End If
End Sub

sur la feuille 2 "résultats" code:
Private Sub CommandButton1_Click()
Sheets("Compte").Activate
End Sub

j'aimerai protéger différentes cellules des deux feuilles;
pour cela outil, protection et validation.

le probléme et que la macro se bloque au niveau de
Sheets("Compte").Range("B10").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("Compte").Range("D4:D5"), CopyToRange:=Sheets("Résultats").Range("B8:I8")

Comment éviter le probléme.
J'ai parcouru le forum et j'ai utilisé des codes mais sans résultat!

Merci de me lire.
 

jeanpierre

Nous a quitté
Repose en paix
Re : erreur 1004

Bonsoir le62,

Pas bien compris, mais si ta feuille protégée, il suffit de la déprotéger en début de macro pour que le code puisse faire son boulot et de la reprotéger juste avant la sortie.

Sans fichier, voila ce que je peux dire.

Bonne soirée.

Jean-Pierre
 

Statistiques des forums

Discussions
312 587
Messages
2 090 008
Membres
104 344
dernier inscrit
nesrine