//利用easyexcel实现用某个模板的多sheet页写入不同类的查询结果,以下的data()众方法是获取数据用的,仅为举例 ExcelWriter excelWriter = null; try { String templateFileName = "D:\\360安全浏览器下载\\m31f01_job_pack_demo\\job_define.xlsm"; String fileName = "D:\\360安全浏览器下载\\m31f01_job_pack_demo\\test1.xlsm"; //1、指…

2021年4月13日 0条评论 4点热度 阅读全文

打开excel就能看到数据库查询结果,而且能定时自动完成查询并更新数据,想要实现么?跟着这些步骤操作起来: 1、打开excel中的vb 表单名称->右键->查看代码                                                 &nb…

2021年2月26日 0条评论 12点热度 阅读全文

打开excel就能看到数据库查询结果,而且能定时自动完成查询并更新数据,想要实现么?跟着这些步骤操作起来: 1、打开excel中的vb 表单名称->右键->查看代码                                                 &nb…

2021年2月26日 0条评论 20点热度 阅读全文

先看看界面 首页 数据库 已售数据库 信息录入 功能介绍:       根据录入的商品信息,查询是否过期。盘存后点击过期日期,将已售罄商品信息保存到已售数据库中并删除数据库中信息。 代码: ThisWorkbook Private Sub Workbook_BeforeClose(Cancel As Boolean) Call clear_Click ActiveWorkbook.Save End Sub UserForm1 Private Sub btn_tj_Click() App…

2021年2月25日 0条评论 13点热度 阅读全文

先看看界面 首页 数据库 已售数据库 信息录入 功能介绍:       根据录入的商品信息,查询是否过期。盘存后点击过期日期,将已售罄商品信息保存到已售数据库中并删除数据库中信息。 代码: ThisWorkbook Private Sub Workbook_BeforeClose(Cancel As Boolean) Call clear_Click ActiveWorkbook.Save End Sub UserForm1 Private Sub btn_tj_Click() App…

2021年2月25日 0条评论 18点热度 阅读全文

问题:如何将Excel表格快速导入到PowerDesigner呢? Excel快速导入PowerDesigner 有很多小伙伴不知道Excel表格怎样快速导入到PowerDesigner,总是一个个的手敲键盘,耗费了大量的人力和浪费了很多的时间,今天就来教教大家如何操作吧!有用就支持一下噢@ Excel表格快速导入到PowerDesigner步骤 将Excel按如下操作整理 打开PowerDesigner→创建一个新的工作空间 运行 脚本 ,快捷键ctrl+shift+X,也可以按下图操作 然后再更改 脚本中Exc…

2021年2月22日 0条评论 22点热度 阅读全文

问题:如何将Excel表格快速导入到PowerDesigner呢? Excel快速导入PowerDesigner 有很多小伙伴不知道Excel表格怎样快速导入到PowerDesigner,总是一个个的手敲键盘,耗费了大量的人力和浪费了很多的时间,今天就来教教大家如何操作吧!有用就支持一下噢@ Excel表格快速导入到PowerDesigner步骤 将Excel按如下操作整理 打开PowerDesigner→创建一个新的工作空间 运行 脚本 ,快捷键ctrl+shift+X,也可以按下图操作 然后再更改 脚本中Exc…

2021年2月22日 0条评论 62点热度 阅读全文

数据源,如图1-1所示 如图1-2所示,通过几种方式去重后得到的效果,具体代码请看后面代码 1.借助辅助项去重 Sub 借助辅助列去重() Range("a2:a21").Copy [D1] '将[a2:a21]数据复制粘贴到D列 [D:D].RemoveDuplicates Columns:=1 '对D列数据请将去重操作 End Sub 2.使用数组方式直接去重 Sub 数组去重() On Error Resume Next Dim arr1() arr = Range("A2:A21") ReDim arr1(…

2021年2月20日 0条评论 15点热度 阅读全文

数据源,如图1-1所示 如图1-2所示,通过几种方式去重后得到的效果,具体代码请看后面代码 1.借助辅助项去重 Sub 借助辅助列去重() Range("a2:a21").Copy [D1] '将[a2:a21]数据复制粘贴到D列 [D:D].RemoveDuplicates Columns:=1 '对D列数据请将去重操作 End Sub 2.使用数组方式直接去重 Sub 数组去重() On Error Resume Next Dim arr1() arr = Range("A2:A21") ReDim arr1(…

2021年2月20日 0条评论 23点热度 阅读全文

数据-分列 这时会打开“文本分列向导”对话框,点击选择其中的“固定列宽”选项。 连续点击“下一步”按钮。 当出现“第三步”页面时,点击选择下图箭头所指的“文本”选项。 然后点击“完成”按钮。 点击“完成”按钮后,之前选择的所有单元格的左上角就都出现了表示文本格式的绿色小三角,不用再一个个单元格的去双击鼠标了。 这种方法只适合同一列单元格的格式转换,如果是同一行的单元格,可以考虑用选择性粘贴转置的方法把行转换成列,再进行格式转换,转换完成后再用选择性粘贴转置的方法把列转换回行,这样在转换的单元格比较多时还是比一个一个…

2021年2月19日 0条评论 13点热度 阅读全文