返回列表 上一主題 發帖

[發問] 防止在資料編輯列上顯示公式除原本office內鍵隱隱藏外，還有其他方式嗎?

准提部林

帖子
2839 
主題
10 
精華
0 
積分
2895 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2025-2-15 
1# 跳轉到 »
發表於 2016-10-30 11:11 | 顯示全部帖子
執行匯入時, 解除工作表保護, 匯入完成後, 重新鎖定
Sheet("???").UnProtect
匯入web
Sheet("???").Protect

TOP

准提部林

帖子
2839 
主題
10 
精華
0 
積分
2895 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2025-2-15 
2#
發表於 2016-10-30 20:06 | 顯示全部帖子
回復 3# klor


Sub Macro1()
With ActiveSheet
　　　.Unprotect
　　　.QueryTables(1).Refresh BackgroundQuery:=False
　　　.Protect
End With
End Sub

TOP

准提部林

帖子
2839 
主題
10 
精華
0 
積分
2895 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2025-2-15 
3#
發表於 2016-10-30 23:11 | 顯示全部帖子
將"股市新聞"的參數自動更新取消, 改用Sheet_Change:
測試_P_1.rar (61.19 KB)

TOP

准提部林

帖子
2839 
主題
10 
精華
0 
積分
2895 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2025-2-15 
4#
發表於 2016-10-30 23:22 | 顯示全部帖子
防止因代碼輸入錯誤, 而產生公式被改變,
將兩個查詢都改為手動更新(利用change更新)
更新後將公式重新植入一次:
測試_P_2.rar (61.99 KB)

TOP

        靜思自在 : 人生不一定球球是好球，但是有歷練的強打者，隨時都可以揮棒。
返回列表 上一主題