[VBA ] 搜尋對照資料的問題
我想要從資料名單中找出相符的名字再將這些名字連同期詳細資料
（地址、電話、...等）print出
我自己寫了以下程式
但是會出現"型態不符的錯誤"
請問可以幫我看一下是哪裡出問題嗎
請多多指教 謝謝 感激不盡
Sub find()
Dim myfindname
Dim myfound
getoffpeople = Array("楊會敏", "藍鄉齊", "陳貞一")
、我想要找的名字
For Each people In getoffpeople
myfindname = people
Set myname = Cells.find(what:=myfindname, after:=ActiveCell)
、找出符合的名字
myfound = i + myfindname + ActiveCell.Offset(1, 1) + ActiveCell.Offset(1, 2)
、將我想要有關此名字的資料指定到myfound
Print myfound
'印出相符名字的與其相關資料
i = i + 1
Next people
、繼續進行下一筆資料比對
End Sub
--
小玉西瓜的名言
我心情哪不好
就想要抬槓
哪想妹抬槓
搭一個人呼我找到
就算伊衰
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 192.192.90.29
推
03/03 03:37, , 1F
03/03 03:37, 1F
→
03/03 03:37, , 2F
03/03 03:37, 2F
→
03/03 03:38, , 3F
03/03 03:38, 3F
推
03/07 12:23, , 4F
03/07 12:23, 4F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
