0

最後のシートの値 (数式ではない) のみをコピーし、新しいシートに「ゲーム」という名前を付けようとしています。私はこれを使用しています：

Sub CreateColumn()
ActiveSheet.Copy
Cells.Copy
Range("A1").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False


 ActiveSheet.Name = "Games"
 Application.ScreenUpdating = False

End Sub

ただし、最後のシートの後の新しいシートではなく、新しいワークブックを作成しています。誰かが私を助けることができますか？ありがとう

4

1 に答える 1

0

最初にシートを追加する必要があります。何かのようなもの：

Sheets.Add After:=Sheets(Sheets.Count)
Sheets("Sheet4").Select
Sheets("Sheet4").Name = "Games"

次に、それをアクティブにしてコピーします。

于 2013-04-18T17:41:49.163 に答える