Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.10.2025 10:01:30
Benannte Bereiche durchsuchen
23.10.2025 09:36:17
Manuelle Formelberechnung vba
23.10.2025 09:29:52
Markiertes Shape "Ellipse" ändern, ohne Namenangabe
23.10.2025 06:53:43
Zeilen löschen oder ausblenden wenn Zeile darüber höher wird
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
764to768
764to768
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Oleobject prüfen

Forumthread: Oleobject prüfen

Oleobject prüfen
23.05.2006 10:16:46
Thorsten
Hallo zusammen
gibt es eine Möglichkeit, im aktiven Sheet das vorhandensein eines bestimmten Objectes zu prüfen z.B."OLEObjects(Filename:="B:\Grussformel.doc")"
Ich möchte, fallsdas Objekt nicht vorhanden ist, ein Makro starten, weiß aber leider nicht, wie ich das vorhandensein prüfen kann?
hat jemand eine Idee?
Vorab schon mal besten dank
Gruß Thorsten
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Oleobject prüfen
27.05.2006 11:59:08
Leo
Hi,
tu dir einen Gefallen und gib den Objekten nach dem Einfügen gleich einen sprechenden
Namen, dann hast du nötigenfalls leichter.
Option Explicit

Sub til()
Const PID As String = "Word.Document.8"
Dim o As Shape
For Each o In ActiveSheet.Shapes
If o.OLEFormat.progID = PID Then
MsgBox o.Name & " gefunden!"
Exit For
End If
Next
End Sub

mfg Leo
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige