Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1540to1544
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1540to1544
1540to1544
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Neues Workbook ansprechen

Neues Workbook ansprechen
19.02.2017 00:03:43
Barbaraa
Hallo,
Mein Makro im Workbook "Apfel.xlsm" öffnet ein anderes Workbook:
Workbooks.Open (ThisWorkbook.Path & "\Birne.xlsm")
Wie spreche ich dieses nun an? Denn da soll nämlich in die Zelle C2 der Name des aufrufenden workbooks, also der Text "Apfel.xlsm" (ohne Anführungszeichen) geschrieben werden. Danach soll sie minimiert werden.
Die Zeilen
Cells(2, 3) = ThisWorkbook.Name
ActiveWindow.WindowState = xlMinimized
funktionieren nicht, da sie sich nicht auf Birne.xlsm beziehen.
Bitte um Hilfe.
LG, B

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Neues Workbook ansprechen
19.02.2017 00:53:52
littletramp
Hallo Barbara
Hier der Code: 

Public Sub Demo()
Dim wbk As Workbook
Set wbk = Workbooks.Open(ThisWorkbook.Path & "\Birne.xlsm")
wbk.Worksheets(1).Cells(2, 3).Value = ThisWorkbook.Name   ' Blatt anpassen
Application.WindowState = xlMinimized
Set wbk = Nothing
End Sub
Gruss Markus
AW: Neues Workbook ansprechen
19.02.2017 09:31:30
Barbaraa
Danke, Markus. Verstehe.
Warum bezieht sich die Zeile
Application.WindowState = xlMinimized
genau auf das zweite Fenster?
Wie hätte man das erste Fenster minimieren können?
LG. B
AW: Neues Workbook ansprechen
19.02.2017 10:38:54
littletramp
Hallo Barbara
Da Birne.xlsm aktiv ist, wird dieses minimiert.
Um Apfel.xlsm zu minimieren kannst du
  • entweder Apfel.xlsm aktivieren und dann minimieren, ...
    •     ThisWorkbook.Activate   ' Apfel.xlsm
Application.WindowState = xlMinimized

  • ... oder das Fenster direkt über den Index (Zahl oder Mappenname) ansprechen
    •     Application.Windows("Apfel.xlsm").WindowState = xlMinimized
    Gruss Markus
    Anzeige
    AW: Neues Workbook ansprechen
    19.02.2017 19:21:19
    Barbaraa
    Vielen Dank,
    jetzt läuft es wie gewünscht.
    LG, B

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige