[算表] 橫向傳回位址vba

看板Office作者 (佩蒂吉他)時間8年前 (2017/06/03 16:43), 編輯推噓0(005)
留言5則, 2人參與, 最新討論串1/1
軟體:excel 版本: 2007以上 如果我在A1:P1 有A這個字元 我想傳回每個A位在什麼位址 Sub test() Dim ss As Object For Each ss In Range("A1:P1") If ss.Text = "a" Then mm = Application.Match(ss.Text, Range("a1:p1"), 0) End If MsgBox mm Next ss End Sub 都只會傳回1 不知道vba該改哪邊? -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 60.250.67.77 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1496479431.A.0F8.html

06/03 17:06, , 1F
mm = ss.Column
06/03 17:06, 1F

06/03 17:07, , 2F
match_type 是 0,會找第一個完全等於 lookup_value
06/03 17:07, 2F

06/03 17:08, , 3F
msgbox mm 放在 if 裡面比較恰當
06/03 17:08, 3F

06/03 17:09, , 4F
06/03 17:09, 4F

06/03 22:55, , 5F
感謝大大的解說 我了解了~
06/03 22:55, 5F
文章代碼(AID): #1PCdR73u (Office)
文章代碼(AID): #1PCdR73u (Office)