UserForm als Object

Forumthread: UserForm als Object

UserForm als Object

25.01.2005 18:50:02

tobias

Hallo
weis jemand warum es hier beim entladen der Form zu einem Fehler kommt (Typen unverträglich)?


Sub ShowForm_Sheet(objForm As Object, sSheet As String)
Dim sActSheet As String
On Error GoTo ERRORHANDLE
sActSheet = ActiveSheet.Name
If sActSheet = "System" Then
Else
objForm.Show
End If
Exit Sub
ERRORHANDLE:
End Sub

mfg tobias

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: UserForm als Object

25.01.2005 19:10:06

Josef
Danke

tobias

AW: UserForm als Object

25.01.2005 19:10:06

Josef

Hallo Tobias!
Das geschiet desshalb, weil nach dem Entladen des UF, das Object
nicht mehr existiert!
Definiere das Object einfach vor dem AufruF.


Sub test()
Dim obj As Object
Set obj = UserForm1
ShowForm_Sheet obj, "Tabelle1"
End Sub

Gruß Sepp
P.S.: Rückmeldung nicht vergessen!

Danke

tobias

Hallo
STRIKE!!
Dankeschön...
mfg tobias
P.S.: Machst du auch noch was anderes ausser hier zu antworten? :-) :-)

Forumthread: UserForm als Object

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread