標題: 儲存格內選取"-"之前及之後的字眼。 [打印本頁]

---

作者: tc1701    時間: 2016-6-5 20:34     標題: 儲存格內選取"-"之前及之後的字眼。

A1 儲蓄格內:
suiji008ker-suiji5656----綁定點數：０名字：老佛爺表示儒好帥 等級：３０戰鬥力：5,727 段位：銀牌ＩＶ

各位大大你們好，我想在A1中，選取suiji008ker 的字 貼到 B1中 ，之後想選取suiji5656的字貼在C1 中。
可以判定是"-" 前面的字眼 及"----"前的字眼。

我用了FOR NEXT 但結果走不通，在這個過程中我設定了超過3個變數去做FOR NEXT ..結果.....

希望大大可以用一個比較簡易的方法教一教小弟~感激萬分

---

作者: ML089    時間: 2016-6-5 20:50

回復 1# tc1701

Sub ex()
    For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
        Cells(i, 2).Resize(, 2) = Split(Cells(i, 1), "-")
    Next
End Sub

---

作者: tc1701    時間: 2016-6-5 21:22

回復 2# ML089


    謝大大，
想問一下為什麼要用到RESIZE? 而RESIZE (,2) 是什麼意思?

---

作者: ML089    時間: 2016-6-5 21:42

RESIZE (,2) 是什麼意思?
RESIZE (,2)就是範圍增加為2欄

Cells(i, 2).Resize(, 2) 就是 RANGE(Cells(i, 2), Cells(i, 3))
Cells(i, 2).Resize(, 3) 就是 RANGE(Cells(i, 2), Cells(i, 4))
Cells(i, 2).Resize(, 4) 就是 RANGE(Cells(i, 2), Cells(i, 5))

游標移至 Resize 按F1 就能看到說明

---

作者: tc1701    時間: 2016-6-6 20:36

回復 4# ML089


    明白了~謝謝你~我會多看看說明再發問!!又上了一課堂~感恩

---

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