Excelsheet nicht in gleicher Excel-Anwendung öffne

Bild

Betrifft: Excelsheet nicht in gleicher Excel-Anwendung öffne von: Holger Wächter
Geschrieben am: 28.02.2005 10:44:27

Hallo,

ich möchte, wenn ich mein Excelsheet geöffnet habe und danach per Ddoppelklick auf ein weiteres Sheet klicke, mein Excelsheet es nicht zulässt, dass es in der selben Excel-Anwendung geöffnet wird.

Es soll dann entweder automatisch nochmal Excel öffnen und es darin starten, oder wieder schliessen.

Ich bedanke mich im vorraus.

MfG

Holger Wächter

Bild


Betrifft: AW: Excelsheet nicht in gleicher Excel-Anwendung öffne von: Andre
Geschrieben am: 28.02.2005 10:48:44

Hi Holger,

kopiere folgenden Code in "Diese Arbeitsmappe":

Private Sub Workbook_Deactivate()
Dim n As String
If Workbooks.Count > 1 Then
    With ActiveWorkbook
    n = .FullName
    .Close savechanges:=False
    End With
    Dim xlApp As New Excel.Application
    On Error Resume Next
    xlApp.Workbooks.Open Filename:=n
    If Err.Number > 0 Then
        xlApp.Quit
    Else
        xlApp.Application.Visible = True
    End If
    Set xlApp = Nothing
End If
    
End Sub


Gruß Andre


Bild


Betrifft: AW: Excelsheet nicht in gleicher Excel-Anwendung öffne von: Holger Wächter
Geschrieben am: 28.02.2005 10:58:14

Hallo,

spitze, das hat geklappt.

Danke.

MfG

Holger Wächter


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Excelsheet nicht in gleicher Excel-Anwendung öffne"