Hallo,
stehe auf dem Schlauch! Aus dem Netz habe ich mir ein kurzes Makro kopiert, weiß aber nicht, warum es nicht funktioniert:
[b]Sub Makro_einfuegen()
'fügt in die Tabelle Tabelle1 das Makro ein
Dim x As Integer
With ThisWorkbook.VBProject.VBComponents("Tabelle1").CodeModule
x = .CreateEventProc("SelectionChange", "Worksheet")
.InsertLines x + 1, "'dieses Makro wurde per Makro eingefügt"
.InsertLines x + 2, "MsgBox ""Hallo, Hallo !!!"""
End With
End Sub[/b]
Das Makro habe ich in ein Modul einkopiert; bekomme aber einen Laufzeitfehler '1004'.
Was mache ich falsch?