Macro/Excel Changer de ligne apres Macro

masterofp -  
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
A voir également:

5 réponses

Réponse 1 / 5
Bidouilleu_R Messages postés 1209 Statut Membre 295
 
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
0
Réponse 2 / 5
masterofp
 
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
0
Réponse 3 / 5
Bidouilleu_R Messages postés 1209 Statut Membre 295
 
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 dis 


Sub 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
0
Réponse 4 / 5
masterofp
 
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.)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 5
Bidouilleu_R Messages postés 1209 Statut Membre 295
 
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
0