Excel 如何添加选择打印的窗体控件 excel如何设置一个按钮,点击后出对话框可以选择打印不连续...
excel\u4e2d\u5982\u4f55\u5b9e\u73b0\u7a97\u4f53\u9009\u62e9\u6027\u6253\u5370\u6211\u6709\u4e2a\u7b28\u65b9\u6cd5\uff0c\u70b9\u51fb\u6253\u5370\u6309\u94ae\u540e\uff0c\u4e0d\u662f\u76f4\u63a5\u6253\u5370\uff0c\u800c\u662f\u5f39\u51fa\u53e6\u4e00\u4e2a\u7a97\u4f53\uff0c
\u5728\u7a97\u4f53\u7684UserForm_Initialize()\u4e2d\uff0c\u628a\u60f3\u6253\u5370\u7684\u5185\u5bb9\u590d\u5236\u5728\u7b2c\u4e8c\u4e2a\u7a97\u4f53\u4e0a\uff0c
\u5728\u7a97\u4f53\u7684UserForm_Activate()\u4e2d\uff0c\u5199\u4e0a\uff1a
PrintForm
Unload Me
\u7b2c\u4e8c\u4e2a\u7a97\u4f53\u57fa\u672c\u770b\u4e0d\u89c1\uff0c\u5c31\u50cf\u6309\u6253\u5370\u6309\u94ae\u540e\u76f4\u63a5\u6253\u5370\u4e0a\u6837\u3002
Private Sub CommandButton1_Click() Dim I As Long, J As Long Dim Ar, Br Dim S As String If OptionButton1.Value = True Then For I = 3 To Sheets.Count Sheets(I).PrintOut Next Else S = TextBox1.Text If InStr(S, ",") = 0 Then Sheets(Val(S) + 2).PrintOut Else Ar = Split(S, ",") For I = 0 To UBound(Ar) If InStr(Ar(I), "-") = 0 Then Sheets(Val(Ar(I)) + 2).PrintOut Else Br = Split(Ar(I), "-") For J = Br(0) To Br(1) Sheets(J + 2).PrintOut Next End If Next End If End IfEnd SubPrivate Sub CommandButton2_Click() EndEnd Sub\u7a97\u4f53\u6807\u9898\uff0c\u4f60\u70b9\u4e0b\u7a97\u4f53\u7a7a\u767d\u7684\u5730\u65b9\uff0c\u7136\u540e\u5de6\u8fb9\u5c5e\u6027\u91cc\u9762\u627e\u5230 caption \u5c31\u53ef\u4ee5\u4e86\uff0c\u8ddf\u5176\u4ed6\u63a7\u4ef6\u4e00\u6837\u7684\u3002
1.在菜单栏上右击,在弹出的菜单中选择“窗体”,将弹出“窗体”浮动工具栏,单击“组合框”控件。
2.将光标放到表格中,这时光标变成细黑十字形,在表格中画一个组合框。
3.右击组合框,在弹出的菜单中选择“设置控件格式”。
在“设置控件格式”对话框中选择“控制”选项卡,设置“数据源”区域为“'1月工资'!$B$3:$B$14”(或“姓名”),设置“单元格链接”为$J$1,。单击“确定”回到表格中,按ESC键或在任一单元格单击一下取消组合框的编辑状态。这样设置以后,我们在下拉列表中选择一个姓名后,在J1单元格中将出现该姓名在姓名列表中的相对位置。例如我们选择第3个姓名“王霞”,J1单元格中返回数值3。
4
4.在数据区C3:H14中用VLOOKUP函数对工资数据进行关联,利用工资表中的序号数字返回工资数据,方法同上。
扩展阅读:怎么缩印在一张a4上 ... 打印时不打印隐藏区域 ... excel如何生成1-1 1-2 ... 一张表格被分成了两页打印 ... 打印怎么选择打印范围 ... 多个工作簿统一设置打印 ... excel选定区域打印 ... 打印怎么自适应大小 ... excel如何设置蓝色打印线 ...