Erreur de .Paste , je n'arrive pas a coller du texte

Question

Bonjour, je voudrais coller des valeurs venu d'un Combobox dans une plage de données que j'ai au préalable sélectionnée !

Cependant j'ai une message d'erreur qui arrive :

La méthode PasteSpecial de la classe Range a échoué.

Voici mon code :

Sub Transfert_du_choix_de_latelier()

Dim Atelier As String

' Je mémorise le choix de l'atelier dans une variable

Atelier = UserFormAPAVE.ComboBoxAtelier.Text

Worksheets("Passerelle ExcelGMAO").Select

Range("A3").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

:=False, Transpose:=False

End Sub

Et en pièce jointe le fichier en question.

Pourriez vous m'aider je vous pris.

Une bonne journée

Cordialement.

Mattsly · Answer

Dans ton code : Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ Renmplace la partie surligne par : PasteSpecial Cdlt...