MS Excel

Téma: userform hidden ?

Zaslal/a Richard99 24.3.2016 7:55

Jak mohu zjistit, jestli je formulář skrytý.nebo není aktivován ?

Zaslat odpověď >

Hav-Ran(24.3.2016 8:19)#030895

Vopred ďakujem a ruky bozkávam . . .citovat

Opičák(24.3.2016 9:20)#030896

Gůůůůgl

Private Function FormIsLoaded(UFName As String) As Boolean
Dim UF As Integer
For UF = 0 To VBA.UserForms.Count - 1
FormIsLoaded = UserForms(UF).Name = UFName
If FormIsLoaded Then Exit Function
Next UF
End Function

Sub Test()
MsgBox FormIsLoaded("UserForm1"), 64
End Subcitovat