返回列表 上一主題 發帖

[發問] VBA 選取鎖定的儲存格指令

julianwic

帖子
9 
主題
2 
精華
0 
積分
17 
點名
0  
作業系統
WIN7 
軟體版本
2010 
閱讀權限
10 
性別
男 
來自
台中市 
註冊時間
2015-9-22 
最後登錄
2023-10-15 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-1-8 09:43 | 只看該作者

[發問] VBA 選取鎖定的儲存格指令

請問各位大大，在 EXCEL 裡面設定保護工作表，要讓使用者無法選取鎖定的儲存格，但要能選取未鎖定的儲存格，請問這條指令要如何設定呢？
我用巨集錄製一直試不出來，麻煩請各位大大幫忙一下，謝謝。

保護工作表.png (15.93 KB)

保護工作表.png

收藏 分享

GBKEE

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

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
2#
發表於 2016-1-10 07:13 | 只看該作者
回復 1# julianwic
  1. Option Explicit
  2. Sub Ex()
  3.     With ActiveSheet  '作用中的工作表
  4.         .Unprotect
  5.         .Range("A1:B10").Locked = False
  6.         .Protect  'DrawingObjects:=True, Contents:=True, Scenarios:=True
  7.         .EnableSelection = xlUnlockedCells  '工作表上,沒上鎖儲存格可選
  8.        '.EnableSelection = xlNoSelection    '工作表上的儲存格不可選的
  9.        '.EnableSelection = xlNoRestrictions '不限制
  10.     End With
  11. End Sub
複製代碼
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

kaui700

帖子
28 
主題
7 
精華
0 
積分
68 
點名
0  
作業系統
win7 
軟體版本
office2010 
閱讀權限
20 
註冊時間
2015-12-10 
最後登錄
2020-3-21 
3#
發表於 2016-1-10 19:56 | 只看該作者
謝謝GBKEE版主的教學，請問GBKEE版主所使用VBA函數代號有哪邊可以找到相關的教學資料嗎？因為對於我們這些新手來講，有很多好用的函數我們都不知道，所以想請您指點一下我們可以到哪邊找到那些函數資料?

TOP

julianwic

帖子
9 
主題
2 
精華
0 
積分
17 
點名
0  
作業系統
WIN7 
軟體版本
2010 
閱讀權限
10 
性別
男 
來自
台中市 
註冊時間
2015-9-22 
最後登錄
2023-10-15 
4#
發表於 2016-1-11 09:39 | 只看該作者
謝謝版主的解答，問題已經解決了，十分感激

TOP

        靜思自在 : 君子如水，隨方就圓，無處不自在。
返回列表 上一主題