Erreur 424

Résolu
Linebaker Messages postés 53 Statut Membre -  
Linebaker Messages postés 53 Statut Membre -
Bonjour,

J'ai l'erreur 424 (objet requis). Pourquoi et comment corriger ?

Private Sub UserForm_Initialize()
Worksheets("Feuil1").Activate
ComboBox1.List = Application.WorksheetFunction.Transpose("c2:p2").End(xlToLeft).Value
End Sub

Merci

2 réponses

  1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    sans doute que .Transpose(range("c2:p2")) serait mieux.

    eric
    0
  2. Linebaker Messages postés 53 Statut Membre 1
     
    Boujour,

    Fonctionne

    Merci beaucoup
    0