返回顶部
位置:首页 > 脚本专栏  > VBA>
用vba实现将记录集输出到Excel模板

用vba实现将记录集输出到Excel模板

佚名 2018-01-16

复制代码 代码如下:
'************************************************
'**函数名称:ExportTempletToExcel
'**函数功能:将记录集输出到Excel模板
'**参数说明:
查看详情
当编辑框内容改变 对应的单元格也随着改变vba代码

当编辑框内容改变 对应的单元格也随着改变vba代码

佚名 2018-01-16

当编辑框内容改变,对应的单元格也随着改变


复制代码 代码如下:

Private Sub TextBox1_Change()

ThisWorkbook.ActiveSheet.Range("J1") = TextBox1.Text

End
查看详情
向数据报表添加一个合计字段

向数据报表添加一个合计字段

佚名 2018-01-16

因此,一个合计字段与 Function 控件相似,因为两者都是在报表生成时计算。但是有一些不同点:Function 控件只能被放置在分组注脚中,而一个合计字段可以被放置在数据报表设
查看详情
VBA解决Windows空当接龙的617局

VBA解决Windows空当接龙的617局

佚名 2018-01-16

Windows的自带游戏空当接龙,其中第617局是比较难解的,需要尝试的次数比较多,而且经常忘记解法和步骤。
原本希望使用AutoIt或AutoHotkey、AAuto一类的工具,写一段自动化
查看详情
VBA将excel数据表生成JSON文件

VBA将excel数据表生成JSON文件

佚名 2018-01-16

ADODB.Stream创建UTF-8+BOM编码的文本文件。
然后遍历数据区,格式化数据,输出即可。
小数据还行,大数据没测试。
另,使用fso创建的文本文件编码为ANSI,ajax解析json
查看详情
vba 获取PPT幻灯片中的所有标题的代码

vba 获取PPT幻灯片中的所有标题的代码

佚名 2018-01-16

复制代码 代码如下:

Private Sub CommandButton1_Click()

Me.Enabled = False

getTitles

Me.Enabled = True

End Sub





Sub getTitles()

On Err
查看详情
VBA 编程基础

VBA 编程基础

佚名 2018-01-16

11.3.1 了解 Visual Basic 语法

本节解释最常见的语法元素。

11.3.1.1 Activate 方法的语法

语法:object.Activate

在 Activate 方法的语法中,object 是一个所
查看详情
VBA 浏览文件夹对话框调用的几种方法

VBA 浏览文件夹对话框调用的几种方法

佚名 2018-01-16

1、使用API方法


复制代码 代码如下:

'【类型声明】

Private Type BROWSEINFO

hWndOwner As Long

pIDLRoot As Long

pszDisplayName As Long

lpszTit
查看详情