返回列表 上一主題 發帖

共用鈕

myleoyes

帖子
463 
主題
116 
精華
0 
積分
580 
點名
0  
作業系統
Vista 
軟體版本
2007 
閱讀權限
50 
性別
男 
註冊時間
2010-5-4 
最後登錄
2017-11-13 

論壇贊助勳章論壇榮譽勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-10-6 16:57 | 顯示全部帖子

共用鈕

各位前輩你們好!!   
      前輩!
      Sub 跨檔()
          Windows("李四.xls").Activate
          ActiveWindow.ScrollColumn = 18
          ActiveWindow.ScrollRow = Range("B" & Rows.Count).End(xlUp).Row
          Windows("LeoV76.xls").Activate
      End Sub
      跨檔鈕是在LeoV76.xls執行
      當李四.xls在開啟狀態
      按跨檔鈕執行是OK
      請問要如何寫才能使此按鈕
      在張三.xls或王五.xls等等在開啟狀態也能使用
      請知道的前輩,不吝賜教謝謝再三!!
收藏 分享

myleoyes

帖子
463 
主題
116 
精華
0 
積分
580 
點名
0  
作業系統
Vista 
軟體版本
2007 
閱讀權限
50 
性別
男 
註冊時間
2010-5-4 
最後登錄
2017-11-13 

論壇贊助勳章論壇榮譽勳章
2#
發表於 2013-10-10 10:25 | 顯示全部帖子
回復 2# luhpro
前輩!
     謝謝!小弟也是用此Windows([C1] & ".xls").Activate
     方式卻出現錯誤以為自己弄錯方法
     經你指導發現方式沒錯才驚醒
     這B程式是在A程式執行完隨著執行並沒有設按鈕
     原本的[C1]在Sheet6當A程式執行完程式把它帶到Sheet2
     所以再此執行B程式(Windows([C1] & ".xls").Activate)
     當然會錯誤因此改成(Windows(Sheet6.[C1] & ".xls").Activate)
     就解決問題疏忽!疏忽!真歹勢麻煩前輩!謝謝再三!!

TOP

        靜思自在 : 站在半路，比走到目標更辛苦。
返回列表 上一主題