關鍵字查詢可改為VBA方式按鈕查詢 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » 關鍵字查詢可改為VBA方式按鈕查詢

返回列表下一主題上一主題發帖

[發問] 關鍵字查詢可改為VBA方式按鈕查詢

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

21^# 跳轉到 »

發表於 2021-5-21 22:33 | 顯示全部帖子

回復 34# samwang
感謝 S 大大前輩先進
(就是這樣)我想用邏輯
因我所做取樣版本.有漏誤.先把取樣版本再補上好
再向  S 大大報告
   #工作表2(客戶)可行.(項目)有誤
   #工作表4(項目)可行.因取樣版本有漏誤.等補上後再請教
目前原本說請 S 大大可用 (表單)方式研究看看
在准提部林老師之出貨作業D版V01_10905檔案其中有提到(表單)方式.我看可以運用到工作表2(客戶)那項作法.可學習地方
因老師許久未上線.無可請教.現在只有先看網路教學(表單)做法.因我理解度比較慢.無法像前輩先進理解比較快
我現在使用版本是以  准提部林老師V01_10905..修改版.因檔案容量超過上傳許可.故無法在論壇上傳
在我提問文上(修改程式)篇中有我所改版本.請 S大大可參考其中(表單)方式
在這先謝謝 S 大大

敏而好學,不恥下問

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

22^#

發表於 2021-5-21 22:46 | 顯示全部帖子

回復 33# 軒云熊

謝謝軒大大
我先理解測試後在向軒大大報告
謝謝你

敏而好學,不恥下問

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

23^#

發表於 2021-5-23 09:31 | 顯示全部帖子

回復 35# BV7BW
  S大大你好
修改時耽誤許多.抱歉
有些地方我以補上(與正常使用版本相同位置)
有幾個問題
1)"客戶訂購表"查詢後字體變小.在"項目編號"查詢則不會

2)"客戶訂購表"中對應位置有誤.
            例"K"欄應從"K5"開始.現以"K3"對應

3)"項目編號"以"項目"欄為主.現以"項編".對應位置是否可自行滾動到"F"位置.不是"F"欄
         不管用以"項編"."項目"對應.都以"項編"滾動至"F"位置為準.因凍結窗格
         例"A102"就"是正常.因沒有滾動."B211""2就"沒到位置

4)對應後滑鼠指標可否指定位置.並可否變顏色
         例以"項目編號".為例當點"A102"滑鼠指標對應位置"F5"可否指定到"I5"?
         而滑鼠指標所在格變顏色(是否可用格式化來變色)

關鍵字vba.1超連結.zip (445.45 KB)

敏而好學,不恥下問

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

24^#

發表於 2021-5-23 09:46 | 顯示全部帖子

回復 33# 軒云熊

軒云熊大大你好
感謝你

經測試後.運轉沒問題.對於轉至正常版本.可能有差誤
我有補上遺漏地方以貼上.懇請軒云熊大大幫看看

關鍵字vba.1超連結.zip (445.45 KB)

敏而好學,不恥下問

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

25^#

發表於 2021-5-23 22:19 | 顯示全部帖子

回復 39# samwang

謝謝 s大大
目前對應位置以可調整
還有幾問題我在測試
謝謝你

敏而好學,不恥下問

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

26^#

發表於 2021-5-24 22:46 | 顯示全部帖子

本帖最後由 BV7BW 於 2021-5-24 22:49 編輯

回復 39# samwang

關鍵字vba.2超連結.zip (982.12 KB)

S大大  你好
"項目編號"對應.字體以改好.想說能改為以項目為連結格.未能找出需修改地方

   滑鼠指標是否可統一滾動至相同一格
   例.當點A102時滑鼠指標會在"I5"格.點"B211"時先滾動10欄滑鼠指標在"S14"格
例  Sub 項目表項目01()
   '

   ' 頂部及項目01 巨集
      Range("I4").Select
   ' 滑鼠位置
      ActiveWindow.ScrollColumn = 310
   ' 列數
      Range("I4").Select
   ' 滑鼠位置
      ActiveWindow.ScrollRow = 1
   ' 欄數
   ' 項目02須加上(ActiveWindow.SmallScroll ToRight:=10)(跳動格數)
      Range("I4").Select
   ' 滑鼠位置
   End Sub

   Sub 項目表項目02()
   ' 頂部及項目02 巨集
   ActiveWindow.ScrollColumn = 310
   Range("I4").Select
   ActiveWindow.SmallScroll ToRight:=10
   Range("S4").Select
   End Sub

"客戶訂購表"字體修改未能統一大小.滑鼠指標變色.因已有客戶連結程式不知如何加上
         變色之程式.
         滑鼠指標是否可指定欄位例如指定在"M欄"內才變色
         [M4:M4300].Interior.Color = xlNone是這段修改?
表單問題.客戶查詢是否可用表單方式

關鍵字vba.2超連結.zip (982.12 KB)

關鍵字vba.2超連結.zip (982.12 KB)

敏而好學,不恥下問

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

27^#

發表於 2021-5-25 08:05 | 顯示全部帖子

回復 42# samwang

S 大大你好
了解感謝你幫忙
能再請你幫注解關鍵字VDA2超連結
謝謝你'

敏而好學,不恥下問

中學生 Rank: 2

帖子: 199
主題: 22
精華: 0
積分: 233
點名: 85
作業系統: Vista
軟體版本: Office2003
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2020-4-14
最後登錄: 2024-4-25

2023年全勤獎章 2022虎年全勤獎章論壇榮譽勳章論壇贊助勳章

28^#

發表於 2021-5-25 14:02 | 顯示全部帖子

回復 44# samwang

謝謝 s 大大

敏而好學,不恥下問

靜思自在 : 人要自愛，才能愛普天下的人。

返回列表下一主題上一主題