Verschieben oder kopieren Sie Excel-Tabelle in eine andere Arbeitsmappe (Zielarbeitsmappe wird mit Variable benannt)

Question

Ich versuche, ein Excel-Arbeitsblatt in eine andere Excel-Arbeitsmappe zu kopieren. Dies ist normalerweise nicht allzu schwierig, außer dass ich mein Arbeitsblatt in eine Arbeitsmappe verschiebe, die mit Variablen gespeichert wird. Hier

ist ein bisschen meines Code:

Sheets.Add After:=Sheets(Sheets.Count) 
ActiveCell.FormulaR1C1 = "a" 
Sheets("Policy Search").Move After:=Workbooks(fname).Sheets(SheetName) 

„Politik search“ immer das gleiche benannt werden, und dies ist die Arbeitsmappe ich zu bewegen versuchen. Ich versuche jedoch, es in eine Datei zu verschieben, die mit der Variablen "fname" und dem Blattnamen "SheetName" dynamisch gespeichert wird.

Jedes Mal, wenn ich versuche, dieses Bit Code auszuführen, erhalte ich einen Index außerhalb des Bereichsfehlers. Irgendwelche Ideen, wie das zu beheben ist?

Danke!

Answer 1

Try this:

Sub MoveSheet() 
    Sheets("Policy Search").Select 
    Sheets("Policy Search").Move After:=Workbooks(fname).Sheets(SheetName) 
End Sub 

Es "Policy Search" ist das aktive Blatt annimmt.