XL 2010 Trouver dernière cellule vide sur une ligne

[danone16]

Bonsoir
J'ai sur une ligne des véhicules et je souhaite ajouter un véhicule . Comment puis-je aller à la première colonne de libre de ma ligne (excel VBA) en sachant qu'il y a des cellules fusionnées.
Merci de vos réponses

 

[Franc58]

Bonsoir, au lieu de fusionner des cellules, tu peux utiliser Format de cellule > Alignement > Horizontal > Centré sur plusieurs colonnes. Tu obtiens le même résultat que la fusion mais avec les problèmes potentiels en moins.

 

[danone16]

Bonsoir, au lieu de fusionner des cellules, tu peux utiliser Format de cellule > Alignement > Horizontal > Centré sur plusieurs colonnes. Tu obtiens le même résultat que la fusion mais avec les problèmes potentiels en moins.

Bonsoir, as tu regardé le fichier joint avec les infos sur la ligne suivante. Pourrais-tu m'expliquais une autre façon de gérer ce problème.
Merci

 

[TooFatBoy]

Bonjour,

J'ai sur une ligne des véhicules et je souhaite ajouter un véhicule . Comment puis-je aller à la première colonne de libre de ma ligne (excel VBA) en sachant qu'il y a des cellules fusionnées.

Avec ceci :

Sub PremColVide()
'
Dim MaCellule As Range

    Set MaCellule = Sheets("Véhicules").Cells(3, Columns.Count).End(xlToLeft).Offset(0, 2)
    MaCellule.Select

End Sub

 

[job75]

Bonjour danone16, le forum,

@TooFatBoy utilise plutôt .Offset(0, 1) qui sélectionne la 1ère cellule qui suit une zone fusionnée.

Autre solution avec la méthode Find :

Sub a()
Rows(3).Find("*", , xlValues, , , xlPrevious).Offset(, 1).Select
End Sub

A+

 

[danone16]

Bonjour,


Avec ceci :

Sub PremColVide()
'
Dim MaCellule As Range

    Set MaCellule = Sheets("Véhicules").Cells(3, Columns.Count).End(xlToLeft).Offset(0, 2)
    MaCellule.Select

End Sub

Merci pour la solution
Ok sur le résultat

 

[TooFatBoy]

@TooFatBoy utilise plutôt .Offset(0, 1) qui sélectionne la 1ère cellule qui suit une zone fusionnée.

Merci pour l'information. 👍