j'ai un tableau avec des donn=E9es en :
Approximativement
A3:A1000
b3:b1000
C3:C500
Je souhaite cr=E9er une macro qui inscrive dans la derni=E8re
cellule non vide de la colonne C le mot "nopaye" puis le=20
recopie jusqu'=E0 la derni=E8re cellule correspondant =E0 la=20
colonne A ici donc C1000
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Himselff
Dans ta macro tu peux y aller simplement avec une petite boucle for-next
For x = 501 to 1000 cells(x,3) = "noPaye" next
La macro va prendre toute les cellules de 501 à 1000 et marquer "noPaye"
BonneChance
Fred "Vincent" wrote in message news:688d01c42ec2$0ff42c50$ Bonjour,
j'ai un tableau avec des données en : Approximativement A3:A1000 b3:b1000 C3:C500
Je souhaite créer une macro qui inscrive dans la dernière cellule non vide de la colonne C le mot "nopaye" puis le recopie jusqu'à la dernière cellule correspondant à la colonne A ici donc C1000
Merci beaucoup à tous Vincent
Dans ta macro tu peux y aller simplement avec une petite boucle for-next
For x = 501 to 1000
cells(x,3) = "noPaye"
next
La macro va prendre toute les cellules de 501 à 1000 et marquer "noPaye"
BonneChance
Fred
"Vincent" <Alouette@babar.fr> wrote in message
news:688d01c42ec2$0ff42c50$a401280a@phx.gbl...
Bonjour,
j'ai un tableau avec des données en :
Approximativement
A3:A1000
b3:b1000
C3:C500
Je souhaite créer une macro qui inscrive dans la dernière
cellule non vide de la colonne C le mot "nopaye" puis le
recopie jusqu'à la dernière cellule correspondant à la
colonne A ici donc C1000
Dans ta macro tu peux y aller simplement avec une petite boucle for-next
For x = 501 to 1000 cells(x,3) = "noPaye" next
La macro va prendre toute les cellules de 501 à 1000 et marquer "noPaye"
BonneChance
Fred "Vincent" wrote in message news:688d01c42ec2$0ff42c50$ Bonjour,
j'ai un tableau avec des données en : Approximativement A3:A1000 b3:b1000 C3:C500
Je souhaite créer une macro qui inscrive dans la dernière cellule non vide de la colonne C le mot "nopaye" puis le recopie jusqu'à la dernière cellule correspondant à la colonne A ici donc C1000
Merci beaucoup à tous Vincent
Nicolas B.
Salut,
Essaye ainsi : Sub Toto() Range([C65536].End(xlUp)(2), [A65536].End(xlUp).Offset(0, 2)) = "nopaye" End Sub
Ou s'il n'y a pas de trous dans tes colonnes : Sub Toto() Range([C1].End(xlDown)(2), [A1].End(xlDown).Offset(0, 2)) = "nopaye" End Sub
A+ -- Nicolas B.
Bonjour,
j'ai un tableau avec des données en : Approximativement A3:A1000 b3:b1000 C3:C500
Je souhaite créer une macro qui inscrive dans la dernière cellule non vide de la colonne C le mot "nopaye" puis le recopie jusqu'à la dernière cellule correspondant à la colonne A ici donc C1000
Merci beaucoup à tous Vincent
Salut,
Essaye ainsi :
Sub Toto()
Range([C65536].End(xlUp)(2), [A65536].End(xlUp).Offset(0, 2)) = "nopaye"
End Sub
Ou s'il n'y a pas de trous dans tes colonnes :
Sub Toto()
Range([C1].End(xlDown)(2), [A1].End(xlDown).Offset(0, 2)) = "nopaye"
End Sub
A+
--
Nicolas B.
Bonjour,
j'ai un tableau avec des données en :
Approximativement
A3:A1000
b3:b1000
C3:C500
Je souhaite créer une macro qui inscrive dans la dernière
cellule non vide de la colonne C le mot "nopaye" puis le
recopie jusqu'à la dernière cellule correspondant à la
colonne A ici donc C1000
Essaye ainsi : Sub Toto() Range([C65536].End(xlUp)(2), [A65536].End(xlUp).Offset(0, 2)) = "nopaye" End Sub
Ou s'il n'y a pas de trous dans tes colonnes : Sub Toto() Range([C1].End(xlDown)(2), [A1].End(xlDown).Offset(0, 2)) = "nopaye" End Sub
A+ -- Nicolas B.
Bonjour,
j'ai un tableau avec des données en : Approximativement A3:A1000 b3:b1000 C3:C500
Je souhaite créer une macro qui inscrive dans la dernière cellule non vide de la colonne C le mot "nopaye" puis le recopie jusqu'à la dernière cellule correspondant à la colonne A ici donc C1000
