VBA将整个数据集移动到不同的行和列中

Question

我是使用VBA的新手，我需要您的帮助 我有一个数据集，该数据集已格式化为工作表，基本上从A〜BG列开始，行从1〜2100ish开始。

我想做的是将整个数据集从E列开始并从13行开始，因为这是模拟器将采用的格式。

什么是最好的方法？

Answer 1

有两种方法：

1 /插入行和列

Columns("A:D").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Rows("1:12").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove

2 /移动方块

Range("A1").Select
Selection.CurrentRegion.Select
Selection.Cut Destination:=Range("E13")

Answer 2

那可以帮助您一点：

Range("A1:G2100").Select
Selection.Cut
Range("E13").Select
ActiveSheet.Paste

E13是目标位置的开始

Answer 3

请尝试以下操作。

Range("A1:G2100").Cut Sheet2.Range("k1")

问候 萨西