Exel unsichtbar - und doch neue Excel öffnen
03.02.2014 15:57:02
Pascal
In einer Excel-Arbeitsmappe hab ich in der Workbook-Open-Sub drin u.a. folgenden Code:
Excel.Application.Visible = False
Ziel: Es soll dem User nur eine Userform angezeigt werden. Excel soll also nicht sichtbar sein.
Das funktioniert soweit perfekt.
Nun aber mein Problem.
Der User hat aber die Möglichkeit, ab der Userform per Doppelklick auf ein Textfeld (mit Hyperlink gefüllt) ein Dokument aus dem
Firmen-Dokumentenmanagementsystem zu öffnen.
Der Code hinter dem besagten Textfeld:
Private Sub Zielsuche_TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
'######## Hyperlink Textbox1 per Doppelklick öffnen / Dokumentation öffnen
On Error GoTo Ende 'bei allfälligem Fehler soll zur Sprungmarke "Ende" gesprungen werden
'######## UserForm - Steuerung / Klassen --> Aktivierung der UserForm
Set objUserForm = New UserFormular_Steuerung
Set objUserForm.form = Me
objUserForm.WinState_ = Minimieren 'UserForm1 wird in Taskleiste minimiert
Link = Zielsuche_TextBox1.Text 'Variable Link wird mit derzeitigem Caption (=Hyperlink) abgefü _
llt
Workbooks(Workbookname_WDB).Activate
ActiveWorkbook.FollowHyperlink Link, NewWindow:=True
Ende: 'Sprungmarke "Ende"
End Sub
Wie könnte ich meinen Code (Hyperlink öffnen per Doppelklick) ergänzen / anpassen, dass im Falle eines Excel-Dokuments das Dokument IMMER in einem separaten
Excel-Fenster geöffnet wird ?
Ich hoffe, meine Frage sei so verständlich.
Ziel soll sein, dass die Arbeitsmappe aus welcher ja die Userform gestartet wird, für den User IMMER unsichtbar bleibt und er aber gleichwohl ab der UserForm andere Excel-Mappen öffnen und bearbeiten kann.
Herzlichen Dank für Eure Tips !