- 帖子
- 61
- 主題
- 3
- 精華
- 0
- 積分
- 116
- 點名
- 0
- 作業系統
- WINDOSXP
- 軟體版本
- OFFICE2003
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-10-6
- 最後登錄
- 2014-3-5
|
新手我來誤人子弟~~
看起來應該要自定義函數+OFFSET~
自定義函數 "蝦米"
Public Function 蝦米(範圍, 對照, 資料)
Application.Volatile
Dim I As Variant, S As Integer
For Each I In 對照
S = S + 1
If I.Value = 資料 Then
TESTS = TESTS & 範圍(S) & ","
End If
Next
蝦米 = Left(TESTS, Len(TESTS) - 1)
End Function
|
|
發表於 2010-12-6 17:28
| 