Hallo Zusammen,

ist vielleicht für viele trivial aber ich habe leider nicht viele Kenntnisse in VBA Programmierung und Excel Makro erstellung und deswegen wollte ich folgendes Problem ansprechen.

Ersteinmal der Quellcode:

Sub Daten_ausExcel_holen()
    'Werte aus Exceldatei holen und in PowerPoint Textfeldern zuweisen
    Dim wb As Workbook, wks As Worksheet
    Dim Folie As Slide, Textfeld As Shape
    'Exceldatei öffen und Tabellenblatt zuweisen
    Set wb = Workbooks.Open(FileName:="C:\Transfer\Mappe1.xlsx", ReadOnly:=True)   '<--- Pfad zur Excel Datei anpassen
    Set wks = wb.Worksheets("Daten")   '<--- Den Namen der Tablle anpassen
    
    'Textfeldern in PowerPoint Folien Wete aus der Exceldatei zuweisen
    
    Set Folie = ActivePresentation.Slides(1)
    Set Textfeld = Folie.Shapes("Textfeld 14")   '<--- Den Namen der Form anpassen
    Textfeld.TextFrame.TextRange.Text = wks.Range("A2").Text   '<--- Die Zelle anpassen
    
    Set Folie = ActivePresentation.Slides(2)
    Set Textfeld = Folie.Shapes("Textfeld 15")   '<--- Den Namen der Form anpassen
    Textfeld.TextFrame.TextRange.Text = wks.Range("B2").Text   '<--- Die Zelle anpassen
    
    'Exceldatei schliessen
    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