I have two UserForms and two scenarios.
Scenario #1: The UserForm1 has combobox' that's supposed to be filled up beforehand before UserForm2 is shown, the problem occurs whenever I unload UserForm2, all the combobox' resets to their default values, why?
Scenario #2: When I click outside the UserForm1, for example the desktop, then clicks back to UserForm1, the same problems occurs, combobox' resets to their default values, why?
Re: Combobox resetting to default value
Impossible to answer without seeing a copy of the workbook/code.
Re: Combobox resetting to default value
that's the thing, I have not declared anything to reset those combobox'
this is the syntax on the UserForm2
With frmmain.ListView1
For i = 1 To .ListItems.count
If Me.txtfname.Value = .ListItems(i).SubItems(2) And Format(Me.txtfsize.Value, "#,###") & " bytes" = .ListItems(i).SubItems(3) Then
If frmmain.cboClient.Value <> UCase("mcy") Then
.ListItems(i).SubItems(1) = ""
Else
.ListItems(i).SubItems(1) = Me.txtBname.Value
End If
If .ListItems(i).SubItems(2) <> Me.txtfname.Value Then
.ListItems(i).SubItems(2) = Me.txtfname.Value
End If
If .ListItems(i).SubItems(3) <> Me.txtfsize.Value Then
.ListItems(i).SubItems(3) = Format(Me.txtfsize.Value, "#,###") & " bytes"
End If
End If
here: Next i
End With
With frmmain
Uncheck .ListView1, False
.CheckBox1.Caption = "Check All " & .ListView1.ListItems.count
.CheckBox1.Value = False
End With
AppActivate frmmain.Caption
Unload MeRe: Combobox resetting to default value
QuoteWhen I click outside the UserForm1
Maybe there's code in the userform Activate event? I think a copy of the workbook is needed.
Re: Combobox resetting to default value
YES!! that exactly that, I knew something was wrong, I had the code for filling up the boxes in a UserForm_Activate rather than UserForm_Initialize. Thank you!!
Don’t have an account yet? Register yourself now and be a part of our community!