Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
288to292
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
288to292
288to292
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Userform

Userform
06.08.2003 01:23:42
Stefan Glander
Hallo Leute,
nun habe ich folgendes Problem:
Ich öffne eine Datei, nennen wir sie Start. Im Tabellenblatt 1 das sich öffnet befindet sich ein UF das so groß ist wie der Monitor. Mit einem Commandbutton rufe ich nun eine andere Exceldatei auf ( Siehe Code )

Private Sub CommandButton42_Click()
Unload Me
Workbooks.Open "c:\Andi\AbreII03Andi.xls"
Sheets("Rechnung 1").Select
End Sub

wenn ich das Unload me weglasse kann ich nichts sehen, also muss es rein.
Mit einem CommandButton der sich auf der AbreII... Sheets Rechnung 1 befindet gehe ich nun zurück zu meinem Tabellenblatt 1 der Datei Start.
In Tabelle 1 steht folgender Code :

Private Sub Worksheet_Activate()
UserForm2.Show
End Sub

Da die Tabelle aber ja nicht geschlossen war lädt er die UF nicht, ja ich weiss, ich habe sie ja selbst " Unload me " gesetzt.
Wie kann ich das nun so ändern das die UF trotzdem wieder auftaucht
Gruss
Stefan

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Userform
06.08.2003 08:04:53
Gabor
Hallo Stefan,
so ganz verstehe ich dich nicht. Worksheet_Activate reagiert auf das auswählen eines Blattes und nicht auf öffnen oder schliessen.
Probiers mal damit ...
1. 'Muss ins Klassenmodul DieseArbeitsmappe

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Sh.Name = "Tabelle1" Then
UserForm2.Show
End If
End Sub

Wenn deine Datei Start aktiviert wird
2. 'wie oben

Private Sub Workbook_Activate()
Tabelle1.Activate
oder
UserForm2.Show
End Sub

Gruß Gábor

Anzeige
AW: Userform
06.08.2003 08:48:49
Stefan Glander
Hey Gábor,
so haut das dann irgendwie garnicht mehr hin.
Gruss
Stefan

AW: Userform-Sorry, Fehlerteufel
06.08.2003 09:00:34
Gabor
Hi Stefan,
beim 1. Beispiel muss es Private Sub Workbook_SheetActivate(ByVal Sh As Object)
heissen.
Wenn es nicht funzt, dann hab ich wohl dein Thread net ganz verstanden.
Oder Du schickst mir die Beispielmappe....
Gruß Gábor

AW: Userform
06.08.2003 08:53:53
Michael Scheffler
Hi,
Unload Me
lädt die Form aus dem Speicher, das willst Du nicht, Du meinst offensichtlich:
Me.Hide
Und dann musst Du rigendwann wieder
Me.Show
aufrufen.
Gruß
Micha

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige