VBA : Comment faire pour sélectionner seulment les cellules avec une donnée num

[syl0038]

Bonojour à tous,
Pouvez vous me dire quel code permet de sélectionner les cellules avec des données num?

J'ai utilisé cela :
Dim DernLigne As Long
DernLigne = Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row

et
Dim DernLigne As Long
DernLigne = Range("A65536").End(xlUp).Row

Mais cela me sélectionne des cellules qui n'ont pas de valeurs mais une formule à l'intèrieur.

En vous remerciant.

 

[Victor21]

Re : VBA : Comment faire pour sélectionner seulment les cellules avec une donnée num

Bonjour, syl0038

Peut-être :

Cells.SpecialCells(xlCellTypeConstants, 1).Select