Hallo,
kann ich eine Zahl aus einem Objekt auslesen? Die Infos sind von einer Website in das Dokument kopiert worden. https://www.herber.de/bbs/user/99229.zip
Grüße und Danke
Stefan
…Stefan,
ein von oben-links nach rechts-unten gebogener Pfeil! Wahrscheinlich meinst du eher den komplexen Hyperlink, dessen einzige reine Zahl die EAN ist. Oder meinst du doch die WebSite hinter dem Link (und was dann dort)?
Die EAN erhältst du bspw mit …
=--Splint(C103;;2;2) oder =INDEX(VSplit(C103;;1);2)
Die beiden verwendeten UDFs findest du im Archiv (Button RECHERCHE).
Gruß, Luc :-? Besser informiert mit …
If objOle.progID = "Forms.HTML:Text.1" Then
01.08.2015 10:27:30
ransi
Hallo Stefan,
Ich denke du suchst eher sowas ?
OptionExplicit
Sub machs() Dim objOle AsObject For Each objOle In Tabelle1.OLEObjects With objOle If .progID = "Forms.HTML:Text.1"Then Debug.Print .Name; .Object.Value EndIf EndWith Next EndSub
ransi
Anzeige
AW: If objOle.progID = "Forms.HTML:Text.1" Then
02.08.2015 22:26:11
Stefan
Hi,
ja, das scheint in diese Rictung zu gehen, allerdings erhalte ich einen Fehler in Zeile
If .progID = "Forms.HTML:Text.1" Then
Laufzeitfehler. Die Methode progID für das Objekt _OLEObjekt ist fehlgeschlagen.
An was liegt das denn?
Danke Dir
Stefan