发文章
发文工具
撰写
网文摘手
文档
视频
思维导图
随笔
相册
原创同步助手
其他工具
图片转文字
文件清理
AI助手
留言交流
有朋友发来问题:
首先,我们来看看他的这句话一共有几个点?
1
如何实现A1选择不同表名?
2
如何点打印预览显示被选择表名的预览?
3
如何在关闭后,回到原始位置?
首先,我们来看第一个问题:
这个在往期的已经分享过了,通过数据验证的序列来完成下拉菜单效果。
传送门:《为单元格添加下拉菜单 》
然后,我们来看第二个问题:
我们已经获取了,想要打印预览的工作表名,我们只需要创建按钮,并且把打印预览的代码关联到按钮上即可。
代码
Sheets(CStr(Sheets("Sheet1").Range("A1"))).Select
上面代码分为三个,分开写也可以的
分别是
Sheets("XXX").Select → 工作表的选择,
CStr(XXX) → 强制转化成字符串,
Sheets("Sheet1").Range("A1") → 单元格的选择。
ActiveWorkbook.ActiveSheet.PrintPreview
把活动工作表打印预览
最后,我们来看第三个问题:
回到A1单元格就可以了
Sheets("Sheet1").Range("A1").Select
来自: asaser > 《2017(70)》
0条评论
发表
请遵守用户 评论公约
如何将多个电子表格中的内容快速合并到一个工作表中?
range对象Resize属性
range对象Resize属性。练习1:1Sub Resize单元格返回区域()2 Range(''''''''A1'''''''').Resize(1, 3).Select''''...
EXCEL中怎样用VBA实现打开时自动清空某一列或多列中的数据?
EXCEL中怎样用VBA实现打开时自动清空某一列或多列中的数据?在EXCEL工作簿中的工作表名字处右击,然后查看代码,然后粘贴该代码,以上代码将执行:打开该工作表时自动清除C到D列的内容(单列的话只打一...
VBA--选择符合条件数据并复制到新的工作表
VBA--选择符合条件数据并复制到新的工作表。有朋友问了我这样一个问题:在一个数据区域中,根据某列下拉箭头选择状态为“完成”的数据,...
如何遍历多工作表多条件筛选,并将筛选结果存放在新工作表中
如何遍历多工作表多条件筛选,并将筛选结果存放在新工作表中Sub TTL()Dim Sh As Worksheet, SQL$, m%Application.á¹û'''''''' Then m = m + 1 ...
Range对象应用大全(1)
[应用10]在单元格区域内指定特定的单元格可以使用Item属性,例如:(1)Range(“A1:B10″).Item(5,3)指定单元格C5,这个单元格处于以区...
Excel VBA常用技巧之 使用Activate方法选定单元格区域
Excel VBA常用技巧之 使用Activate方法选定单元格区域。使当前工作表成为活动工作表,还可以使用Activate方法选定单元格或单元格区域,如下面的代码所示。RngActivate过程使用Activate方法选定Sheet3中...
Excel VBA入门经典案例 选择和激活单元格的3个技巧
Excel VBA入门经典案例 选择和激活单元格的3个技巧本技巧的目的:仿手工操作EXCEL时选择单元格的方法。本技巧的目的:仿手工操作EXCEL时...
Excel判断颜色
微信扫码,在手机上查看选中内容