Sub InsertToDataBase() Dim DataPath As String Dim SQL As String Const DataName As String = "yunying.mdb" Const TableName As String = "关键词效果分析" DataPat... ...
分类：
数据库 时间：
2017-07-07 21:36:38
阅读次数：
190
Sub NextSeven_CodeFrame() '应用程序设置 Application.ScreenUpdating = False Application.DisplayAlerts = False Application.Calculation = xlCalculationManual '... ...
分类：
编程语言 时间：
2017-07-07 21:21:27
阅读次数：
184
背景最近遇到一个事，一朋友是做会计的，经常要用到excel。最近反馈：说excel不能跨工作薄引用，但是跨工作表引用正常的。分析：这种情况一般是程序安装不完整，或者说安装的简化版本缺少组件。后来经过沟通知道朋友电脑的系统是ghostwin7,安装的是ghost里集成的office2007。记..
分类：
其他好文 时间：
2017-07-07 19:58:34
阅读次数：
160
Openpyxl 创建一个工作簿下面是创建一个工作簿。而每个工作簿至少一个工作表我们可以通过active获取正在运行的工作表。In [1]: from openpyxl import WorkbookIn [2]: wb = Workbook()In [3]: ws = wb.activeIn [4... ...
分类：
编程语言 时间：
2017-07-07 19:54:32
阅读次数：
236
Mac 系统自带右键功能键比较少，可以添加服务来拓展功能项。例如 Windows 系统右键可以新建 Word 文档，Excel 工作表等，Mac 默认没有，需要进行设置添加。 首先 F4 键进入 Launchpad，选择其他，如下图，选择 Automator 选择新建文稿后进入下面界面： 选择新建服 ...
分类：
系统相关 时间：
2017-07-05 18:53:59
阅读次数：
731
1、数据库创建用户 参考博客：使用Oracle SQLDeveloper连接数据库并创建用户 参考博客：Oracle数据库-建库、建表空间，建用户 2、表空间 查看表空间 参考博客：oracle入门很简单：七、oracle表空间 创建表空间 删除表空间 3、工作表中数据操作，需要提交 ...
分类：
数据库 时间：
2017-06-29 15:19:55
阅读次数：
200
这段代码可以自动更新数据透视表。由于工作中平均一个小时数据源数据就会改变，每天点击8下刷新也很烦。要是能自动刷新就好了。 括号里的BOOK这个表名，就是透视表所在的表名。这个表名怎么获得，不是下边的工作表名，而是从这里获得： 点击透视表区域，在菜单栏点击 选项卡 菜单，如图： 默认名称是“数据透视表 ...
分类：
其他好文 时间：
2017-06-27 16:25:43
阅读次数：
146
1，xlrd xlrd是用来从Excel中读写数据的，但我平常只用它进行读操作，写操作会遇到些问题。用xlrd进行读取比较方便，流程和平常手动操作Excel一样，打开工作簿(Workbook)，选择工作表(sheets)，然后操作单元格(cell)。 2，xlwt 如果说xlrd不是一个单纯的Rea ...
分类：
编程语言 时间：
2017-06-26 00:42:33
阅读次数：
297
Private Sub CommandButton1_Click() ' If IsDate(TextBox1.Text) = False Then ' MsgBox "请输入日期！" ' Exit Sub ' End If If 类别 = "" Or 维修部件 = "" Or 部门 = "" Or ...
分类：
编程语言 时间：
2017-06-19 10:02:26
阅读次数：
324
1、打开Excel2010，点击“数据”选项卡，然后在最左边的“获取外部数据”菜单中选择“自文本”选项，在“导入文本文件”窗口中选择需要导入的文件。如图： 2、打开“文本导入向导-步骤之1(共3步)”对话框中并选择“分隔符号”选项。点击“下一步”。 3、打开“文本导入向导-步骤之2”对话框，并添加分 ...
分类：
其他好文 时间：
2017-06-18 00:00:28
阅读次数：
187
