Question

怎么用excel中的VBA来控制一个按钮

我有一个表格，上面做了个按钮，我想单击一次按钮表格自动隐藏A列，第二次单击隐藏B列，第三次单击隐藏C列，第四次··········。每单击一次隐藏一列。怎么做到！

Answer 1

建一个按钮，然后把下面代码复制进去

Public s, s1 As Integer

Private Sub CommandButton1_Click()
    s = 97
    s = s + s1
    Range(Chr(s) & ":" & Chr(s)).EntireColumn.Hidden = True
    s1 = s1 + 1
End Sub

 这样每单击一次就会按A、B、C、D。。。的顺序隐藏列。（已测试成功）

Answer 2

只隐藏？之前隐藏的列是否显示出来？例如你第一次点击后A列隐藏了，第二次点击后B列隐藏，那A列是否在B列隐藏后显示出来？

Answer 3

弄个按钮，粘贴代码
Sub Macro2()
For k = 1 To 20
a = Chr(65 + c)
Range(a & ":" & a).Select
If Selection.EntireColumn.Hidden = True Then
c = c + 1
Else
Selection.EntireColumn.Hidden = True
Exit For
End If
Next
End Sub

Answer 4

你这个属于vba的高级应用