[發問] (已解答，G大謝謝)如何讓自訂表單關閉後暫存，開啟後繼續作業？

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

2^#

發表於 2012-6-14 13:35 | 只看該作者

回復 1# av8d
表單.Hide
Hide 方法隱藏一個物件但不載出。

dafa

帖子: 49
主題: 6
精華: 0
積分: 97
點名: 0
作業系統: xp
軟體版本: Office2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-24
最後登錄: 2023-12-24

3^#

發表於 2012-12-8 00:29 | 只看該作者

回復 2# GBKEE

  G大您好
  如果我想要我的表單以及表單內的按鈕、的Picture圖，在Excel關閉後再開啟，所有的Picture圖都還在
  請問要如何解決?

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

4^#

發表於 2012-12-8 08:24 | 只看該作者

回復 3# dafa
Picture 須是已存檔
是這樣嗎?

'Initialize 事件發生在一個物件載入後，但尚未顯示的時候。
Private Sub UserForm_Initialize() 'UserForm的預設事件
UserForm1.Picture = LoadPicture("D:\EX1.GIF")
CommandButton1.Picture = LoadPicture("D:\EX2.GIF")
'CommandButton2.Picture = LoadPicture("D:\EX3.GIF")
'CommandButton3.Picture = LoadPicture("D:\EX4.GIF")
End Sub

複製代碼

dafa

帖子: 49
主題: 6
精華: 0
積分: 97
點名: 0
作業系統: xp
軟體版本: Office2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-24
最後登錄: 2023-12-24

5^#

發表於 2012-12-8 20:46 | 只看該作者

回復 4# GBKEE

G大我也是用這個方法
但還是不行附上我拼裝的檔案看有沒有其他的方法
麻煩妳了

面積試算表.rar (79.5 KB)

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

6^#

發表於 2012-12-9 07:35 | 只看該作者

回復 5# dafa
按下表單按鈕執行 sub 植物() 讀取圖檔正常
可以啊,為何不行!!

dafa

帖子: 49
主題: 6
精華: 0
積分: 97
點名: 0
作業系統: xp
軟體版本: Office2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-24
最後登錄: 2023-12-24

7^#

發表於 2012-12-9 07:52 | 只看該作者

本帖最後由 dafa 於 2012-12-9 07:54 編輯

回復 6# GBKEE

很抱歉可能是我解釋的不清楚(不擅表達)
      我讀檔都OK但只要Excel關閉，在次打開Excel我在按鈕挑選的圖就都變不見了
      我想要我再次打開Excel時能保留所有上次在按鈕上挑的圖
                                                                  再麻煩您了...........乾恩喔 ^^||

c_c_lai

博士班 Rank: 6 Rank: 6

帖子: 2035
主題: 24
精華: 0
積分: 2031
點名: 0
作業系統: Win7
軟體版本: Office2010
閱讀權限: 100
性別: 男
註冊時間: 2012-3-22
最後登錄: 2024-2-1

8^#

發表於 2012-12-9 07:53 | 只看該作者

回復 6# GBKEE
回復 1# av8d
回復 5# dafa
GBKEE 版大，早安！
他們指的會是？

Private Sub Workbook_Open()
' For example purpose only.
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
' For example purpose only.
Me.Save
End Sub

複製代碼

帖子: 5923
主題: 13
精華: 1
積分: 5986
點名: 0
作業系統: win10
軟體版本: Office 2010
閱讀權限: 150
性別: 男
來自: 台灣基隆
註冊時間: 2010-5-1
最後登錄: 2022-1-23

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

9^#

發表於 2012-12-9 11:41 | 只看該作者

回復 7# dafa
為何要那麼多的CommandButton?用何邏輯建立?

dafa

帖子: 49
主題: 6
精華: 0
積分: 97
點名: 0
作業系統: xp
軟體版本: Office2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-24
最後登錄: 2023-12-24

10^#

發表於 2012-12-9 12:32 | 只看該作者

回復 9# GBKEE

我的目的是要依Userform做底圖CommandButton點時可以挑選某些特定圖檔來拚出底圖
CommandButton本身是一個一個貼上去的沒有跑程式
如果那麼多的CommandButton做到一半沒做完不能存檔會很困擾
我找了很久好像沒什麼方法可以存檔
好像除非把所有CommandButton對應儲存格再存入對應的檔名才能解決