Office: Userform unterdrücken - wenn Datei von andere Datei geöffnet wird

Hallo, ich habe einer Excel-Datei X ein Userform vorgeschaltet, d.h. wenn die Datei X geöffnet wird, wird das Userform geöffnet und der Anwender zur Eingabe von paar Daten aufgefordert. Funktioniert prima. Nun zu meinem Problem. Mit einer anderen Datei Y möchte ich diese Datei X über VBA öffnen und Daten auslesen. Dann möchte ich das Userform in Datei X aber nicht öffnen. Y liest die Daten X ein und soll das vorhandene Userform ignorieren. Hat jemand eine Idee, wie ich dies hinbekomme? Grüße Tino

 

Moin

Lese die Daten nicht mit VBA sondern mit PQ aus.

 

Hi,

schreibe folgendes Makro in ein Standardmodul der DateiX:

Code:

Sub UFAus()
    UserForm1.Hide
    ThisWorkbook.Activate
End Sub

Und zum Starten der DateiX ohne UserForm folgenden Code in die DateiY:

Code:

Sub DateiX_ohne_UF()
    Workbooks.Open "E:\Z_Test\DateiX.xlsm"  '<== Pfad anpassen!!
    Application.Run ("DateiX.xlsm!UFAus")
End Sub

Außerdem musst du die Eigenschaft ShowModal des UserForms auf False setzen, oder dein Code im Workbook_Open-Ereignis der DateiX zum Starten des UserForms muss so aussehen:

Code:

Private Sub Workbook_Open()
    UserForm1.Show vbModeless
End Sub

---

 

Danke!