小弟現有個檔案要請前輩們幫忙
需要求得附件的get
 test.rar (4.52 KB)
當我在 sheet("1")的 Index 看到有數字時他便會到 Name 去抓字串
之後到 sheet("a") 的欄位中找到一樣的字串後填入 sheet("1") 的get 欄位
但是要照順序填入若遇到 一 則跳過
例如：
index 找到 1 對照到 a_tool1 之後到 sheet("a") 找到 tool1
在Sheet("1") 的 get 欄位填入：1,2,3,4,5,6,7,8,,,,,11,12,13
我目前想到的方式- Dim S As Integer
- Dim get As String
- If FlagIndex = "有值" Then
- S = Name - Mainpage - "_"
- get =GetS (S)
- Else
- Status = ""
- End IF
- Function GetS(Byval s As String) As String
- 判斷sheet("a") 是否有 S 字串
- End Function
|
發表於 2012-3-15 18:41
| 
