Board logo

標題: excel vba mid的用法 [打印本頁]
作者: lionliu    時間: 2015-6-11 10:44     標題: excel vba mid的用法

各位大哥我想請問mid是否有進階的用法，範例如下

              A                                         B                  C                   D
1      AC@2345@DFG            AC                 2345             DFG
2     AD@ 12@ERT                  AD                  12                 ERT
3    AXC@1 @ GH                   AXC               1                    GH
我想將A欄轉換成 B 、 C、D
作者: rouber590324    時間: 2015-6-11 11:18

用  資料剖析  就 OK 阿
作者: no3-taco    時間: 2015-6-11 14:27

mid有函數 和 陳述式 兩種用法

你這個用split比較好
下面給你參考，請小心使用，修改後沒辦法復原
Sub test()
Dim a, i, j
For i = 1 To 3
    a = Split(Cells(i, 1), "@")
    For j = 0 To UBound(a)
        Cells(i, j + 2) = a(j)
    Next j
Next i
End Sub
作者: lionliu    時間: 2015-6-23 17:40

回復 3# no3-taco
謝謝2位大哥的回覆，目前用no3大個的方法較方便。



歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)