Bonsoir,
Je souhaite écrire quelque chose comme cela, mais cela me renvoi une erreur
4..
Je vous remercie
Didier
Sub Test()
Dim cellule As Range
Plg = Range("A" & ActiveCell.Row & ":Z" & ActiveCell.Row).Value
For Each cellule In Plg
If cellule <> "" Then
cellule.Select
End If
Next
End Sub
Il ne faut pas utiliser en tant que variable le Mot cellule qui doit être une dénomination qu'Excel utilise pour son propre fonctionnement
Absolument pas. Ni le mot 'cellule' ni le mot 'cell' ne sont des mots clés réservés du langage VBA ! (Alors que Cells l'est) Attention de ne pas véhiculer trop d'idées reçues non vérifiées ... elles sont archivées comme les autres et peuvent induire les utilisateurs en erreur pendant des années !..
Il ne faut pas utiliser en tant que variable le Mot cellule qui doit être une dénomination qu'Excel utilise pour son propre fonctionnement
Utilise plustôt une lettre comme "c"
celà donne :
Dim cellule As Range Plg = Range("A" & ActiveCell.Row & ":Z" & ActiveCell.Row).Value For Each c In Plg If c <> "" Then c.Select End If Next
Fais un essai et dis moi !!!!
Il ne faut pas utiliser en tant que variable le Mot cellule qui doit
être une dénomination qu'Excel utilise pour son propre fonctionnement
Absolument pas. Ni le mot 'cellule' ni le mot 'cell' ne sont des mots clés
réservés du langage VBA ! (Alors que Cells l'est)
Attention de ne pas véhiculer trop d'idées reçues non vérifiées ... elles sont
archivées comme les autres et peuvent induire les utilisateurs en erreur pendant
des années !..
Il ne faut pas utiliser en tant que variable le Mot cellule qui doit être une dénomination qu'Excel utilise pour son propre fonctionnement
Absolument pas. Ni le mot 'cellule' ni le mot 'cell' ne sont des mots clés réservés du langage VBA ! (Alors que Cells l'est) Attention de ne pas véhiculer trop d'idées reçues non vérifiées ... elles sont archivées comme les autres et peuvent induire les utilisateurs en erreur pendant des années !..
