Ich habe einen Sub, der einen Header aus einer Vorlage einfügt und die oberste Zeile des aktiven Arbeitsblatts einfriert, die wie folgt geschrieben wird:
%Vor%Ich möchte es in eine Funktion umwandeln, die an das Blatt übergeben wird, in das der Header eingefügt werden soll. Damit es geschrieben wird,
%Vor% ActiveSheet wird contentSheet , aber wie kann ich Window von contentSheet bekommen?
Gibt es auch eine bessere Methode zum Kopieren und Einfügen?
Ich denke, Sie möchten contentSheet.Parent.Windows(1) , z. B.:
Zum besseren Einfügen: headerTemplate.Rows ("1: 1"). Kopieren Sie ActiveSheet.Rows ("1: 1")
Generell möchten Sie vermeiden Select , sofern nicht erforderlich.