VBA: zewi UserFormen
01.03.2020 14:25:34
Charly
Fragen über Fragen u. Ich komme mal wieder nicht weiter.
- Mappe(1) "HM2030_ori.xlsm" / UF1
- Mappe(2) "HM2030_RO.xlsm" / UF2
Ablauf meines Vorhabens:
Die Mappe(2) wird per Bottun aus Mappe(1) aufgerufen, über einem Button in Mappe(2) öffne Ich die UF(2) per DropDown u. per manuelle Eingabe werden in der li. Seite der UF (TB, CB) gefühlt. Die re. Seite der UF(2) ist ein Fram nur mit TB´s, Besonderheit hierbei ist die erste TB(1).
Um Werte/Daten in die TB´s eintragen zu können muss man erst die TB(1) mit einem doppel Klick aktivieren, im Anschluss sollte die UF(1) erscheinen. Diese hält mehrere CB´s (im Verfahren der Verschachtelung) bereit. Nach der Auswahl sollten die Werte/Daten zurück in die UF(2) übermittelt werden, in die dafür Vorgesehen den TB´s.
Leider läuft es nicht so wie es sein sollte beim Aufrufen der UF(1).
Nach Doppel Klick auf TB_Lieferant sollte folgendes passieren:
- UF(2) Hiden
- Wechsel der Mappe(2) in die Mappe(1) Sheet "Stehlow"
- UF(1) per Application Run Starten
- die Auswahl der CB´s Beginnt,
per Button "OK" werden die Werte/Daten an die UF(1) Weitergeleitet u. den dafür Vorgesehen den TB´s übermittelt
Das passiert, wenn Ich in die TB_Lieferant mit doppel Klick, klicke:
- UF(2) Hiden
- UF(1) wird Start, sieht man aber nicht da noch weiterhin die Mappe2 Aktive ist
- dann manueller Wechsel per Taskleiste in die Mappe1, man kann dann die UF(1) sehen, mit Ihr Arbeiten u. beenden.
- Wenn man nicht über die Taskleiste "Wechselt" bleibt man in der Mappe2 u. die UF(1) lässt sich nicht beenden.
Folgender Code in Mappe2 zum Starten der UF(1) in Mappe1:
Private Sub TB_Lieferant_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
UF1_Eingabe.Hide
Workbooks("HM2030_ori.xlsm").Activate
Application.Run ("HM2030_ori.xlsm!Start")
End Sub
Folgendes Modeul zum Aufrufen der UF(1) in Mappe1:
Sub Start()
meineUF_Neu.Show
End Sub
Gruß Charly