返回列表 上一主題 發帖

無法隱藏

plyl

帖子
9 
主題
2 
精華
0 
積分
16 
點名
0  
作業系統
xp 
軟體版本
2003 
閱讀權限
10 
性別
男 
註冊時間
2011-3-20 
最後登錄
2024-5-28 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-3-24 09:49 | 顯示全部帖子

無法隱藏

  1. Private Sub 隱_Click()
  2. Dim STATUS As Integer  
  3. STATUS = 0            
  4. If 隱.Caption = "隱" Then Sheets("紀錄").Columns("E:BH").Hidden = True: STATUS = 1: 隱.Caption = "現"
  5. If 隱.Caption = "現" And STATUS = 0 Then Sheets("紀錄").Columns("E:CC").Hidden = False: 隱.Caption = "隱"
  6. End Sub
複製代碼
Columns("E:BH"). 更改Columns("E:FN"). 就無法隱藏
收藏 分享
plyl

plyl

帖子
9 
主題
2 
精華
0 
積分
16 
點名
0  
作業系統
xp 
軟體版本
2003 
閱讀權限
10 
性別
男 
註冊時間
2011-3-20 
最後登錄
2024-5-28 
2#
發表於 2011-3-24 10:43 | 顯示全部帖子
GBKEE版主 辛苦您了!小弟由衷感謝

0324.rar (42.1 KB)

plyl

TOP

plyl

帖子
9 
主題
2 
精華
0 
積分
16 
點名
0  
作業系統
xp 
軟體版本
2003 
閱讀權限
10 
性別
男 
註冊時間
2011-3-20 
最後登錄
2024-5-28 
3#
發表於 2011-3-24 14:47 | 顯示全部帖子
將儲存格的註解  ->按顯示註解->將指標移到物件的邊緣，直到指標變成周圍有四個小黑色箭頭->快按兩下->進入註解格式->摘要資訊索引標籤->按一下 [大小位置隨儲存格而變]，然後按一下 [確定]。
以上問題就解決了

oobird  & GBKEE版主 辛苦您了!小弟由衷感謝
plyl

TOP

        靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候，卻被這種隨心所欲的自由蒙蔽，虛擲時光而毫無覺知。
返回列表 上一主題