Re: [算表] 點選某欄後, 可以將隱藏的欄打開.(VBA)
請用看看囉
1.Alt+F11
2.左邊視窗點選 Sheet1(Sheet1)
3.右邊視窗貼上以下程式
4.關閉程式視窗即可
Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim cell As Range
For Each cell In Target
If cell.Row = 1 And cell.Column = 1 Then
Columns("B:C").EntireColumn.Hidden = True
End If
If cell.Row = 1 And cell.Column = 4 Then
Columns("B:C").EntireColumn.Hidden = False
End If
Next cell
End Sub
※ 引述《lka (生命總會找到出路)》之銘言：
: 軟體: excel
: 版本: 2003
: 是否可以做到, 點選某一cell後, 隱藏的欄被打開..
: 詳細說明: 將A1,B1,C1用合併儲存格的功能合在一起, 之後將B,C兩欄隱藏,
: 如果現在點選到A1時, 能否將B,C兩欄從隱藏變成打開的狀態..
: (看起來好像要用VBA, 有另外的解法嗎? 另外VBA我還沒仔細想,
: 一定做得到嗎? 另外進階的是, 點選別個cell (例如: D1)
: B,C就又把它們隱藏起來.. 這題目看起來好像有點大..
: THX.. 各位大大..
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.131.84.79
推
05/07 19:46, , 1F
05/07 19:46, 1F
→
05/07 21:14, , 2F
05/07 21:14, 2F
Office 近期熱門文章
PTT數位生活區 即時熱門文章
