
excel如何使用VBA提取列的值呢?
1个回答
展开全部
Sub test()
Dim rng As Range
Dim j As Integer
Set rng = Range("a1:g1").Find("列3")
j = rng.Column
Range(Cells(2, j), Cells(5, j)).Copy Range("j2:j5")
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
Sub test()
Dim rng As Range
Dim j As Integer
Set rng = Range("a1:g1").Find("列3")
j = rng.Column
Range(Cells(2, j), Cells(5, j)).Copy Range("j2:j5")
End Sub
类别
我们会通过消息、邮箱等方式尽快将举报结果通知您。
说明
0/200