excel如何隐藏vba按钮

1.如何显示和隐藏VBA控件中的按钮?

问题1:

cbmWYPD.Visible = True '显示按钮

cbmWYPD.Visible=False '隐藏按钮

不过建议你用一个按钮不同Caption属性来控制，没必要用两个按钮控件来做

比如用cbmWYPD按钮

cbmWYPD按钮的Caption属性 可以在写书籍状态的label时写入

Private Sub cbmWYPD_Click()

if cbmWYPD.Caption="我要排队" then

你要执行的操作

end if

if cbmWYPD.Caption="我要借阅" then

你要执行的操作

end if

end sub

问题2:

说明：工作表的range("A:A").value 是一个多维数组要赋值给你一个空的cbSJMC.List要转换成一个1维的数组，所以用WorksheetFunction.Transpose转置一下把他变成一维）

cbSJMC.List=WorksheetFunction.Transpose(Sheets（"辅助页"）.Range("A:A").Value)

2.如何用VBA代码自动设置EXCEL工作表格式

给你一个子程序 给出了三个条件，1、将光标处的行高设置为60 2、设置字体为楷体 3、经字体加粗

Sub Macro1()

'

Selection.RowHeight = 60 '设置行高

With Selection.Font

.Name = "楷体_GB2312" '设置字体

.Size = 12

End With

Selection.Font.Bold = True '将字体加粗

End Sub

3.请教EXCEL高手,有列表的筛选按钮是怎么制作的

你说的这个不叫筛选，叫下拉框，做下拉框有两种办法，一种就是通过 “数据-有效性-序列” 的方法来设置，这种方法设置下拉框简单，你选中这个单元格后点“数据-有效性”就能看到。另一种是用宏，这种方法复杂但功能强大。只能ALT+F11去看源代码才能知道是怎么处理的。

关于你的公式，理解很容易，整体是一个IF函数，你可以这样理解，IF（如果）

$C$5单元格是空值（ISBLANK($C$5)），则函数返回空值（""，）否则就运行VLOOKUP函数.

关于VLOOKUP函数，你百度一下有很多，简单讲就是在XX表中查找到与$C$5相匹配的值并返回对应行中相关值（比如你写的公式返回的是对应行中第2(row(A2)列的值，B列为第一列），公式中ROW(A2)是一个相对引用，等同于2.猜你那个公式下面两个单元格中就会是ROW(A3)、ROW(A4)吧，其实就等同于3和4，那么XX表中的布局应该就是从B列到F列分别是业体、电话、传真、联系人这样排列。还有什么不明白的可以留言。关于XX表应该是在同一个工作薄中，如果看不到可以试一下 格式-工作薄-取消隐藏，如果没有的话就是在VBA中隐藏掉了。