返回列表 上一主題 發帖

[發問] 引用其他控制項的問題

回復 1# stillfish00


    可將路徑  另設一元件 加以控制
並於 開啟時 跳出元件 藉此控制

  多做多想多學習,少看少錯少迷途

  多做=多多練習,多多編寫。
  多想=想想為什麼人家程式要那樣寫,如果換成自己,又會怎寫。
  多學習=學習人家的發問並解答,學習人家的寫法

  少看=只看不做也枉然

TOP

回復 3# stillfish00


    這麼說好了

1.你設計好的表單 是涵蓋在Excel VBA 內,還是另外包裝成執行檔?
2.所謂設定一開檔案就執行的意思
Private Sub Workbook_Open()
'userform1.show
'applocation XXXX
End Sub

這是當檔案開啟就執行XXXX副程式 或 表單呼叫

  多做多想多學習,少看少錯少迷途

  多做=多多練習,多多編寫。
  多想=想想為什麼人家程式要那樣寫,如果換成自己,又會怎寫。
  多學習=學習人家的發問並解答,學習人家的寫法

  少看=只看不做也枉然

TOP

本帖最後由 mark15jill 於 2013-1-2 09:31 編輯

回復 5# stillfish00

會錯誤是正常的..
因為指向錯誤 或 無指向之項目
程式當然判讀不出來

建議
可再開啟程式前先判讀該檔案是否存在於判讀目錄底下
如
Private Sub Workbook_Open()
if dir("C:\Windows\System32\COMCTL32.OCX") <>"" then
      Load userform1
     userform1.show
endif
end sub

或者
判讀無此檔案 或 不再預設目錄底下的話
搜尋預設目錄且將檔案複製到該目錄(這有點類似木馬的寫法)

  多做多想多學習,少看少錯少迷途

  多做=多多練習,多多編寫。
  多想=想想為什麼人家程式要那樣寫,如果換成自己,又會怎寫。
  多學習=學習人家的發問並解答,學習人家的寫法

  少看=只看不做也枉然

TOP

回復 8# stillfish00

可以新增一個提示訊號(如 MSGBOX)
此訊號在判斷預設目錄無檔案下根據結果進行是否複製的選項

  多做多想多學習,少看少錯少迷途

  多做=多多練習,多多編寫。
  多想=想想為什麼人家程式要那樣寫,如果換成自己,又會怎寫。
  多學習=學習人家的發問並解答,學習人家的寫法

  少看=只看不做也枉然

TOP

        靜思自在 : 看別人不順眼,是自己修養不夠。
返回列表 上一主題