afu9240

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2019-5-3 15:43 | 只看該作者

EXCEL要如何只隱藏了A欄而不被取消隱藏

各位高手好~

想請問VBA有辦法只隱藏A欄,並且無法取消A欄的方式嗎"取消隱藏是反白的~~~~??求協助~~謝謝

樓主熱帖

yvonne

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兔年全勤獎章

2^#

發表於 2019-5-4 10:18 | 只看該作者

回復 1# afu9240

要的是應該是這個指令 ,與你的圖片是不通一個指令
自己將下面的程式碼帶入你的檔案VBA 中

Option Explicit
Sub Ex()
Dim B As CommandBarButton
' Column取消隱藏ID 887
Set B = CommandBars.FindControl(ID:=887)
B.Enabled = False '取消隱藏不可使用
'= True '取消隱藏可使用
End Sub

複製代碼

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

TOP

afu9240

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

3^#

發表於 2019-5-6 13:12 | 只看該作者

回復 2# GBKEE

感謝版主~~謝謝*10000

yvonne

TOP

afu9240

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

4^#

發表於 2019-5-6 14:31 | 只看該作者

回復 2# GBKEE

G大您好

感謝提供Code,想請教一下檔案關閉後再重新打開就可以重新取消隱藏,,,,,試問code有辦法都無法"取消隱藏嗎??" 感謝~~

yvonne

TOP

PKKO

　暱稱: PKKO

高中生 Rank: 3 Rank: 3

帖子: 549
主題: 152
精華: 0
積分: 691
點名: 0
作業系統: WIN7
軟體版本: OFFICE 2010
閱讀權限: 50
性別: 男
註冊時間: 2013-8-10
最後登錄: 2022-9-7

論壇榮譽勳章論壇贊助勳章

5^#

發表於 2019-5-6 15:30 | 只看該作者

回復 4# afu9240

超版大大的方式應該是針對電腦的
檔案傳給別台電腦就一樣可以解開了

比較簡單的用保護分頁的方式上鎖即可無法解開

但實際上您就會遇到別的問題
如果將該分頁全部複製貼到別的EXCEL 分頁就可以解開了....

所以比較好的作法是不放欄位的資料在該分頁上
將該資料放到別的分頁然後用veryhide屬性隱藏分頁
當您要用該資料的時候,再透過比對的方式將資料找出就好

PKKO

TOP

afu9240

中學生 Rank: 2

帖子: 164
主題: 45
精華: 0
積分: 211
點名: 0
作業系統: 微軟
軟體版本: win10
閱讀權限: 20
性別: 女
註冊時間: 2017-8-28
最後登錄: 2022-8-5

6^#

發表於 2019-5-6 17:14 | 只看該作者

回復 5# PKKO

了解~感謝P大的回覆~~~~

yvonne

TOP