Herbers Excel-Forum - das Archiv
Excelpfad in Word-Makro in Excel-Tab auslesen
- Excelpfad in Word-Makro in Excel-Tab auslesen von Peter vom 11.09.2019 15:57:15
- AW: Versuch - von Fennek am 11.09.2019 16:20:30
- AW: Versuch - von Peter am 11.09.2019 16:35:19
- AW: GetObject (ohne "s" owT) - von Fennek am 11.09.2019 16:41:05
- AW: GetObject (ohne "s" owT) - von Peter am 11.09.2019 17:04:10
- AW: Versuch - von Daniel am 11.09.2019 16:54:23
- AW: Versuch - von Peter am 11.09.2019 17:05:07
Betrifft: Excelpfad in Word-Makro in Excel-Tab auslesen
von: Peter
Hallo,
ich habe ein Workdokument mit folgendem Code:
<pre>Sub Bild_einfuegen_Logo()
Selection.InlineShapes.AddPicture FileName:= _
"C:\Users\Peter\xxx\yyy\zzz_Logo.jpg", _
LinkToFile:=False, SaveWithDocument:=True
End Sub</pre>
Wie kann ich es erreichen, dass dieser FileName als variable aus einer Zelle z.B.
worksheets("Worddaten").Range("I1") ausgelesen wird.
Besten Dank für eure Hilfe.
Gruss
Peter
Betrifft: AW: Versuch
von: 1712499.html
Geschrieben am: 11.09.2019 16:20:30
Hallo,
versuche es einmal so (ungeprüft)
Sub Bild_einfuegen_Logo()
with getobjects("c:\temp\my_Excel.xlsx")
f = .sheets("WordDaten").range("I1")
end with
Selection.InlineShapes.AddPicture FileName:= f, _
LinkToFile:=False, SaveWithDocument:=True
End Sub
Betrifft: AW: Versuch
von: 1712504.html
Geschrieben am: 11.09.2019 16:35:19
Hallo Fennek,
besten Dank für Deine Hilfe.
Bezüglich "getobjects" kommt Fehlermeldung Sub oder Function nicht definiert.
Was soll ich bitte machen?
Gruss
Peter
Betrifft: AW: GetObject (ohne "s" owT)
von: 1712506.html
Geschrieben am: 11.09.2019 16:41:05
Betrifft: AW: GetObject (ohne "s" owT)
von: 1712513.html
Geschrieben am: 11.09.2019 17:04:10
Hallo Fennek,
besten Dank nochmals funktioniert.
Gruss
Peter
Betrifft: AW: Versuch
von: 1712508.html
HI
kleiner Tip für ungeprüfte Codes:
hier ist es durchaus möglich, dass manche VBA-Schlüsselwörter nicht korrekt geschrieben sind.
man erkennt diese neben der Fehlermeldung immer daran dass die Kleinschreibung erhalten bleibt.
bei erkannten VBA-Schlüsselwörtern ist der Wortanfang immer ein Großbuchstabe, bei zusammengesetzten Schlüsselbegriffen auch mit Binnenmajuskeln.
falsch: getobjects
richtig: GetObject
daran kann man im VBA-Editor schnell so machnen Schreibfehler erkennen.
wie findet man jetzt die korrekte Schreibweise?
am einfachsten so:
lösche die Zeichen des Wortes ab dem 3. Zeichen und drücke dann STRG+ENTER
der Editor öffnet dann eine Klappliste mit den möglichen Schlüsselbegriffen und du kannst den gewünschten auswählen.
Gruß Daniel
Betrifft: AW: Versuch
von: 1712515.html
Geschrieben am: 11.09.2019 17:05:07
Hallo Daniel,
besten Dank für den tollen Hinweis.
Gruss
Peter