VBA - Zurück zu einem Sub nach dem Öffnen eines Benutzerformulars

Question

Ich habe Probleme mit einem grundlegenden Problem Ich finde nicht die Antwort online ... Ich versuche, nach dem Laden eines Benutzerformulars (Fortschrittsbalken ich erstellt) zu meinem ursprünglichen Sub ohne Verwendung einer Excel-Bibliothek).

Der Code sieht wie folgt aus:

MODUL CODE:

Sub Original_Sub() 

'Some code here 
    Userform1.Show 
'Some code here I can't reach 

End sub 

Userform Code:

Private Sub UserForm_Initialize() 

With UserForm1 

    .StartUpPosition = 0 
    .Left = Application.Left + (0.5 * Application.Width) - (0.5 * .Width) 
    .Top = Application.Top + (0.5 * Application.Height) - (0.35 * .Height) 

End With 
End Sub 

Der erste Teil des Codes ordnungsgemäß ausgeführt wird, aber es stoppt direkt nach dem Ausführen des Benutzerformulars ... Warum würde es nicht so weitergehen wie wenn ich anrufe? Akro? d. h .:

Call MyMacro 
'Rest of the code 

Gibt es eine Möglichkeit, mein Problem zu lösen?

Vielen Dank im Voraus für Ihre Hilfe und hat einen großen Tag

Jean

Answer 1

Sie benötigen modelessly die Form zu zeigen. Entweder legen Sie seine ShowModal Eigenschaft auf False oder Verwendung:

Userform1.Show False