Vlookup改為 vba 下拉式 連動

　暱稱: 阿軒

帖子: 396
主題: 12
精華: 0
積分: 425
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2013-7-2
最後登錄: 2024-8-23

2015羊年全勤獎章 2014馬年全勤獎章熱烈參與勳章

2^#

發表於 2014-3-3 10:46 | 只看該作者

回復 1# owen9399

同是天涯owen人，這是我的笨方法，請參考看看。

103下拉式方式輸入0302.rar (11.87 KB)

帖子: 94
主題: 16
精華: 0
積分: 128
點名: 0
作業系統: XP
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
註冊時間: 2012-1-30
最後登錄: 2015-11-17

3^#

發表於 2014-3-3 11:30 | 只看該作者

回復 2# owen06

謝謝大大的設計感恩

owen

帖子: 94
主題: 16
精華: 0
積分: 128
點名: 0
作業系統: XP
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
註冊時間: 2012-1-30
最後登錄: 2015-11-17

4^#

發表於 2014-3-4 07:33 | 只看該作者

本帖最後由 owen9399 於 2014-3-4 07:34 編輯

回復 2# owen06

大大你好"

  我增加一些元素
  表單的輸入方式對應要儲存格

  1.清除與統計表等未做出
  2.統計表依序號排列自動統計總和

謝謝

103下拉式方式輸入0304.rar (14.27 KB)

owen

　暱稱: 阿軒

帖子: 396
主題: 12
精華: 0
積分: 425
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2013-7-2
最後登錄: 2024-8-23

2015羊年全勤獎章 2014馬年全勤獎章熱烈參與勳章

5^#

發表於 2014-3-4 10:31 | 只看該作者

回復 4# owen9399

需要再增加的功能可以說明詳細一點嗎？

點輸入，裡面的進貨、出貨、交單是要手key還是連動？
點下清除鍵，是要把哪邊的內容清除？
統計表的統計總和是要依序號類別分類還是全部？要統計的是什麼？

帖子: 94
主題: 16
精華: 0
積分: 128
點名: 0
作業系統: XP
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
註冊時間: 2012-1-30
最後登錄: 2015-11-17

6^#

發表於 2014-3-4 12:25 | 只看該作者

回復 5# owen06

大大:

需要再增加的功能可以說明詳細一點嗎？

點輸入，裡面的進貨、出貨、交單是要手key還是連動？
點下清除鍵，是要把哪邊的內容清除？
統計表的統計總和是要依序號類別分類還是全部？要統計的是什麼？

答"
進貨、出貨、交單都是數字用手動輸入的
點下清除鍵是指打把表單輸入的序號公司到 ..... 曉陽交單
統計表是將 SHEET1 輸入的值,傳到統計表中 ,順便統計序號總數量 (相同的序號 103001 列相加與總合 )

謝謝

owen

帖子: 94
主題: 16
精華: 0
積分: 128
點名: 0
作業系統: XP
軟體版本: OFFICE 2003
閱讀權限: 20
性別: 男
註冊時間: 2012-1-30
最後登錄: 2015-11-17

7^#

發表於 2014-3-4 12:30 | 只看該作者

回復 5# owen06

清除有程式不會做

103下拉式方式輸入0304-1.rar (14.65 KB)

owen

　暱稱: 阿軒

帖子: 396
主題: 12
精華: 0
積分: 425
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2013-7-2
最後登錄: 2024-8-23

2015羊年全勤獎章 2014馬年全勤獎章熱烈參與勳章

8^#

發表於 2014-3-4 13:02 | 只看該作者

回復 7# owen9399

大概是這樣的概念，
先用下拉式選單選擇好序號，然後按enter，就會直接跳到"台北出貨"欄，然後輸入數字後，按enter就跳下一格繼續輸入
最後會跳到"輸入"鍵上，就直接按enter，然後就會把內容key到工作表上並把內容清除。
你試試看吧~

103下拉式方式輸入0304.rar (17.85 KB)

　暱稱: 阿軒

帖子: 396
主題: 12
精華: 0
積分: 425
點名: 0
作業系統: Win10
軟體版本: Office 2016
閱讀權限: 20
性別: 男
來自: 台中
註冊時間: 2013-7-2
最後登錄: 2024-8-23

2015羊年全勤獎章 2014馬年全勤獎章熱烈參與勳章

9^#

發表於 2014-3-4 13:08 | 只看該作者

可以順便請教一下版上的大大們，在userform裡，如何讓他在按下『輸入』鍵之後，指標直接跳回到第一格『序號』欄裡，因為我指令寫combobox1.select 行不通…
小弟剛接觸userform而已，還有很多不懂的地方，煩請賜教，謝謝~

yen956

高中生 Rank: 3 Rank: 3

帖子: 522
主題: 36
精華: 1
積分: 603
點名: 0
作業系統: win xp sp3
軟體版本: Office 2003
閱讀權限: 50
性別: 男
註冊時間: 2012-12-13
最後登錄: 2021-7-11

10^#

發表於 2014-3-4 15:52 | 只看該作者

回復 9# owen06
大大你好:
剛學 [A1].end(xldown), ..., 有點困惑, 還請大大解惑, 謝謝!!
我知道, 如果 A1:A10 存有資料, A11空白,
則 [A1].end(xldown).row 會=10,

但『Range("A65536").End(xlUp).Offset(1, 0) 』
會停留在 A11 是不是?
也就是: 如果 Range("A65536") 是空白, 則
Range("A65536").End(xlUp)
會一直找到非空白(A10), 是不是?