A
antoine
Guest
Re-bonsoir
Je ne comprend pas pourquoi ce code ne marche pas. Si quelqu'un pouvait m'aider a le corriger
Dim CELLULE as range
For each CELLULE in feuil10.columns("a:a")
if CELLULE.value <> "" then
CELLULE.entirerow.insert
end if
next cellule
Voila, c'est tout bete... mais ça marche pas.
Je remercie la bonne ame qui voudra bien me désigner l'erreur qui se cache dans ces 6 malheure lignes !
antoine
Je ne comprend pas pourquoi ce code ne marche pas. Si quelqu'un pouvait m'aider a le corriger
Dim CELLULE as range
For each CELLULE in feuil10.columns("a:a")
if CELLULE.value <> "" then
CELLULE.entirerow.insert
end if
next cellule
Voila, c'est tout bete... mais ça marche pas.
Je remercie la bonne ame qui voudra bien me désigner l'erreur qui se cache dans ces 6 malheure lignes !
antoine