Afficher l'adresse derrnière cellule de la ligne Fermé

Question

Bonjour, 

Je suis novice en programmation VBA et je sollicite votre aide pour une petite question:

J'ai un tableau avec énormément de ligne de longueur hétérogène.
Au début de chaque ligne, j'aimerai le numéro de colonne de la dernière cellule cette ligne.

J'ai pensé utiliser la fonction ci-dessous en y intégrant la commande de sélection de la dernière cellule sur la droite. 

ActiveCell.FormulaR1C1 = "=CELL(""colonne"", )"
Selection.End(xlToRight).Select

Mais je ne sais pas comment fusionner ces deux morceaux de code..

D'avance merci.
Configuration: Windows XP / Firefox 16.0

f894009 · Answer

Bonjour,


A voir,

https://www.generation-nt.com/reponses/recherche-derniere-cellule-non-vide-dans-entraide-547481.html

Relth · Answer

Merci beaucoup pour la piste.

J'ai donc essayé, ceci:

Pour trouve la dernière valeur de la ligne 14

Validation matricielle Ctrl + Maj + Enter
=INDEX(14:14;MAX(COLONNE(15:15)*(14:14<>"")))

Cependant ça reste un peu long, car il faut valider cellule par cellule.

eriiic · Answer

Bonjour,

Si ta colonne B est remplie jusqu'en bas et la colonne A libre pour le résultat :
Dim lig As Long
For lig = 2 To Cells(Rows.Count, "B").End(xlUp).Row
    Cells(lig, "A") = Cells(lig, Columns.Count).End(xlToLeft).Column
Next lig
eric

Afficher l'adresse derrnière cellule de la ligne

3 réponses

Discussions similaires