XL 2010 Macro pour descendre les contenus de deux cellules

stich02

XLDnaute Occasionnel
Bonjour à tous,,

J'utilise depuis longtemps la macro ci-dessous qui me permet de descendre le contenu des cellules A3 et B3 tant que les cellules de la colonne C ne sont pas vide. Toutefois aujourd'hui je voudrais faire de même mais à partir des cellules AX et BX sachant que X peut varier. Autrement dit à partir de la première cellule vide de la colonne A et B (qui est toujours la même).

Est-ce possible?

Sub date_etiree()

Dim LastRw As Long
LastRw = Sheets("VIM WP").Cells(Rows.Count, 3).End(xlUp).Row
Range("b3:b" & LastRw).FillDown
LastRw = Sheets("VIM WP").Cells(Rows.Count, 2).End(xlUp).Row
Range("A3:A" & LastRw).FillDown


Merci d'avance de votre aide.

Bonne soirée
 

stich02

XLDnaute Occasionnel
Bonsoir Staple1600,

Merci de vous être penché sur mon problème.
Votre macro va beaucoup plus vite que celle que j'utilisais.
Toutefois, après plusieurs tests elle semble repredre toujours les informations contenues dans les cellules A3 et B3 et non les informations contenues dans les dernières cellules non vides des colonnes A et B.

Sauf mauvaise manipulation de ma part bien entendu...

Jean-Marie
 

stich02

XLDnaute Occasionnel
Désolé d'insister mais juste une dernière petite question, sur votre fichier si les données contenues par exemple en A10 et B10 sont différentes de celles contenues en A3 et B3 votre macro descend bien les données de A10 et B10?

Jean-Marie
 

stich02

XLDnaute Occasionnel
Vous avez raison j'aurais dû joindre un fichier.
Et j'avoue que je n'avais pas compris votre allusion qui pourtant était très explicite...
Sinon votre macro marche impeccablement et c'est exactement ce qu'il me fallait.
Encore merci pour votre dévouement.

Bonne soirée.
 

Statistiques des forums

Discussions
311 733
Messages
2 082 019
Membres
101 872
dernier inscrit
Colin T