merci infiniment effectivement j'avait vu cette opération mais je pensait qu'il pouvais y avoir plus simple
encore merci pour ton aide
En effet il semble que la fonction NBVAL est l'équivalent de "COUNTA" dans des lignes vba.
On aurait alors une ligne du genre
Texbox1.value=WorksheetFunction.Counta(Range("B:B")) -1
Ou au pire si la plage "B:B" provoque une erreur vba :
Texbox1.value=WorksheetFunction.Counta(Range("B2:B9000"))