Tabellen Global deklarieren
05.10.2018 20:31:18
SteinApfel
ich habe folgende Herausforderung (für mich) zwar schon einmal gestellt, allerdings nun etwas abgeändert und hoffentlich verständlicher.
Dazu habe ich es auch nochmal selbst versucht, zuerst ging es auch, nur aktuell nicht mehr.
Liegt es daran, dass ich das Workbook öffne und die Aktion schon durchführe, also die Public Deklarationen in einem Modul liegen statt unter dem Workbook? Oder woran kann es sonst liegen?
Mein Code bisher:
Private Sub Workbook_Open()
Call StartDec
End Sub
Option Explicit
Public WSEinst As Worksheet
Public WSEinfach As Worksheet
Public WSVSG As Worksheet
Public WSMIG As Worksheet
Public WBBook As Workbook
Sub StartDec()
Set WBBook = ThisWorkbook
With WBBook
Set .WSEinst = Tabelle1 'und genau hier kommt ein Laufzeitfehler (Nr438) zustande
Set .WSEinfach = Tabelle2
Set .WSVSG = Tabelle3
Set .WSMIG = Tabelle4
End With
End Sub
Vielen Dank für eure Hilfe ;)