Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1116to1120
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
Inhaltsverzeichnis

VBA-Verweis ab- und einschlaten- wie?

VBA-Verweis ab- und einschlaten- wie?
Dietmar
Hallo in die Runde,
Frage 1:
weiß jemand, wie ich einen VBA-Verweis dauerhaft abschalten kann? Ich möchte dies zB mit - Ref Edit Control- machen.
Wenn ich jedoch dás Häkchen wegenehmen, Excel speichere und dann schließe; und es dann wieder öffne ist das Häkchen wieder da!
Was ist zu tun?
Frage 2:
Gibt es einen VBA-Code um einen VBA-Verweis abzuschalten/einzuschalten ?
Ich VBA-Verweis -Ref Edit Control- beim Öffnen einer Arbeitsmappe deaktivieren und beim Schließen der Mappe wieder aktivieren.
Jermand eine Ahnung wie das geht?
Danke in die Runde !
Dietmas aus Aachen

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
Defekte Verweise per VBA löschen - Code-Beispiele
20.11.2009 17:07:27
NoNet
Hallo Dietmar,
hier ein passender VBA-Code zum Löschen defekter Verweise :
Sub DefekteVerweiseLoeschen()
'04.11.2009, 20.11.2009, NoNet - www.excelei.de
Dim objRef As Object, antwort
On Error Resume Next
For Each objRef In ActiveWorkbook.VBProject.References
If objRef.isbroken Then
antwort = MsgBox("Soll folgender VBA-Werweis gelöscht werden ?" & vbLf & vbLf & _
objRef.Description & vbLf & vbLf & _
"(Datei : " & objRef.Fullpath & ")", vbYesNo + vbQuestion, _
"Defekten Verweis gefunden :")
If Err Then
antwort = MsgBox("Soll folgender VBA-Werweis gelöscht werden ?" & vbLf & vbLf &  _
_
"(Datei : " & objRef.Fullpath & ")", vbYesNo + vbQuestion, _
"Defekten Verweis gefunden :")
End If
If antwort = vbYes Then
ActiveWorkbook.VBProject.References.Remove objRef
End If
End If
Next
End Sub
Einige weitere Beiträge von mir zum Thema "Verweise"findest Du hier :
http://spotlight-wissen.de/archiv/message/1071334.html
https://www.herber.de/forum/archiv/1088to1092/t1090627.htm#1090629
http://www.ms-office-forum.de/forum/showthread.php?t=232888
http://www.ms-office-forum.net/forum/showthread.php?t=234648
Viel Erfolg, schönes WE, Gruß NoNet
Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige