code VBA pour Sélection plage cellules

[Fifi brin d'acier]

Bonjour,

je débute en VBA, et cherche le code qui permet de :

Sachant que les cellules de la colonne A contiennent une formule faisant référence à une autre cellule, et qu'elles affichent le contenu de cette cellule (une date) si une condition est remplie.
Les premières cellules de la colonne A affichent donc une date si la condition est remplie, et les suivantes n'affichent rien si la condition n'est pas remplie. Mais elles contiennent tout de même une formule.


Je cherche le code permettant de sélectionner dans la colonne A la plage de cellules qui affichent une date, donc de la première cellule à la dernière cellule affichant quelque chose (une datte ici en l'occurrence).
Je précise qu'il n'y a pas de blanc entre ces cellules.

Merci de votre aide et de votre indulgence.

Fifi

 

[myDearFriend!]

Bonsoir Fifi brin d'acier (ouarf, toute une époque !),

ActiveSheet.Columns(1).SpecialCells(xlCellTypeFormulas, xlNumbers).Select

Cordialement,

 

[justine]

bonsoir le forum, fifi brin d'acier
je vais t'approcher le sujet en selectionnant les cellules qui comportent une date
soient les cellules A1 a A20

Dim c As Range
For Each c In Range('a1:a20')
If IsDate(c) = True Then c.Interior.ColorIndex = 3
Next

toutes les cellules qui comportent une date seront colorees en rouge, il suffit d'adapter la macro pour ton besoin.
justine

 

[Fifi Brin d'Acier]

Bonsoir,

Merci Didier et Justine pour vos réponses.

Didier, c'est exactement ce que je recherchais !

Bonne soirée à tous.

Fifi