帖子: 214
主題: 74
精華: 0
積分: 296
點名: 0
作業系統: win7
軟體版本: office2007
閱讀權限: 20
性別: 男
來自: hk
註冊時間: 2013-6-17
最後登錄: 2018-11-3

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2018-8-17 21:25 | 只看該作者

public 變量的值可以維持多久?

標準模組宣告public X,標準模組一個巨集"Macro1"里給X賦值X=123.
就是不知道,x=123這個值,維持到什麼時候呢?

樓主熱帖

lmh

mhl9mhl9

中學生 Rank: 2

帖子: 214
主題: 74
精華: 0
積分: 296
點名: 0
作業系統: win7
軟體版本: office2007
閱讀權限: 20
性別: 男
來自: hk
註冊時間: 2013-6-17
最後登錄: 2018-11-3

2^#

發表於 2018-8-17 22:56 | 只看該作者

標準模組宣告public X,標準模組一個巨集"Macro1"里給X賦值X=123.
就是不知道,x=123這個值,維持到什麼時候呢 ...
mhl9mhl9 發表於 2018-8-17 21:25

我為什麼會發問這個奇怪的問題?公用變數"public X"和局部變數"static X",只要不關閉這個文件,X會始終保持它的值.
但我測試多次偶然,X="",測試結果是:工作簿里任何程序出錯,你選擇"退出程序",導致X="".
有問各位大大,我的理解對不對?

lmh

TOP

jackyq

中學生 Rank: 2

帖子: 319
主題: 6
精華: 0
積分: 309
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2024-4-27

3^#

發表於 2018-8-17 22:59 | 只看該作者

任何觸使 VBA Code 重新被編譯的動作 , x 值就會消失

或檔案被關閉

TOP

jackyq

中學生 Rank: 2

帖子: 319
主題: 6
精華: 0
積分: 309
點名: 0
作業系統: xp
軟體版本: 2k
閱讀權限: 20
性別: 男
註冊時間: 2015-6-24
最後登錄: 2024-4-27

4^#

發表於 2018-8-17 23:03 | 只看該作者

回復 2# mhl9mhl9
yes

TOP

mhl9mhl9

中學生 Rank: 2

帖子: 214
主題: 74
精華: 0
積分: 296
點名: 0
作業系統: win7
軟體版本: office2007
閱讀權限: 20
性別: 男
來自: hk
註冊時間: 2013-6-17
最後登錄: 2018-11-3

5^#

發表於 2018-8-17 23:36 | 只看該作者

標準模組宣告public X,標準模組一個巨集"Macro1"里給X賦值X=123.
就是不知道,x=123這個值,維持到什麼時候呢 ...
mhl9mhl9 發表於 2018-8-17 21:25

我為什麼會發問這個奇怪的問題?公用變數"public X"和局部變數"static X",只要不關閉這個文件,X會始終保持它的值.
但我測試多次偶然,X="",測試結果是:工作簿里任何程序出錯,你選擇"退出程序",導致X="".
有問各位大大,我的理解對不對?
做文件,常常會需要某個變量維持一個固定的值,如 public X,又如static X,又如property get X,一旦X被賦值,文件不關閉,X值始終會保持.
但有例外,就是文件里任何程式出錯,你又沒有處理"除錯",結果上述變量X就變成"空值",導致需要X值的程序都報錯!
我現在想到的解決方法(1)用on error goto linex,讓程式跳過錯誤就end sub,這樣做X值會保持(2)在on error goto linex後面重新給X賦值.
有問各位大大,我的理解對不對?
文件做了不少,上述情況今天才發覺,難怪文件莫名其妙報錯,原來原因之一就在這兒.

lmh

TOP

GBKEE

超級版主 Rank: 8 Rank: 8

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

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

6^#

發表於 2018-8-18 08:21 | 只看該作者

回復 5# mhl9mhl9

測試多次偶然,X="",測試結果是:工作簿里任何程序出錯,你選擇"退出程序",導致X="".

附上檔案看看程式碼.
可試試定義名稱,檔案關閉後指定的值還是存在.

Option Explicit
Private Sub Workbook_Open()
Dim N, Msg As Boolean
For Each N In Names
If N.Name = "Gbkee" Then Msg = True: Exit For
Next
If Msg = False Then Names.Add "Gbkee", Date, False
EX
End Sub
Sub EX()
MsgBox CDate([gbkee])
End Sub

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

TOP

Scott090

高中生 Rank: 3 Rank: 3

帖子: 519
主題: 54
精華: 0
積分: 595
點名: 251
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2024-11-17

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章 2015羊年全勤獎章

7^#

發表於 2018-8-19 06:27 | 只看該作者

回復 5# mhl9mhl9

我用過2種方式去給一個需要保存賦值的變數：
1. 如 GBKEE大大的方式設定定義名稱
2. 既然是在 EXCEL 內使用，就在可能不會用到的遠處儲存格記起來

TOP

stillfish00

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

8^#

發表於 2018-8-20 16:59 | 只看該作者

本帖最後由 stillfish00 於 2018-8-20 17:05 編輯

回復 2# mhl9mhl9
static 是靜態變數，跟局部變數又是不一樣的。

公用變數Public X 的值設定後會維持到甚麼時候?
就我所知除了關閉excel外，下面任一種都會將公用變數清除:
1. code 中有執行到 End
2. 按了重新設定這按鈕
擷取1.PNG

3. 偵測到錯誤時按了結束

除了定義名稱，若你要賦予變數的值是不需要改變的，可以改用常數
如 Public Const X=123

表達不清、題意不明確、沒附檔案格式、沒有討論問題的態度~~~~~~以上愛莫能助。

TOP