Run time error 1004
Bonjour,
Lorsque je souhaite effectuer une macro qu'un collègue m'a fournis qui permet d'afficher ou masquer des colonnes ou lignes contenant un "X", j'ai à achque fois le message d'erreursuivant, j'ai tenté de chercher la réponse mais je n'ai rien trouvé pouvant m'aider.
Est ce que quelqu'un aurai une idée de comment régler le problème ?
Merci pour votre aide.
Salut BOUCHETAR,
enlève
Sheets(i).Selectet mets le code entre
With Sheets(i)
' Afficher les lignes
.Range("A1:A400").Select
For Each o In Selection
If o.Value ="x" Then
o.EntireRow.Hidden = False
End IF
Next
.
.
.
.
.
End Withsinon
Bonjour,
Merci pour ta réponse,
effectivement, je n'ai plus le message d'erreur mais du coup la macro ne masque plus les colonnes.
il faut surtout pas oublier les points "." avant les Range^^
Sinon un fichier test avec le code complet et on verra aprés
Bonsoir BOUCHETAR, m3ellem1,
je te propose ce fichier Excel :
à l'ouverture du fichier, tu es sur la feuille "PARAM", et tu peux voir des "x" sur la 1ère ligne et en colonne A.
Ctrl e ➯ les lignes et colonnes avec "x" ont été masquées.
fais de nouveau Ctrl e ➯ les lignes et colonnes avec "x" ont été affichées.
Alt F11 pour voir le code VBA, puis revenir sur Excel.
dhany
edit : j'ai modifié mon fichier précédent, qui faisait seulement le masquage des lignes et colonnes avec "x".
le nouveau fichier effectue le même masquage, puis l'affichage des lignes et colonnes avec "x".
dhany
Bonjour BOUCHETAR,
j'ai vu que tu es passé hier sur le forum, mais il semble que tu aies oublié ce sujet !
merci de lire mes 2 post précédents, et de me donner ton avis.
si ton sujet est résolu, merci de cliquer sur à droite de (coin haut droit du post) ➯
ça permet aussi de clôturer le fil de la discussion (toi seul peut le faire, car c'est toi qui a créé ce sujet).
dhany