Autoopen mit Bedingung

Forumthread: Autoopen mit Bedingung
4 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Autoopen mit Bedingung

06.12.2002 11:32:37

Fitz Andy

Hallo zusammen!
Ich versuche schon längere Zeit ein Makro zu erstellen um folgendes Ausführen zu lassen:
Wenn Ich eine bestimmte Arbeitsmappe öffne, soll eine Zweite geschlossene Arbeitsmappe nach einem Zellinhalt (z.B. A1<0)abgefragt werden, ist das ergebnis wahr soll eine Msgbox erscheinen die fragt ob diese Arbeitsmappe geöffnet werden soll.

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Autoopen mit Bedingung

06.12.2002 11:43:40

Ralf Sögel
Re: Autoopen mit Bedingung

06.12.2002 12:11:11

Andy
Re: Autoopen mit Bedingung

06.12.2002 12:27:41

Ralf Sögel
Re: Autoopen mit Bedingung

06.12.2002 12:27:42

Fitz Andy

Re: Autoopen mit Bedingung

06.12.2002 11:43:40

Ralf Sögel

da gibts mehrere Möglichkeite. Am einfachsten, du hast in einer
Zelle deiner mappe einen Bezug auf die geschlossene Mappe, den du dann abfragst. Benutz statt auto_open besser Workbook_open.

Re: Autoopen mit Bedingung

06.12.2002 12:11:11

Andy

Wie müsste diese Abfrage aussehen (Beispiel)

Re: Autoopen mit Bedingung

06.12.2002 12:27:41

Ralf Sögel

Im Blatt1 ;A1 steht die Formel:
='C:\[Mappe1.xls]Tabelle1'!$A$1

dieser Code steht im Modul von "DieseArbeitsmappe":
Option Explicit
Private Sub Workbook_Open()
If Sheets(1).[a1] = True Then
Workbooks.Open "C:\Mappe1.xls"
End If
End Sub