Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
728to732
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
728to732
728to732
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA: per AddIn schließen eines Workbook verhindern

VBA: per AddIn schließen eines Workbook verhindern
Markus
Hallo VBAler,
folgendes Problem: Ich bearbeite per AddIn eine .xls Datei. Ich würde nun gerne sicherstellen, dass das AddIn die Datei schließt, und nicht der Nutzer. (Das AddIn kann beendet werden, um die Datei anzusehen).
Die Arbeitsmappe .xls darf kein VBA enthalten, Workbooks_BeforeClose fällt also weg.
Wie kann ich das Problem lösen?
Oder ich müsste es zur Laufzeit hinzufügen und später wieder löschen? (Weiss aber auch hier nicht wie? Bibliothek müsste per VBA eingebunden werden, da die Nutzer dies nicht einrichten können)
Bin für alle Ideen dankbar
Markus

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: VBA: per AddIn schließen eines Workbook verhindern
13.02.2006 14:57:50
Nepumuk
Hallo Markus,
dazu benötigst du eine Klasse des Application-Objektes im Addin. Darin kannst du das Before_Close - Ereignis abfangen.
Gruß
Nepumuk
AW: VBA: per AddIn schließen eines Workbook verhindern
13.02.2006 15:02:14
Markus
Hallo,
kurze Rückfrage: Und wie krieg ich die Klasse da rein?
Hast du einen kurzen Programm-Auszug?
Markus
AW: VBA: per AddIn schließen eines Workbook verhindern
13.02.2006 15:07:18
Nepumuk
Hallo Markus,
VBA Gut ?
' **********************************************************************
' Modul: DieseArbeitsmappe Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private objApplication As clsApplication

Private Sub Workbook_Open()
    Set objApplication = New clsApplication
    Set objApplication.prpSetApplication = Application
End Sub

' **********************************************************************
' Modul: clsApplication Typ: Klassenmodul
' **********************************************************************

Option Explicit

Private WithEvents mobjApplication As Application

Friend Property Set prpSetApplication(objApplication As Application)
    Set mobjApplication = objApplication
End Property

Private Sub mobjApplication_WorkbookBeforeClose(ByVal Wb As Workbook, Cancel As Boolean)
    MsgBox Wb.Name
End Sub

Gruß
Nepumuk
Anzeige
AW: VBA: per AddIn schließen eines Workbook verhindern
13.02.2006 15:25:30
Markus
Hallo,
ja, gut würde ich schon sagen.
Man muss nicht unbedingt mit Klassenmodulen arbeiten um reichlich programmieren zu können. Und mit selbigen arbeite ich nunmal nicht, weil sich nie der Bedarf ergab (hier meine ich selbst instanzierte Klassen, ausgenommen also die Standardklassen Worksheets, UserForm) -- ok, wenn ich Klassenmodule besser kennen würde, wäre der Bedarf eventuell schonmal erkennbar gewesen.
Desweiteren: VBA - Nein wäre auch nicht passend oder? Sonst müsste ich darum bitten, das Programm doch gleich fertig zu schreiben. Aber das ist nicht nötig.
Ich bau deine Ausschnitte gleich mal ein, um zu testen.
Vielen Dank also für deine Hilfe. Bis mal wieder. Melde mich, wenn ich nochmal Hilfe brauche.
Anzeige
AW: VBA: erledigt, funktioniert
13.02.2006 15:40:13
Markus
Hallo nochmal,
funktioniert bestens. Vielen Dank nochmals.
Markus

162 Forumthreads zu ähnlichen Themen

mit Set Workbookname zuweisen - Syntaxprobleme?
Peter

Guten Tag
Ich versuche den Variablen wbQuelle und wbZiel via Set einen Wert zuzuweisen. Klappt beide Male nicht
1. mit ThisWorkbook.Name
2. über einen Funktionsaufruf, der einen String zurückgibt
Was mache ich falsch?
Danke für eine Antwort.
Gruss, Peter
Public Sub...
03.12.2008 16:23:31
Thread-ID: 1029887
4 Beiträge
Anzeige
VBA: Neues Workbook erstellen
Dieter(Drummer)

Hi Spezialisten,
bei Start von Excel ist KEINE neue Datei da. Ich suche die VA Lösung, dass ich mit Workbook.open, in der Datei PersonL.xlsb (ist ausgeblendet), beim öffnen von Excel eine Datei da ist. Mit Workbook.add geht es nicht, da ja keine Datei, beim Start von Excel, geöffnet ist.
15.10.2015 13:23:28
Thread-ID: 1452482
4 Beiträge
[VBA] Word mit Documents.Add -> Name?
Nils

Hallo liebe Experten,
ich frage mich gerade wie ich den Namen der Word-Datei auslesen kann, wenn ich mit der Methode Documents.Add aus einer Vorlage eine Ableitung bilde? Die Dokumente haben immer die Bezeichnung "Dokument1", "Dokument2", "Dokument3",...
Gibt es eine Möglichkeit den Nam...
11.01.2018 18:38:43
Thread-ID: 1601678
4 Beiträge
Anzeige
Bei "workbooks.add 1" Namen geben
Marc

Hallo Excelfreunde,wie kann ich ein Workbook, was ich mit workbooks.add 1erstellt habe, einen speziellen Namen geben?Wahrscheinlich ganz einfach, aber ich komme einfach nicht drauf.Vielen Dank vorabMarc

27.05.2003 09:57:09
Thread-ID: 262035
4 Beiträge
VBA Workbooks.Open Filename
Michelle
hallo zusammen
ich habe zwei fragen und hoffe, dass mir jemand zu später stunde noch helfen kann...
die situation:
1. ich hab eine arbeitsmappe mit makros, die im startup-ordner von excel liegt und somit immer mit excel gestartet wird.
2. für 10 länder hab ich je eine arbeitsmappe mi...
13.01.2006 00:37:45
Thread-ID: 718508
5 Beiträge
Neues Workbook mit aktiver Userform erstellen
Raik

Hallo Forum,
ich erzeuge über eine Userform ein neues Workbook, und möchte auf diesen eine andere Userform aktivschalten.
Wie bekomm ich das hin, zumal der Nutzer in der Tabelle Zellen markieren soll, und dann auf den immer sichtbaren Userform.Knopf klicken muss.
Also stellen sich m...
25.04.2006 10:36:32
Thread-ID: 758113
6 Beiträge
ThisWorkbook.Name / zwei VBA Projekte / XLT
Mattias

Hi zusammen
Ich habe eine Exceltabelle "Vorlage.xls" sowie "Addin.xlt". Die Datei Addin lade ich im Excel über den Add-Ins-Manager ein, die Datei wird also immer geladen sobald ich Excel öffne. Sie enthält eine selber kreierte Symbolleiste u.a. mit einem Button "speichern". Nun möchte ich d...
28.09.2007 16:25:00
Thread-ID: 911544
5 Beiträge
Workbook.Close SaveChanges - Fehlerhaft?
Daniel

Hallo
ich hab ein Problem:
Wenn ich eine Datei per Makro ohne zu speichern schließen will, dann sollte das ja eigentlich so funktionieren:
Workbooks("xxx.xls").Close Savechanges:=false
funktioniert nur leider nicht, ich bekomme die trotzdem die Abfrage und die Datei wird auch...
04.11.2008 00:14:00
Thread-ID: 1021447
3 Beiträge
Anzeige

Links zu Excel-Dialogen

UserForm

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
3
4
3
3
3
3
4
5
4
2
4
1
15
1
7
6
2
1
6
2
16
4
5
2
3