Dernière colonne d'un tableau excel sous VBA [Résolu/Fermé]

Signaler
-
ccm81
Messages postés
9190
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
15 janvier 2020
-
Bonjour,

Je cherche à trouver le numéro de la dernière colonne non vide d'un tableau sous VBA. Cependant, l'utilisation de la macro suivante ne me convient pas:

dc = Cells(13, Cells.Columns.Count).End(xlToLeft).Column 



Je cherche à trouver la dernière colonne non vide d'un tableau situé en M13:P17. Or j'ai un tableau situé en M21:P24 qui détient plus de colonnes remplies que le tableau M13:P17. Du coup, la macro ci-dessus me renvoie la derniere colonne non vide du fichier excel et non du tableau en question.

Merci d'avance pour votre aide.

5 réponses

Messages postés
9190
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
15 janvier 2020
1684
Bonjour

Essaies
dc = Cells(13, Columns.Count).End(xlToLeft).Column

Cdlmnt
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 80246 internautes nous ont dit merci ce mois-ci

J'ai essayé ta solution, malheureusement ca me donne le même résultat qu'avec ma première macro
Messages postés
9190
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
15 janvier 2020
1684
Essaies ceci
Dim cofin As Long, li As Long, comax As Long
comax = Cells(13, Columns.Count).End(xlToLeft).Column
For li = 13 To 17
cofin = Cells(li, Columns.Count).End(xlToLeft).Column
If cofin > comax Then comax = cofin
Next li
MsgBox comax

Cdlmnt
Ca marche merci de ton aide !
Messages postés
9190
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
15 janvier 2020
1684
De rien,

Si c'est fini, peux tu mettre le sujet à résolu (en dessous du titre de ton premier message)


Cdlmnt