Copier textbox d'un userform sur la première cellule vide

Lilian -  
 Lilian -
Bonjour,

J'ai une petit problème, je souhaiterais copier se que je contient dans mes textbox d'un userform sur la première cellule vide d'une colonne. j'ai donc écrit ce code mais je doit oublier un détaille car lorsque je l'exécute, les textbox sont bien copiés sur la premiere ligne vide, mais le texte remplace également toutes les cellules de la ligne 3 a la ligne que je souhaite.

Je ne sais pas si je suis assez claire dans mes explications mais j'espere que vous saurez m'éclairer. 

Sheets("Erreurs").Range("B3:B" & [B65000].End(xlUp).Row + 1) = UsfErreur.TextBox2

 Sheets("Erreurs").Range("C3:C" & [C65000].End(xlUp).Row + 1) = UsfErreur.TextBox3

 Sheets("Erreurs").Range("D3:D" & [D65000].End(xlUp).Row + 1) = UsfErreur.TextBox4


merci d'avance

1 réponse

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

        With Sheets("Erreurs")
        .Range("B" & Range("B65000").End(xlUp).Row + 1) = UsfErreur.TextBox2
        .Range("C" & Range("C65000").End(xlUp).Row + 1) = UsfErreur.TextBox3
        .Range("D" & Range("D65000").End(xlUp).Row + 1) = UsfErreur.TextBox4
    End With
    0
    1. Lilian
       
      et bien merci nickel, je ne sais pas pourquoi je me suis embêté avec le "B3:B" etc

      une simple petite erreur ^^

      merci pour ta réactivitée
      0

Discussions similaires

le frigo ne marche pas....
Nemo6456 -
Templier Nocturne -

1 réponse
Formaté mais pas de connexion Internet ?
VissErale -
VissErale -

4 réponses
Excel formule : nb.si.ens et critère "différent de vide"
lelion4 -
Mick -

11 réponses
Internat nourriture
shaun37 -
griggo -

4 réponses