XL 2010 Changer de feuille en cours de macro

[philmaure]

bonjour,

J'ai un traitement sur des données de la cellule A1 de la Feuil1
Lorsque c'est termine je supprime la cellule 1 par : ctrl - vers le haut
J'effectue la même opération jusqu'à ce que je n'ai plus de valeur dans la Feuil1
Je souhaiterai ensuite passer sur la feuille 2 pour effectuer le même traitement
Puis mettre fin à la macro lorsque toutes les données sont traités et(feuil1 et feuil2 vides)

Dans le dossier joint j'ai commenté la macro pour indiquer ce que je viens d'écrire. Pouvez vous m'aider à terminer mon code pour que cela fonctionne ?

Merci pour votre aide
Cdlt
Philmaure

 

[pierrejean]

bonjour philmaure

Voila comment je ferais

Sub test1()
Sheets("Feuil1").Select
While ActiveSheet.Range("A1") <> ""
    valeur = ActiveSheet.Range("A1")
    Range("A1").Delete shift:=xlUp
Wend
Sheets("Feuil2").Select
While ActiveSheet.Range("A1") <> ""
    valeur = ActiveSheet.Range("A1")
    Range("A1").Delete shift:=xlUp
Wend
End Sub

 

[philmaure]

Bonjour PierreJean

Super. Un grand merci pour la solution.
Bonne soirée
Cdlt
Philmaure