Autres Ligne de macro Dernière colonne non vide

Jacky67 à dit:

Bonjour,
S'il s'agit de trouver la première colonne vide d'une dernière ligne saisie en colonne B, alors ceci peut-être

VB:

Sub Essai2()
    Dim DermierColonne&, Derniereligne&
    Worksheets("Import2").Activate
    Derniereligne = Range("B" & Rows.Count).End(xlUp).Row
    DermierColonne = Cells(Derniereligne, Columns.Count).End(xlToLeft).Column + 1
    Cells(Derniereligne, DermierColonne).Select
End Sub

Cliquez pour agrandir...

Re Bonjour Forum

Jacky67

Merci de t’intéresser à mon problème

Excuse moi du retard à répondre : aucune cigarette dans la maison

La macro fonctionne très bien j’ai simplement enlever le

+1 de DermierColonne =xxxxx

Car la cellule sélectionnée était juste à côté de la cellule non vide



Sub Essai2()

Dim DermierColonne&, Derniereligne&

Worksheets("Import2").Activate

Derniereligne = Range("B" & Rows.Count).End(xlUp).Row

‘ DermierColonne = Cells(Derniereligne, Columns.Count).End(xlToLeft).Column +1

DermierColonne = Cells(Derniereligne, Columns.Count).End(xlToLeft).Column Cells(Derniereligne, DermierColonne).Select

End Sub

Vite fait bien fait
Milles merci
Demande : Résolu
Bonne continuation
Cordialement

Jacky 17