搜索標題名稱後選擇整個列

試圖教自己的VBA，我很新。到目前爲止，Stackoverflow一直是一個很棒的資源，所以我想我會在這裏問它。搜索標題名稱後選擇整個列

我想要它做的是找到名爲「參考」的單元格，然後複製它下面的列。

由於某種原因，我無法在網上找到這個地方，並認爲我會咬緊牙關並提交一個問題。

謝謝。

2014-02-12 NumberJuan

如果您包含當前的代碼，問題會得到更多關注。你能找到「參考」單元嗎？ –

可能的重複[如何使用列標題來選擇不同範圍的單元格來填充文件名中的數據]（http://stackoverflow.com/questions/11234737/how-to-use-column-headers-to-select-不同的細胞到細胞的數據-f？rq = 1） – pnuts

這取決於你所說的「細胞命名」的含義。如果細胞實際上是在名爲「參考」（也就是說，如果你已經改名細胞A1的範圍Reference，然後你可以在下面這個小區中利用偏移方法複製：

ActiveSheet.Range("Reference").Offset(1, 0).Copy

如果你不是正在尋找對於值爲「Reference」的單元格，您可以找到該單元格，並使用類似這樣的方法複製單元格（請注意，如果有多個單元格符合搜索條件，則會將單元格複製到最後找到的單元格下方）：

With ActiveSheet.UsedRange 
    Set c = .Find("Reference", LookIn:=xlValues) 
    If Not c Is Nothing Then 
     ActiveSheet.Range(c.Address).Offset(1, 0).Copy 
    End If 
End With

如果要複製特定單元格下方的整個列，可以在lin中執行一些操作e下面的代碼。在這種情況下，它將複製單元格C7下的所有使用的單元。

Sub CopyColumnBelow() 
    Dim r As Range 
    Set r = ActiveSheet.Range("C7") 

    ActiveSheet.Range(r, ActiveSheet.Cells(Rows.Count, r.Column).End(xlUp).Address).Copy 
End Sub

希望你可以用它來推進學習Excel VBA。

來源

2014-02-13 00:05:20

美麗，這對我非常有幫助。不勝感激！ – NumberJuan

好聽。如果它適合你，請接受答案...... :) –

搜索標題名稱後選擇整個列

回答

相關問題