VBA aus Modul an Kopie übergeben
28.04.2021 11:10:56
Marie
Ich habe eine große Excel-Datei (xlsm) mit über 10 Tabellenblätter. Das Blatt "Lager" möchte ich nun per VBA in eine neue Mappe kopieren, bearbeiten (Zellen auf Wert setzen, Spalten löschen etc.) und automatisch unter einem bestimmten Pfad (aktuell noch als xlsx) abspeichern. Das alles klappt auch wunderbar (VBA in Modul1).
Nun möchte ich ein weiteres Makro, das in Modul2 (Sub Import()) der Datei steht, mit an diese Kopie übergeben für die spätere Verwendung in der neuen Datei.
Das krieg ich leider nicht hin. Wie muss ich den untenstehenden Code verändern, damit Sub Import() aus Modul2 der Ursprungsdatei übergeben wird?
Sub HR()
Application.ScreenUpdating = False
Sheets("Nfr.").Copy
'Farbig unterlegen
With Range(SpalteKat.Address).Interior
.Color = 10066431
End With
Application.CutCopyMode = False
'Speichern
WBS.SaveAs "L:\T1_Einkauf\Lager" & Format(Date - 1, "yymmdd") & ".xlsx"
Application.ScreenUpdating = True
End Sub