Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
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 Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Neues Workbook ansprechen

Forumthread: 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
Anzeige

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
Anzeige
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)

    Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
    Anzeige
    Anzeige
    Entdecke mehr
    Finde genau, was du suchst

    Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

    Suche nach den besten Antworten
    Unsere beliebtesten Threads

    Entdecke unsere meistgeklickten Beiträge in der Google Suche

    Top 100 Threads jetzt ansehen
    Anzeige