伊莉討論區

標題: vba輸入視窗可否輸入自定義的編號 [打印本頁]

作者: zbc231 時間: 2017-1-5 01:57 AM 標題: vba輸入視窗可否輸入自定義的編號

本帖最後由 zbc231 於 2017-1-8 06:25 AM 編輯

[attach]117255567[/attach]想做一個VBA視窗來輸入資料，如圖右側，
輸入的順序為項目，
再來是項目與編號的交會的點-結果，
最後才是編號的部分。
如上圖希望輸入9-60-6，
即可完成如上圖所示的狀態。
其中編號部分不是excel最上方編碼的A-Z，而希望改成自己自定義的1-25，
再加上之前爬文有人的做法順序是9-H-60或是H-9-60，
跟我的順序不同，因此調整很久還是無法達成效果，
希望大家能提供些意見。

作者: tryit244178 時間: 2017-1-20 11:54 PM

本帖最後由 tryit244178 於 2017-1-21 12:52 PM 編輯

其實我看好久看不懂，不過我猜是這樣…

[attach]117428560[/attach]

在按鍵裡寫上

Sheet1.Cells(CInt(Item.Text), CInt(Number.Text) + 2).Value = Result.Text

複製代碼

編號開始的位置是C，第3欄。所以把編號加2就是你要的欄位
CInt(Number.Text) + 2

作者: zbc231 時間: 2017-1-22 01:31 AM

感謝你的回應，我想要的就是這個方式，
但是我照你的方法執行之後，
excel跑出視窗叫我偵錯，如附件所示，
我是哪裡沒有修正到或是打錯嗎？
謝謝你！

作者: zbc231 時間: 2017-1-22 08:37 AM

偵錯的部分我已修正，原來是要打excel本來定義的工作表名稱。
修正之後現在不會再跳出偵錯視窗了。
但現在按照上述的框格順序輸入，9-60-6，
項目是準確的，60卻是指編號60的意思，6則變為結果，
現在該怎麼修改才對呢？謝謝！

作者: zbc231 時間: 2017-1-22 04:50 PM

zbc231 發表於 2017-1-22 08:37 AM
偵錯的部分我已修正，原來是要打excel本來定義的工作表名稱。
修正之後現在不會再跳出偵錯視窗了。
但現在 ...

把textbox2跟Textbox3對調就ok了，
真是非常感謝你！

歡迎光臨伊莉討論區 (http://a401.file-static.com/)