VBA命令按钮 - 具有列名匹配的复制和粘贴列

-1

这里完全是VBA的新增功能;非常抱歉，如果这是在别处回答或似乎极其容易 - 我看了，找不到任何与我想要完成的事情相符的例子。VBA命令按钮 - 具有列名匹配的复制和粘贴列

我有一个ActiveX命令按钮，当点击时，我想从C18：C123复制数据到复制数据（C17）粘贴值和源格式的匹配头名称的相应列。实质上，我不想复制数据，直到单击“更新”命令按钮，并且它需要能够将被粘贴的数据位置与C17中的数据源名称相匹配。这也是在同一工作簿中复制并粘贴在同一张纸上。

注意：我处理的数据本质上是敏感的，我无法提供一个工作示例，但可以创建一个单独的表格，以便在需要时解释此问题。

来源

2017-06-19 Connor Hogan

请表明您已经尝试的代码，并具体解释你在哪里卡住了。这个问题对于这个论坛来说太广泛了。 –

右键单击该ActiveX按钮，点击查看代码并粘贴以下代码中有

'This is the location of all the headers one of which is the header in C17 
Set lookup_rng = Range("H17:Q17") 

For Each cell In lookup_rng 
    If cell.Value = Range("C17").Value Then 
     Range("C18:C123").Copy 
     cell.Offset(1, 0).Select 
     Selection.PasteSpecial Paste:=xlPasteValues 
     Selection.PasteSpecial Paste:=xlPasteFormats 
     Application.CutCopyMode = False 
    End If 
Next cell

来源

2017-06-19 15:12:28

这就是我所问的一切;唯一的例外是它复制和粘贴存在于C17：C123中的单元格引用，我怎样才能获得它仅复制值和源格式？ –

@Connor Hogan编辑 –

VBA命令按钮 - 具有列名匹配的复制和粘贴列

回答

相关问题