註冊
登錄
首頁
論壇版規
禁止列表
說明
地圖
數位書香
私人消息 (0)
公共消息 (0)
論壇任務 (0)
系統消息 (0)
好友消息 (0)
帖子消息 (0)
麻辣家族討論版版
»
Excel程式區
» 無法隱藏
返回列表
下一主題
上一主題
發帖
無法隱藏
plyl
發短消息
加為好友
plyl
當前離線
UID
3910
帖子
9
主題
2
精華
0
積分
16
金錢
16
點名
0
作業系統
xp
軟體版本
2003
閱讀權限
10
性別
男
在線時間
17 小時
註冊時間
2011-3-20
最後登錄
2024-5-28
小學生
帖子
9
主題
2
精華
0
積分
16
點名
0
作業系統
xp
軟體版本
2003
閱讀權限
10
性別
男
註冊時間
2011-3-20
最後登錄
2024-5-28
1
#
跳轉到
»
倒序看帖
打印
字體大小:
t
T
發表於 2011-3-24 09:49
|
只看該作者
無法隱藏
Private Sub 隱_Click()
Dim STATUS As Integer
STATUS = 0
If 隱.Caption = "隱" Then Sheets("紀錄").Columns("E:BH").Hidden = True: STATUS = 1: 隱.Caption = "現"
If 隱.Caption = "現" And STATUS = 0 Then Sheets("紀錄").Columns("E:CC").Hidden = False: 隱.Caption = "隱"
End Sub
複製
代碼
Columns("E:BH"). 更改Columns("E:FN"). 就無法隱藏
收藏
分享
plyl
GBKEE
發短消息
加為好友
GBKEE
當前離線
UID
16
帖子
5923
主題
13
精華
1
積分
5986
金錢
5986
點名
0
作業系統
win10
軟體版本
Office 2010
閱讀權限
150
性別
男
來自
台灣基隆
在線時間
4811 小時
註冊時間
2010-5-1
最後登錄
2022-1-23
超級版主
帖子
5923
主題
13
精華
1
積分
5986
點名
0
作業系統
win10
軟體版本
Office 2010
閱讀權限
150
性別
男
來自
台灣基隆
註冊時間
2010-5-1
最後登錄
2022-1-23
2
#
發表於 2011-3-24 09:57
|
只看該作者
回復
1#
plyl
傳檔上來看看
TOP
plyl
發短消息
加為好友
plyl
當前離線
UID
3910
帖子
9
主題
2
精華
0
積分
16
金錢
16
點名
0
作業系統
xp
軟體版本
2003
閱讀權限
10
性別
男
在線時間
17 小時
註冊時間
2011-3-20
最後登錄
2024-5-28
小學生
帖子
9
主題
2
精華
0
積分
16
點名
0
作業系統
xp
軟體版本
2003
閱讀權限
10
性別
男
註冊時間
2011-3-20
最後登錄
2024-5-28
3
#
發表於 2011-3-24 10:43
|
只看該作者
GBKEE版主 辛苦您了!小弟由衷感謝
0324.rar
(42.1 KB)
下載次數:14
2011-3-24 10:42
plyl
TOP
GBKEE
發短消息
加為好友
GBKEE
當前離線
UID
16
帖子
5923
主題
13
精華
1
積分
5986
金錢
5986
點名
0
作業系統
win10
軟體版本
Office 2010
閱讀權限
150
性別
男
來自
台灣基隆
在線時間
4811 小時
註冊時間
2010-5-1
最後登錄
2022-1-23
超級版主
帖子
5923
主題
13
精華
1
積分
5986
點名
0
作業系統
win10
軟體版本
Office 2010
閱讀權限
150
性別
男
來自
台灣基隆
註冊時間
2010-5-1
最後登錄
2022-1-23
4
#
發表於 2011-3-24 11:43
|
只看該作者
回復
3#
plyl
你檔案中的注解問題,我不知道原因為何會引起, 隱藏欄的錯誤.
尚需高手來解釋原因
.執行下列程式刪除注解後可正常了.
Sub Ex()
Dim S As Object
For Each S In Sheets("紀錄").Shapes
If S.Name <> "隱" And S.Name <> "隱" Then S.Delete
Next
End Sub
複製代碼
TOP
GBKEE
發短消息
加為好友
GBKEE
當前離線
UID
16
帖子
5923
主題
13
精華
1
積分
5986
金錢
5986
點名
0
作業系統
win10
軟體版本
Office 2010
閱讀權限
150
性別
男
來自
台灣基隆
在線時間
4811 小時
註冊時間
2010-5-1
最後登錄
2022-1-23
超級版主
帖子
5923
主題
13
精華
1
積分
5986
點名
0
作業系統
win10
軟體版本
Office 2010
閱讀權限
150
性別
男
來自
台灣基隆
註冊時間
2010-5-1
最後登錄
2022-1-23
5
#
發表於 2011-3-24 12:03
|
只看該作者
本帖最後由 GBKEE 於 2011-3-24 12:28 編輯
樓主的問題 : 加入註解 隱藏欄有時 會有 [
無法將物件移出工作表外
] 的錯誤 ,為何會如此?
一般是在檔案的最右端 或最底端 輸入文字 防止插入 整欄或整列 .
TOP
oobird
發短消息
加為好友
oobird
當前離線
街友一族
UID
17
帖子
1572
主題
16
精華
2
積分
1521
金錢
1521
點名
0
作業系統
xp
軟體版本
office 2003
閱讀權限
150
性別
男
在線時間
832 小時
註冊時間
2010-5-1
最後登錄
2016-1-13
頭銜:
街友一族
超級版主
帖子
1572
主題
16
精華
2
積分
1521
點名
0
作業系統
xp
軟體版本
office 2003
閱讀權限
150
性別
男
註冊時間
2010-5-1
最後登錄
2016-1-13
6
#
發表於 2011-3-24 13:10
|
只看該作者
以前有過相同困擾
註解物件都要設為大小位置隨儲存格而變就行了
http://support.microsoft.com/kb/211769/zh-tw
TOP
plyl
發短消息
加為好友
plyl
當前離線
UID
3910
帖子
9
主題
2
精華
0
積分
16
金錢
16
點名
0
作業系統
xp
軟體版本
2003
閱讀權限
10
性別
男
在線時間
17 小時
註冊時間
2011-3-20
最後登錄
2024-5-28
小學生
帖子
9
主題
2
精華
0
積分
16
點名
0
作業系統
xp
軟體版本
2003
閱讀權限
10
性別
男
註冊時間
2011-3-20
最後登錄
2024-5-28
7
#
發表於 2011-3-24 14:47
|
只看該作者
將儲存格的註解 ->按顯示註解->將指標移到物件的邊緣,直到指標變成周圍有四個小黑色箭頭->快按兩下->進入註解格式->摘要資訊索引標籤->按一下 [大小位置隨儲存格而變],然後按一下 [確定]。
以上問題就解決了
oobird & GBKEE版主 辛苦您了!小弟由衷感謝
plyl
TOP
靜思自在 :
【時間成就一切】時間可以造就人格,可以成就事業,也可以儲積功德。
返回列表
下一主題
上一主題
一般電腦軟體討論
EXCEL專屬討論區
Excelㄧ般區
Excel程式區
進階應用專區
OFFICE 系列
Word
PowerPoint
Access
Office不分區
程式語言
VB 與 VB.Net
C 與 C#
Java 與 J#
程式設計不分區
資料庫
ORACLE
My SQL
MS SQL
網頁設計
ASP 與 ASP.NET
PHP
PHP+MySQL 入門實作
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
網頁設計不分區
電腦與作業系統
電腦各種硬體討論
一般電腦軟體討論
論壇事務
管理公告
投訴反映
新手測試
愛 ‧ 生活
公益佈告欄
生活與感動
[收藏此主題]
[關注此主題的新回復]
[通過 QQ、MSN 分享給朋友]
申請友情鏈接
Facebook粉絲