How to control a button when it has focus

[shubhamgandhi]

I'm trying to disable a button when it is clicked:

Private Sub submitButton_Click()

    Me.submitButton.Enabled = False
    If dataPath = "" Or skuPath = "" Then
        MsgBox "Please enter spreadsheet locations."
    Else

        Call importExcelData(dataPath, "data")
        Call importExcelData(skuPath, "skus")

        If validate = True Then
            Call generateReports
        End If
    End If

End Sub

I'm getting a runtime error: "You can't disable a control while it has the focus". Do you know a way around this?

Thanks!

[June7]

Move focus to another control first (maybe a textbox that is layered behind the button and has no other purpose, textbox TabStop property set to No) then code in that control's GotFocus event has code to disable the button.

[shubhamgandhi]

Hey thanks that worked!