Créer une macro qui renvoie à une cellule vid

cachou52fr -  
jen_peplu Messages postés 33 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

je voudrais créer une macro dans un tableau Excel,
En cliquant sur un bouton je voudrais qu'il me renvoie à la premiere cellule vide de la colonne G,
et apres avoir écrit dans cette cellule.
En cliquant de nouveau sur le bouton, je voudrais etre renvoyé à la cellule vide suivante de la colonne G afin de remplir mes informations. et ainsi de suite, En sachant que certaines cellules de cette colonne, sont déja remplies

comment faire, je n'y connais rien du tout.
Merci de votre aide

1 réponse

  1.
    jen_peplu Messages postés 33 Date d'inscription   Statut Membre Dernière intervention  
     
    Bonjour cachou52fr

    Je pense que ce code répondra à ton attente.

    Sub SelectCell()

    Dim cel As Range
    Dim ws As Worksheet
    Dim ColG As Range

    Set ws = Sheets("Feuil1")
    Set ColG = ws.Range("G1:G" & Range("G1").End(xlDown).Row)

    Range("G1").Select
    For Each cel In ColG
    If ActiveCell = "" Then GoTo sortie
    If IsEmpty(Range("G2")) Then
    Range("G2").Select
    Exit Sub
    End If
    Range("G1").End(xlDown).Offset(1, 0).Select
    If ActiveCell = "" Then GoTo sortie
    Next cel
    sortie:
    End Sub

    Bonne continuation.
    A+

    jen_peplu
    0