Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 14:59:21
Zellformel in VBA
23.04.2024 14:47:39
Formel SVERWEIS
23.04.2024 14:27:08
Excel - Zellen verketten anhand anderer Spalte
23.04.2024 14:23:45
Gehe zu Tabellenblatt
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1288to1292
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
1288to1292
1288to1292
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

in Zelle anzeigen ob Datei offen ..

in Zelle anzeigen ob Datei offen ..
04.12.2012 09:44:23
Mike

Guten Morgen,
gerne würde ich in einer Zelle einer Datei anzeigen, ob zwei wichtige verlinkte Dateien offen sind oder nicht.
Wie mach ich dies am Besten? Ueber ein Checkifopen() kann ich schon manuell abklären, ob sie offen sind oder nicht. Doch gerne hätte ich den Status in einer Zelle dargestellt.
Danke für Eure Hilfe,
Gruss
Mike

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: in Zelle anzeigen ob Datei offen ..
04.12.2012 09:47:00
ransi
Hallo
Was ist das "Checkifopen()" ?
ransi

AW: in Zelle anzeigen ob Datei offen ..
04.12.2012 09:54:17
Mike
Hallo Ransi,
bitte entschuldige die Unklarheit, dies war gemeint:
Function isWorkbookOpen(bookName As String) As Boolean Dim vbResult As Boolean Dim wbs As Workbook vbResult = False For Each wbs In Workbooks If UCase(wbs.Name) = UCase(bookName) Then vbResult = True Exit For End If Next wbs isWorkbookOpen = vbResult End 

Function


Sub CheckIfOpen()
If isWorkbookOpen("Arbeitsmappe.xlsx") = False Then
MsgBox "Bitte erst Datei öffnen."
End If
End 


Sub
Gruss
Mike
Anzeige
AW: in Zelle anzeigen ob Datei offen ..
04.12.2012 09:51:47
Klaus
Hi Mike,
gehe "INDIREKT" auf eine Zelle der zu prüfenden Datei. Wenn die Datei geschlossen ist, gibts eine Fehlermeldung das INDIREKT nur auf offene Dateien zugreift. Gibts keinen Fehler ist die Datei offen.
ausführlicher hier.
http://www.excelformeln.de/formeln.html?welcher=384
Grüße,
Klaus M.vdT.

AW: in Zelle anzeigen ob Datei offen ..
04.12.2012 10:04:34
Mike
Hallo Klaus,
danke für den Tipp, das sieht vielversprechend aus. Aktuell harzt es noch, da die zu öffnende Datei nicht am gleichen Ort gespeichert ist.
Gruss
Mike

AW: in Zelle anzeigen ob Datei offen ..
04.12.2012 11:03:25
Klaus
Macht nix, statt
="Die Datei ist"&WENN(ISTFEHLER(INDIREKT("'[termine.xls]Tabelle1'!A"&1));" nicht";"")&" geöffnet."
eben den Pfad direkt angeben:
="Die Datei ist"&WENN(ISTFEHLER(INDIREKT("'C:\Pfad\AuchPfad[termine.xls]Tabelle1'!A"&1));" nicht";"") &" geöffnet."
Grüße,
Klaus M.vdT.

Anzeige
AW: in Zelle anzeigen ob Datei offen ..
04.12.2012 10:18:33
ransi
Hallo Mike
Du hast doch schon die richtige Funktion.
Pack die in ein Modul, dann kannst du sie nutzen wie jede andere Funktion auch:
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Public Function isWorkbookOpen(bookName As String) As Boolean
    Dim vbResult As Boolean
    Dim wbs As Workbook
    vbResult = False
    For Each wbs In Workbooks
        If UCase(wbs.Name) = UCase(bookName) Then
            vbResult = True
            Exit For
        End If
    Next wbs
    isWorkbookOpen = vbResult
End Function


Tabelle1

 AB
1WAHR 
2FALSCH 
3  

Formeln der Tabelle
ZelleFormel
A1=isworkbookOpen("Ladedaten.xlsm")
A2=isworkbookOpen("irgendeindateinameeinergeschlossenendatei.xlsm")


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
ransi

Anzeige
AW: in Zelle anzeigen ob Datei offen ..
04.12.2012 10:44:15
Mike
Super,
nebst der Indirekt-Lösung ist dies dann noch
das Sahnehäubchen oben drauf, besten Dank
Gruss Mike

344 Forumthreads zu ähnlichen Themen

Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
Anzeige
Syntax für benutzerdefiniertes Zellenformat
BF

Hallo Forum,
kennt jemand eine kurze Beschreibung im Internet zur Syntax des benutzerdefinierten Zellenformats (Zellen formatieren - Zahlen - Benutzerdefiniert - Typ)?
Ich möchte jetzt z.B. statt einer Null einen Strich anzeigen...
Eine allgemeine Anleitung wäre klasse, da ich schon...
04.10.2008 16:17:00
Thread-ID: 1014157
3 Beiträge
Kommenare beim Klick in die leere Zelle anzeigen?
Selma

Hallo Leute,
ich möchte in Zellen der Spalte E und Spalte F die Kommmentare als errechnete Werte beim Klick in die Zelle anzeigen, wenn diese Zelle leer sind. Sind die Zelle gefüllt, dann soll der Kommentar nicht angezeigt werden.
Die Voraussetzung ist, dass in Zelle der Spalte D die Za...
11.10.2008 12:17:00
Thread-ID: 1015730
8 Beiträge
Anzeige
Zahl 1 bis 7 nur in Zelle eintragen dürfen
Korl

Hallo,
ich möchte in einem Zellbereich z.B. "B7:BI103" in den jeweiligen Zellen nur die Zahlen von "1 bis"7 eintragen dürfen und sofort den Cursor in der jeweiligen Zeile um eine Zelle nach rechts setzen lassen ohne "Enter" tippen zu müssen.
Den Bereich könnte ich mit Gültigkeitskriteri...
17.11.2008 19:55:00
Thread-ID: 1025380
8 Beiträge
Benutzername Datum Zeit in Zelle
Michael

Hallo zusammen,
ich suche nach einem Makro, das einen Benutzernamen aus Tabelle1 Zelle B2, das aktuelle Datum (JJJJ.MM.TT) und die Zeit der Änderung Zeit (hh:mm:ss) bei Änderungen in einer Zeile der Spalten A bis AT in die Zelle AU2 usw. schreibt.
Die Suche hat mich leider nicht weiterg...
27.12.2008 19:52:00
Thread-ID: 1035469
15 Beiträge
Pfad der letzten Speicherung
Iro

Hallo Excel-Gemeinde,
ist es möglich den Ordner herauszufinden, in dem zuletzt von Excel etwas gespeichert wird?
Hintergrund ist, dass in genau diesem Ordner gespeichert wird, wenn ich mit dem Befehl
Spreadsheet.Export Filename:="Filename.xls", Action:=ssExportActionNone
ein...
07.01.2009 18:00:59
Thread-ID: 1037642
3 Beiträge
Benutzername Datum Zeit in Zelle
Micha

Hallo zusammen,
am 29.12.2008 hat mir Peter Feustel bei einem Problem geholfen. Klappte auch alles wunderbar.
Archiv: https://www.herber.de/forum/archiv/1032to1036/t1035469.htm
(vom Archiv aus kann man Beiträge wohl nicht mehr als "Beitrag offen" setzen?!)
Nun macht das Makro "S...
25.01.2009 19:19:50
Thread-ID: 1043657
9 Beiträge
VBA - Berechnung ohne Formeleintrag
kasi

Hallo liebe Excelprofis,
im Grunde bin ich jemand der lieber allein etwas herausfindet als jemanden um Hilfe zu bitten, aber ich weiß jetzt einfach nicht weiter :-(
Nach 6 Tagen rumforschen in allen möglichen Foren geb ich mich geschlagen und will nun doch hier fragend mein Glück versuc...
18.02.2009 02:59:00
Thread-ID: 1051668
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
2
2
7
10
7
14
2
8
3
5
6
4
4
8
5
10
2
3
11
2
1
2
5
8