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

Raynaud.JF · 13 Janvier 2022

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 · 13 Janvier 2022

Bonjour Raynaud.JF
Tester cette fonction personnalisée

VB:

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

pierrejean · 13 Janvier 2022

Bonjour Raynaud.JF
Tester cette fonction personnalisée

VB:

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 · 13 Janvier 2022

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.

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

Raynaud.JF

XLDnaute Nouveau

pierrejean

pierrejean

XLDnaute Barbatruc

Raynaud.JF

XLDnaute Nouveau

Discussions similaires