Visuel Basic

Résolu
humsi Messages postés 22 Statut Membre -  
humsi Messages postés 22 Statut Membre -
Bonsoir,
les deux lignes suivantes permettent d'écrire de haut en bas :
ligne = Sheets("Feuil1").Range("a65536").End(xlUp).Row + 1
Sheets("feuil1").Cells(ligne, 1).Value = nom

quelle ligne peut permettre d'écrire de gauche à droite ?

cordialement,

2 réponses

  1.
    f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    'pour la premiere "colonne" libre de la ligne 1
    P_C_L = Sheets("Feuil1").Cells(1, Columns.Count).End(xlToLeft).Column + 1
    Sheets("feuil1").Cells(1, P_C_L).Value = "nom"

    Bonne suite
    0
  2. humsi Messages postés 22 Statut Membre
     
    impeccable merci
    0