problème dans copie de cellules par VBA...

pnlop

XLDnaute Occasionnel
Bonjour le forum,
Quelqu'un pourrait-il regarder mon fichier et me dire ce qui cloche, car vraiment je ne comprends pas!!!
La combobox1 s'alimente en cliquant su "choix des articles".
Choisir un n° au pif.
Valider avec bouton à droite.
la ligne vient se coller en dessous (dès B18 si 1ère fois)
B14:I14 + combobox se vide.

Jusque là ok...
Mais!!!!
2ème essai:
choix n° au pif dans Combo.
Valider...
Ca vient se coller à la suite! Yes Parfait!!!
OUUI MAIS!!! ça me remplace ma première ligne!!!!!!!
Et ainsi de suite!
Je devient zinzin.....:confused:
 

Pièces jointes

  • Calculation copie.xlsm
    56.8 KB · Affichages: 37

phlaurent55

Nous a quittés en 2020
Repose en paix
Re : problème dans copie de cellules par VBA...

Bonjour pnlope,

avec ceci:
Code:
Private Sub CommandButton1_Click()

 Sheets("Feuil1").Range("B14:I14").Copy Destination:=Sheets("Feuil1").Range("B" & Range("B65535").End(xlUp).Row + 1)
 ComboBox1.Value = ""
 
End Sub
à+
Philippe
 

pierrejean

XLDnaute Barbatruc
Re : problème dans copie de cellules par VBA...

Bonjour pnlop

A tester:

Code:
Private Sub CommandButton1_Click()
 Sheets("Feuil1").Range("B14:I14").Copy Destination:=Sheets("Feuil1").Range("B" & [B65536].End(xlUp).Row + 1)
 ComboBox1.Value = ""
End Sub

Edit : Salut Phillipe (Avais pas rafraichi)
 

pnlop

XLDnaute Occasionnel
Re : problème dans copie de cellules par VBA...

OK merci phlaurent55 et pierrejean!
Bien entendu ça fonctionne comme ça et je suis en train de me demander pourquoi je veux toujours faire compliquer alors qu'on peut faire simple et que ça fonctionne mieux!!!
Bonne journée!
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 909
Membres
101 836
dernier inscrit
karmon