- 帖子
- 63
- 主題
- 8
- 精華
- 0
- 積分
- 122
- 點名
- 0
- 作業系統
- Windows 2007
- 軟體版本
- Office 2007
- 閱讀權限
- 20
- 性別
- 男
- 來自
- Taiwan
- 註冊時間
- 2019-4-16
- 最後登錄
- 2023-3-24
|
DIM varArrstr as Varriant
DIM coli as Integer
varArrStr = Split(InputString, " ")
For coli =0 to 10 step 1
if varArrStr(coli ) ="" then
exit for
end if
cells(1,coli +1) =varArrStr(coli )
Next coli |
|