Sub refresh() ActiveWorkbook.RefreshAllEnd Sub按钮： 开发工具-插入控件-按钮（右键控件-制定宏-选择refresh -确定）就可以了
这个刷新功能，其实就是去数据库重新读取一遍数据所以，你想实现此功能，就在代码中连接数据库，重新获取数据并覆盖原有数据就行
