Re: [VBA ] 新手..想使用EXCEL內建函數執行迴圏
不知道是不是我把問題想的太複雜@@
但是我先貼上我現在所寫的程式碼...一步一步測試迴圈..
Dim myrng As Range
Dim mycnt As Long
Dim mykey As String
Dim i As Integer
Dim j As Integer
Dim k As Integer
Dim l As Integer
Set myrng = Columns("G:L")
j = 2
k = 3
l = 5
mykey = Cells(j, 1).Value
For i = 2 To 6
mycnt = WorksheetFunction.VLookup(mykey, myrng, (i), False)
Cells(l, k).Value = mycnt
l = l + 1
Next
j = 3
k = 4
l = 5
mykey = Cells(j, 1).Value
For i = 2 To 6
mycnt = WorksheetFunction.VLookup(mykey, myrng, (i), False)
Cells(l, k).Value = mycnt
l = l + 1
Next
簡單的說mykey搜尋cell(j,1)的value..(j不確定會到多少)
然後從資料欄位G:L中找尋相對應的value( 事實上就在G欄(i=1) )...
然後要把相同的列資料(i=2 to 6)都抓出,丟到cells(l,k)裡面..
現在的問題是:
1.迴圈i跟j都不確定會到多少..我應該用哪個來寫?
2.現在是將當j=2 和j=3抓出來的5個值放在不同的K欄中，
但真正想要的是將這10個值兩兩累加(j=2,i=2的值加上j=3,i=2的值)..
請問應該如何寫?
不知道是否可以針對這兩個問題給我一些解析,謝謝><"
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.128.118.180
推
12/04 18:11, , 1F
12/04 18:11, 1F
→
12/04 20:19, , 2F
12/04 20:19, 2F
討論串 (同標題文章)
完整討論串 (本文為第 4 之 5 篇)：