Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1660to1664
1660to1664
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Meldung "Dokument wird verwendet"

Forumthread: Meldung "Dokument wird verwendet"

Meldung "Dokument wird verwendet"
04.12.2018 15:53:03
Mars
Hallo zusammen,
ich öffne eine xl-Datei mit folgendem Makro 
Sub Datei_oeffnen()
blnOffen = False
For Each wkb In Workbooks
If wkb.Name = "Datei.xlsx" Then
blnOffen = True
Exit For
End If
Next wkb
If blnOffen = False Then Workbooks.Open Filename:="K:\Datei.xlsx"
End Sub

Falls ein Kollege die Datei geöffnet hat, wird diese bei mir schreibgeschützt geöffnet.
Die Meldung "Dokument wird verwendet" wird nicht angezeigt.
Woran liegt das ? Kann ich die Meldung im Code erzwingen ?
Wenn ich die Datei aus dem Explorer mit Doppelklick öffne, erscheint die Meldung.
Danke und Gruß
Mars
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Meldung "Dokument wird verwendet"
04.12.2018 20:01:29
onur 

Sub Datei_oeffnen()
blnOffen = False
For Each wkb In Workbooks
If wkb.Name = "Datei.xlsx" Then
blnOffen = True
Exit For
End If
Next wkb
If blnOffen = False Then
Workbooks.Open Filename:="K:\Datei.xlsx"
If Workbook("Datei.xlsx").ReadOnly Then MsgBox ("Arbeitsmappe " & .Name & " ist  _
schreibgeschützt.")
End if
End Sub

Anzeige
AW: Meldung "Dokument wird verwendet"
05.12.2018 08:26:46
Mars
Hallo onur
das ist eine Messagebox, ich meinte die "Standardmeldung" von MSOffice mit dem Titel "Dokument wird verwendet" mit den Buttons "Schreibgeschützt" ; "Benachrichtigen" ; "Abbrechen"
Kriege leider kein Bild hier eingefügt, sorry
Gruß Mars
AW: einfache Variante
05.12.2018 08:52:49
Fennek
Hallo,
es gibt mindestens drei Varianten, hier die m.M.n. einfachste:
Wenn eine xls?-Datei geöffnet ist, wird eine temporäre Datei angelegt. Mit Pfad ("C:\temp\") und file (meineXLS.xlsx) ginge das so:

if dir(Pfad & "~$" & file)  "" then msgbox "Datei offen"
mfg
Anzeige

Forumthreads zu verwandten Themen

Teilergebnis einer Spalte wird nicht angezeigt
thaake

Hallo,
ich lasse mir die Teilergebnisse verschiedener Spalten anzeigen mit =Teilergebnis(9;V5:V300), was auch überall klappt, aber nur eine Spalte weigert sich. Formatierung ist vollkommen ok, das Anzeigen in einer anderen Zelle mit Verweis auf diese Spalte klappt auch nicht. Summe dagegen...
22.09.2008 11:21:12
Thread-ID: 1011416
2 Beiträge
Anzeige
Inhalt von UF wird nicht angezeigt
UF

Hi Forum,
ich starte meine UF mit dem folgenden Code:
Sub auto_open() Application.WindowState = xlMinimized UF_BitteWarten.Show vbModeless Application.Run "RESETMASK" UF_BitteWarten.Hide UF_Maske.Show End Sub
Wie zu erkennen, wird beim Start ein Reset ausgeführt, der einige Sekun...
26.09.2008 14:29:02
Thread-ID: 1012639
16 Beiträge
Rechtschreibung: Pop-Up wird nicht mehr angezeigt
Norbert

Hallo,
nach dem Auswählen des Menüpunktes "Extras" - "Rechtschreibung", wird das zugehörige Pop-Up zur Auswahl der Korrekturvorschläge nicht mehr angezeigt.
Nach einem Klick auf die Schaltfläche "Rechtschreibung" ebenfalls nicht mehr.
Ich habe die möglichen Optionen zur Einstellung...
11.11.2008 11:22:22
Thread-ID: 1023480
3 Beiträge
langer Text wird nicht mehr angezeigt
u_hoernchen

Ich muss einen langen Text (ca. 1.500 Zeichen) in eine Excel-Zelle schreiben (geht leider nicht anders, also das bitte nicht in Frage stellen). Nun wird beim Ausdruck und bei der Bildschirmanzeige aber die letzte Zeile nicht mehr umgebrochen (Zeilenumbruch ist formatiert), in der Zelle steht ab...
05.01.2009 11:10:25
Thread-ID: 1036916
4 Beiträge
Meldung: "Dokument wird verwendet" erscheint nicht
Beni

Hallo zusammen
Wir haben bei uns eine grössere Excel-Anwendung, die von einigen Mitarbeitern verwendet wird. Gleichzeitig kann nur eine Person daran arbeiten.
Dies ist soweit ok, nur dass nun kurioserweise bei einigen Mitarbeitern beim Öffnen der Liste die Meldung "Dokument wird verwen...
25.03.2009 11:46:50
Thread-ID: 1063690
3 Beiträge
Datei wird nicht gefunden obwohl sie da ist
franc

Die Datei wird gefunden aber wenn es darum geht diese zu öffnen dann bringt er den Fehler das er die nicht gefunden hat ...
Das eigenartige ist, das es am Anfang funktionierte.
Sub skill() Dim varZeile As Variant, strDatei As String If Dir("C:\Dokumente und Einstellungen\Administrator...
30.04.2009 14:54:40
Thread-ID: 1072196
4 Beiträge
Wert wird nicht angezeigt
Markus

Hallo,
habe folgendes Problem:
Ich lasse mir einen Wert per VBA ausrechnen und dann mit Range... im Tabellenblatt anzeigen.
Das Problem ist, dass der Wert nicht angezeigt wird.
Wenn ich denn Programmcode per Einzelschritt debugge, dann wird der Wert komischerweise angezeigt!
...
20.07.2009 11:00:55
Thread-ID: 1089939
6 Beiträge
Geöffnete Datei wird nicht angezeigt...
Ruediger

Hallo zusammen,
ich habe eine Datei - mit einigen Verknüpfungen auf eine andere Datei - versuchen wollen zu öffnen. Ich werde auf gefragt, ob ich aktualisieren will oder nicht. Drücke ich aktualisieren als auch nicht aktualisieren, wird die Datei zwar geöffnet, aber nicht angezeigt.
Wo...
22.07.2009 17:02:42
Thread-ID: 1090605
3 Beiträge
Dokument wird verwendet?
Gordon

Moin moin,
ich habe eine Excel worin sich eine VBA-Makro befindet. Dieses öffnet ein Word-Dokument und holt sich aus einem bestimmten Formularfeld den Wert. Dieser Wert wird dann an eine Textmarke in einem zweiten Word-Dokument gesetzt.
Folgenden Code habe ich dafür: Option Explicit S...
25.08.2009 12:38:39
Thread-ID: 1098385
18 Beiträge
Anzeige
Userform wird nicht bei allen angezeigt
Rudolf

Hallo
Beim öffnen einer grossen Excel-Arbeitsmappe wird u.a. eine Userform auch geöffnet:
folgender Code:
Private Sub Workbook_Open() On Error Resume Next UserForm2.Show (0) End Sub Leider aber wird diese Userform (die die Navigation und weitere Schaltflächen für die Arbeitsmappe e...
26.01.2010 11:58:02
Thread-ID: 1133017
8 Beiträge
Anzeige
Datei wird nicht gefunden
Dirk

Hallo Forumsmitglieder,
ich brauche dringend Hilfe bei folgendem Problem.
Folgender Code bereitet Probleme: Private Sub Workbook_Open() Workbooks.Open "L:\X-Arbeitsordner\LOG\Datenbank Zeitmessung.xls" End Sub Wenn ich mich an unserem Netzwerk in der Firma anmelde, und den oben aufgefü...
01.02.2010 10:31:00
Thread-ID: 1134732
3 Beiträge
Mappenname wird nicht mehr angezeigt
Matthias5

Hallo zusammen,
ich glaube das Thema wurde hier vor kurzer Zeit schon einmal behandelt:
Mein Problem ist, dass im Excel-Fenster der Titel der Mappe nicht mehr angezeigt wird:
Es wird auch keine Quickinfo mehr angezeigt, wenn ich mit der Maus in der Taskleist über das Symbol der Mapp...
11.03.2010 13:43:21
Thread-ID: 1145121
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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