Passer en paramètre une combobox dans un module

Question

Voici mon pb:
Je déclare une function ds un module:

Public Function Extract(ZoneRech As String, Req As String, MyCombo As ComboBox)

With ExcelTable
.Sheets("ReqAffec").Activate
.Range("E1").FormulaR1C1 = ZoneRech
.Range("E2").FormulaR1C1 = Req
end with

Quand je veux appeller ma function extract, je ne sais pas comment passer ma combobox (CmbTyp) en paramètre:

Private Sub Form_Load()

Extract ("EaType", "*",passser en paramètre CmbTyp?????? )

End Sub

TOOCOOL · Answer

Essayes de lui passer frm.Combo.name en parametre
frm = le nom de ta forme ou elle se situe
combo = le nom du composant
name = la propriete

peut etre que ca marche....

A+
TOOCOOL

shervy · Answer

Il suufit de passer "frm.combo". Si tu mets le ".name" tu auras je pense une erreur de type 13 ("Type incompatible").

Bon courage

Passer en paramètre une combobox dans un module

2 réponses

Discussions similaires