Excel怎么利用宏录制自动把输入的内容排到另一张表?
时间:2022-07-22 09:45:35
Excel怎么利用宏录制自动把输入的内容排到另一张表?我们在制作来访表的时候,需要将数据直接录入到另一张表格中,该怎么做呢?下面我们就来看看exce利用宏宏录制实现的方法,需要的朋友可以参考下
宏录制可以实现简单操作的自动化,减少人工成本。
1、制作来访登记总表的表头
2、制作来访登记表
3、根据需要设计数据有效性,如输入特定的文字,固定长短的数值等等。
4、公式-名称管理器,可以管理编辑表的名称。方便跨表引用。这里编辑表名称为“来访登记信息总表”。
5、输入公式=COUNT(来访登记信息总表[编号])+1,实现自动编号。
6、输入IF函数判断填写是否完整。=IF(AND(C5<>"",E5<>"",C6<>"",C7<>"",E7<>"",C8<>"",C9<>""),"信息填写完整","信息填写不完整"),<>表示单元格有数据,""表示单元格为空白。
7、开发工具-录制宏,更改名称。
8、在总表这里插入一行,回到登记表复制数据,一定要选择开始里面的复制和黏贴(选择黏贴为数值),不要使用快捷键!输入完后停止录制。
9、完成后,插入表单控件按钮,链接宏,即可。
10、下面使用IF函数编辑宏,判断表格是否完整才执行自动录入。开发工具-Visual Basic,打开宏代码编辑的窗口。
11、在开头,输入如下语句:If Range("B10").Text = "信息填写完整" Then
12、在结尾,输入:
Else
MsgBox "数据不完整不能输入到总表"
End If
13、信息填写不完整,点击自动录入按钮后,弹出窗口提示。
Excel字符串中多余的字符怎么去掉?
Excel无法不存提示工作簿未启用宏怎么办?
Excel2013表格怎么通过链接进行目录索引?
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
word文件丢失后如何恢复原有数据
在excel表格中如何使用vba修改指定列宽?
![](https://img.aspxhome.com/file/2023/5/41385_0s.jpg)
excel 使用power query快速合并同一工作簿的多个工作表
![](https://img.aspxhome.com/file/2023/5/a141045_0s.jpg)
如何在Excel2013中填充等差序列
![](https://img.aspxhome.com/file/2023/3/37063_0s.jpg)
Word 2013翻译功能的使用实例教程
![](https://img.aspxhome.com/file/2023/8/34058_0s.jpg)
excel 单元格批注的添加、格式设置和隐藏实现教程
![](https://img.aspxhome.com/file/2023/2/a141022_0s.jpg)
word 绘制组织结构图的流程与方法图解教程
![](https://img.aspxhome.com/file/2023/1/35771_0s.jpg)
Word 2007里面水平线的添加方法
![](https://img.aspxhome.com/file/2023/6/20586_0s.jpg)
Excel怎么判断偶数? excel判断偶数的技巧
![](https://img.aspxhome.com/file/2023/7/a141767_0s.jpg)
Word2007怎么合并字符使文档变小
![](https://img.aspxhome.com/file/2023/4/19694_0s.jpg)
Word中如何裁剪简历照片?Word中裁剪简历照片方法
![](https://img.aspxhome.com/file/2023/8/31388_0s.jpg)
word2010怎么为汉字注音
![](https://img.aspxhome.com/file/2023/8/19768_0s.png)
Word2013保存Normal模板前出现提示的方法
![](https://img.aspxhome.com/file/2023/8/20828_0s.jpg)
Word删除段落痕迹.字符的方法
![](https://img.aspxhome.com/file/2023/7/20707_0s.png)
Win10ipv4没有网络访问权限怎么办?Win10ipv4没有网络访问权限的解决方法
![](https://img.aspxhome.com/file/2023/8/52748_0s.jpg)
Excel打印怎么设置居中?
![](https://img.aspxhome.com/file/2023/7/36577_0s.png)
Win10专业版兼容模式要怎么设置?
![](https://img.aspxhome.com/file/2023/9/49549_0s.png)
Word 繁体艺术字的两种制作方法
![](https://img.aspxhome.com/file/2023/2/30242_0s.jpg)
怎么用Microsoft Toolkit工具激活Office 2013?
![](https://img.aspxhome.com/file/2023/9/15469_0s.jpg)
Win10无法安装 提示磁盘布局不受uefi固件支持怎么办?
![](https://img.aspxhome.com/file/2023/9/51039_0s.jpg)