Macro reprenant une valeur

hasardeux · 14 Décembre 2009

Bonjour la communauté,

Je fais appel à vous car j'ai un petit souci dans un tableau excel.

Vous trouverez ci-joint un bout de ce tableau à titre d'exemple.

Je voudrais concevoir une macro VB qui me permettrait de contrôler la colonne C (compte), et à chaque fois qu'il trouve un compte commençant par 1, elle remplace la valeur Date par la date juste au dessus.

Exemple:

Date Journal Compte
06/10/2009 VE 70600000
06/10/2009 VE 44573000
05/11/2009 VE 10000002

Le résultat doit être:

Date Journal Compte
06/10/2009 VE 70600000
06/10/2009 VE 44573000
06/10/2009 VE 10000002

-----------------

NB: La longueur du tableau peut contenir plusieurs centaines de lignes.

Merci pour votre aide

youky(BJ) · 14 Décembre 2009

Re : Macro reprenant une valeur

Bonjour hasardeux,
Voici une façon de faire en vba
A+

Code:

For Each c In Range("A2:A" & [A65000].End(3).Row)
If Left(Cells(c.Row, 3), 1) = 1 Then
Cells(c.Row, 1) = Cells(c.Row - 1, 1)
End If
Next

Paritec · 14 Décembre 2009

Re : Macro reprenant une valeur

Bonjour Hasardeux le forum
voilà en retour ton fichier clique sur le bouton traiter et dis moi si c'est ce que tu veux
a+
papou 🙂

EDIT : bonjour Youky oui tu as raison avec left(cells etc c'est mieux que ce que j'avais fait j'ai modifié mon fichier joint merci

Macro reprenant une valeur

hasardeux

Guest

Pièces jointes

youky(BJ)

XLDnaute Barbatruc

Paritec

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Macro reprenant une valeur

hasardeux

Guest

Pièces jointes

youky(BJ)

XLDnaute Barbatruc

Paritec

XLDnaute Barbatruc

Pièces jointes

Discussions similaires

Privacy & Transparency

Privacy & Transparency