VBA, comment "sauter" une ligne

Bonjour forum,

pour le moment j'utilise cette formule:

ActiveCell.Offset(1, 0).Range("A1").Select

qui me permet de descendre d une ligne a chaque fois que ma boucle se termine.

Mon problème est le suivant:

Dans ma colonne A j'ai des nom de voiture à la suite(il n y a pas de cellules vide, pour l instant)

Je voudrais trouver une formule qui puisse me permettre de passer de mon nom de voiture actuelle jusqu'au prochain nom de voiture si il y a des lignes vides qui les séparent.

Une formule qui descendrait jusqu à ce qu il y ait un nom d'écrit en sautant les cellules vides.

Merci de votre aide, si vous voulez plus de détail, n'hésitez pas à demander!

Yann

Bonsoir

Essaye cette macro :

Sub tata()
Dim c as range
For Each c In Range("A1", Range("A65536").End(xlUp))
If IsEmpty(c) Then c.Offset(1, 0).Activate
Next c
End Sub

Avec la colonne A comportant les cellules vides.

A bientôt

Dan