FUNCTION dont work...

User avatar
sal21
PlatinumLounger
Posts: 4334
Joined: 26 Apr 2010, 17:36

FUNCTION dont work...

Post by sal21 »

Code: Select all


i call with:

Private Sub CANNI1_Click()
    FILL_MESI Me.CMESE1    
End sub

Function FILL_MESI(CBX As ComboBox)

    With Me.CBX<<<< error here
        .Clear
        .AddItem "5-MAGGIO"
        .AddItem "6-GIUGNO"
        .AddItem "7-LUGLIO"
        .AddItem "8-AGOSTO"
        .AddItem "9-SETTEMBRE"
    End With

End Function
CANNI1 and CMESE1 are Combobox

User avatar
StuartR
Administrator
Posts: 12577
Joined: 16 Jan 2010, 15:49
Location: London, Europe

Re: FUNCTION dont work...

Post by StuartR »

Try
With CBX
instead of
With Me.CBX
StuartR


User avatar
sal21
PlatinumLounger
Posts: 4334
Joined: 26 Apr 2010, 17:36

Re: FUNCTION dont work...

Post by sal21 »

StuartR wrote:
29 Sep 2021, 11:13
Try
With CBX
instead of
With Me.CBX
:clapping:
work!