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
Configuration: Mac OS X
Safari 532.5

5 réponses

  1. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    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
  2. 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
  3. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    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
  4. 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
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    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