Bug compteur de ligne/colonne

Bonjour à tous,

alors voilà j'ai un petit soucis. Je travaille sur une macro et j'ai besoin de récupérer le nombre de ligne et de colonne utilisée dans une feuille.

Pour celà j'utilise le code suivant:

Sub Cpt()

MsgBox "Nb de colonne" & ActiveSheet.UsedRange.Columns.Count

MsgBox "Nb de ligne" & ActiveSheet.UsedRange.Rows.Count

End Sub

Seulement voilà les commandes me renvoient 19 colonnes et 68 lignes quelque soit le nombre de colonne et de ligne effectivement remplis. Pire même en supprimant le contenu de l'ensemble des colonnes je reçois les même valeurs.
J'avoue sécher complétement là.