XL 2010 vba : extraction du n°de la dernière ligne dans un tcd

[Raynaud.JF]

Bonjour, j'aurai besoin de tester si la plage de mon TCD va bien jusqu'a la dernière ligne de ma source.
Pour cela 1) je stock dans une variable la dernière ligne de ma source, 2) je remonte la plage de mon TCD dans une variable texte via .sourcedata
Cela me donne une chaine de caractère ex "Feuil1'!L1C1:L6000C10"
Ma dernière ligne est donc 6000 comment puis-je extraire cette data facilement ? pour que je puisse ensuite la comparer a la dernière ligne de ma source
je pensai décomposer cette chaine de caractère puis la recomposer en ne prenant que la partie "dernière ligne" mais je ne sais pas comment faire
Quelqu'un a une idée qui pourrait m'aider ?
Ou peut-être avez vous une solution plus simple que celle que je propose
Merci par avance de votre support.
Sinceres Salutations

 

[pierrejean]

Bonjour Raynaud.JF
Tester cette fonction personnalisée

Function numligne(terme)
x = Split(terme, ":")
y = InStr(x(UBound(x)), "C")
yy = Mid(x(UBound(x)), 1, y - 1)
numligne = Replace(yy, "L", "")
End Function

 

[Raynaud.JF]

Bonjour, SUPER, merci beaucoup de ton retour rapide.
Cela fonctionne parfaitement. Je ne maitrise pas du tout le Ubound et Lbound, a approfondir pour moi.