Macro/Excel Changer de ligne apres Macro
masterofp
-
Bidouilleu_R Messages postés 1209 Statut Membre -
Bidouilleu_R Messages postés 1209 Statut Membre -
Bonjour,
Quel est la commande dans excel pour changer de ligne après la fin d'une commande.
Exemple:
Le macro inscrit des donné dans les cellules A1-B1 -C1. Lorsque je refais le macro, il insère les même donné dans les cellules A2- B2- C2.
Merci
Phil
Quel est la commande dans excel pour changer de ligne après la fin d'une commande.
Exemple:
Le macro inscrit des donné dans les cellules A1-B1 -C1. Lorsque je refais le macro, il insère les même donné dans les cellules A2- B2- C2.
Merci
Phil
Configuration: Mac OS X Safari 532.5
5 réponses
-
bonjour,
sur ce principe .....
si besoin tu dis.
Sub Ecris_A_coté() 'cette macro écris les valeurs 1 à 5 de A1 à A5 puis de b1àB5....etc For i = 1 To 5 If IsEmpty(Cells(i, 100).End(xlToLeft)) Then Cells(i, 100).End(xlToLeft).Value = i Else Cells(i, 100).End(xlToLeft).Offset(0, 1) = i End If Next End Sub -
c'est dans ce principe la que je veut qu'elle fonctionne, mais comment faire pour quelle écrit par ligne au lieu de colonne?
Si je veut écrire du texte dans une colonne précises, ou dois-je l'écrire? A coté du for?
Merci de ton aide -
ce n'est pas ce qui était demandé...mais bon up up barbe à ........
du fait qu'il n'y a pas beaucoup d'infos, peut-être que je comprends mal
Tu disSub Ecris_en_dessous() For i = 1 To 5 Range("A65535").End(xlUp).Offset(1, 0).Value = i ' ici ta valeur Range("A65535").End(xlUp).Offset(0, 1).Value = "valeur 2 : " & i Range("A65535").End(xlUp).Offset(0, 2).Value = "valeur 3 : " & i Next End Sub -
Ces super. Merci beaucoup
Une derniere question, si je veut a quel ligne il commance a ecrire, je suppose que je change les chiffre apres la A (A65535). Comment sa marche.
Sinon dison que je veut qu il commence a ecrire a la ligne 10.
Merci beaucoup
(Dsl pour l ortographe, je suis sur un clavier anglais a l ecole.) -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Explication
Range("A65535").End(xlUp).Offset(1, 0).Value = i ' ici ta valeur
Range("A65535") représente l'adresse de la cellule Colonne A ligne 65535 ( tout en bas)
.end(xlup) cette méthode recherche la premiere cellule non vide vers le haut depuis l'adresse active.
.offset(1,0) cette méthode décale l'adresse finale de : 1 ligne et 0 en colonne.
la première ligne sera A2 si la feuille est vide.
.value pour lui assigner une valeur ( ici je lui donne la valeur de i