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

BV7BW

各位新進.老師.大家好
我在網路上學習關鍵字查詢用法
其缺點是公式裸露.容易誤觸消除.
是否可改用VBA寫法
按鈕式查詢
關鍵字vba.zip (17.26 KB)

下載次數: 33

2021-3-24 18:24

Farnsworth

感谢各位 大神，代码下载试试，支持努力。

BV7BW

回復 44# samwang

謝謝 s 大大

samwang

回復 43# BV7BW

已有加入解釋，請確認看看，謝謝。

BV7BW

回復 42# samwang


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

samwang

回復 41# BV7BW

不好意思，我的理解能力不好，版上有很多大大都很厲害，建議一個主題提問一個問題比較能了解需求，
也可以讓大家可以互相學習，感謝。

BV7BW

回復 39# samwang 關鍵字vba.2超連結.zip (982.12 KB)

下載次數: 0

2021-5-24 22:45

    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是這段修改?
表單問題.客戶查詢是否可用表單方式

BV7BW

回復 39# samwang

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

samwang

回復 37# BV7BW


如附件不太確定是否正確為您的需求，請再測試看看，謝謝。

BV7BW

回復 33# 軒云熊

   軒云熊 大大你好
     感謝你

經測試後.運轉沒問題.對於轉至正常版本.可能有差誤
我有補上遺漏地方以貼上.懇請 軒云熊 大大幫看看
關鍵字vba.1超連結.zip (445.45 KB)

下載次數: 4

2021-5-23 09:45