根据所选单元格的偏移位置将数据复制到另一个表单中

我select工作表1中的单元格。我试图保存该单元格的位置，然后将上面的数据3个单元格复制到工作表2“A1”，然后返回到工作表1并偏移该选定单元格的4个单元格并复制数据转换成表格2“C1”。

每次使用这个macros时，我将select一个不同的单元格，因此为什么它必须围绕当前选定的单元格旋转。 我只是坚持如何保存选定的单元格位置，然后通过子使用它。

我的解决scheme

Sheets("Income").Select ActiveCell.Select Selection.Copy Sheets("Claim APR").Select Range("D92").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Sheets("Income").Select ActiveCell.Offset(1, 0).Select Application.CutCopyMode = False Selection.Copy Sheets("Claim APR").Select Range("F93").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _