標題: [發問] 如何自動換列 [打印本頁]

---

作者: veryshc    時間: 2015-10-26 15:24     標題: 如何自動換列

請教各位前輩
(1)我已在Sheet1 設計一個UserForm，在TextBox輸入值並按下CommandButton會將該值
存在Sheet2的A2 。
(2)我該利用何種語法才能在下次重複(1)步驟時，該值會存於A3。

麻請各位前輩解惑，謝謝。

---

作者: 准提部林    時間: 2015-10-28 18:34

Dim xEnd As Range
Set xEnd = Sheets("Sheet2").Cells(Rows.Count, 1).End(xlUp)(2)
xEnd = TextBox1.Value

---

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