2015-06-12 45 views
0

这可能是基本的,但我找不到如何去做。VBA复制多个偏移单元

我想选择一个单元格和一个偏移单元格3右边的单元格。中间没有。所以如果我选择A2,它会复制A2和A5。

我已经设法做一个或另一个,但不能解决如何组合。我是一名初学者。

感谢您的回复。意识到我错了我的问题。我想任何一个单元在A列中选择复制和在列EI同一行对应的电池有这到目前为止,但我不能工作,如何让代码同时

' Keyboard Shortcut: Ctrl+Shift+C 
' 
    ActiveCell.Copy 
    ActiveCell.Offset(0, 5).Copy 
End Sub 
一举两得
+2

显示您的努力! :-) – moffeltje

+0

你需要显示一些代码。在VBA中搜索'Range.Offset'方法。 – ChipsLetten

+0

还可以更好地解释你的问题。你想复制A2到A5吗?或复制A2和A5? – hypetech

回答

0
Sub Try() 
Dim Selected_, Paste_ As Range 
On Error Resume Next 
'Allow user to select cell 
Set Selected_ = Application.InputBox("Please select cell you would like to copy", Type:=8).Select 
'Copy user's selected cell 
Selection.Copy 
'Offset, to select column E with the same row as user's selection 
Set Paste_ = ActiveCell.Offset(0, 4).Select 
'Paste value 
ActiveCell.PasteSpecial 
End Sub 

这应该有帮助:)

+0

我是新手。这似乎没有做任何事情。我可以看到逻辑,但是什么行动使它起作用?我想使用键盘快捷键。 –

+0

好的,我已经研究出如何使其工作。它所做的就是复制选中的单元格并粘贴到“E”列中。 –

+0

我想要做的是将选定的单元格复制到列“A”中,并将相应的单元格复制到列“E”中。合并2个输出,然后我可以使用Ctrl + V复制该位置。列“A”包含部件号,列“E”包含价格。你可以说把价格放在“B”栏中,但没有这样做是有充分理由的。 –