Sub Daten_ausExcel_holen()
Dim wb As <strong>Workbook</strong>, wks As Worksheet
Dim Folie As Slide, Textfeld As Shape
Set wb = Workbooks.Open(FileName:="C:\Transfer\Mappe1.xlsx", ReadOnly:=True)
Set wks = wb.Worksheets("Daten")
Set Folie = ActivePresentation.Slides(1)
Set Textfeld = Folie.Shapes("Textfeld 14")
Textfeld.TextFrame.TextRange.Text = wks.Range("A2").Text
Set Folie = ActivePresentation.Slides(2)
Set Textfeld = Folie.Shapes("Textfeld 15")
Textfeld.TextFrame.TextRange.Text = wks.Range("B2").Text
wb.Close savechanges:=False
End Sub
und zwar sagt er wenn ich das Makro ausführen will "Fehler beim Kompilieren: Benutzerdefinierter Typ nicht definiert" und springt
dann auf Dim wb As Workbook (2.Zeile). Wieso ist diese Variable nicht deklariert? Brauche ich dafür eine bestimmte Bibliothek oder
ähnliches?
Wäre froh über eine Hilfestellung
MfG
Sammy