首页  »   VBA
【VBA研究】怎么将单元格数据赋给数组
【VBA研究】如何将单元格数据赋给数组作者:iamlaosong 将工作表中的数据赋给数组或者将数组的数据赋给工作表,一般有两种,一种是循环的方法,一个一个的传,这种方法一般用于需要对每个数据特别处理的场合,另一种是一次性用赋值语句传,就速度来说,第二种方法要快得多。看下面例程: Sub tt()
【VBA研究】怎么在if中判断一个值为null的变量
【VBA研究】如何在if中判断一个值为null的变量作者:iamlaosong 做一个工具要求用户先在列表框中选择,然后再做相应的操作,如果未做选择,要给出提示,调试中发现,取列表框的值,假如未做选择,此时值为null(空),对其进行常规的判
关于WORD引用 EXCEL数据的VBA 代码有关问题
关于WORD引用 EXCEL数据的VBA 代码问题Public Sub 取excel数据() Dim i As Integer '代表行号 Dim j As Inte
VBA word插入图片位置解决方法
VBA word插入图片位置如下代码,向打开word文档中每页固定位置插入相同图片: Sub TestInsertPic()     Dim bRet As Boolean   &n
sd加强中的xvbap yvbap vbap
sd增强中的xvbap yvbap vbapsd增强中的xvbap yvbap vbap内表存放不同的值(ser-exit:FORM USEREXIT_SAVE_DOCUMENT) 创建订单时: XVBAP  -->   存放当前所有的item,内容为新值 YVB
怎么将EXCEL文件转换成utf8编码的csv文件
如何将EXCEL文件转换成utf8编码的csv文件现在遇到了一个比较麻烦的问题,始终没找到很好的解决方法。   需要把EXCEL文件转换成utf8编码的csv文件。  现在是这样处理的:  第一步,用Excel创建文件,另存为 
表1是名单,表2是更大的名单并有成绩,怎么快速将成绩复制到表1
表1是名单,表2是更大的名单并有成绩,如何快速将成绩复制到表1?表1是一份名单。 表2是一张更大的名单,并且有每个人的各科成绩。 因为表1和表2都十分庞大(表1数千行,表2过万行),如果我用for和if语句(如下),可以做到,可是速度很慢,有什么办法可以更快速吗? for i =&
VBA第二课 复制,取舍与删除
VBA第二课 复制,选择与删除Sub 选择方法() Range("a1:a10").Select '因为没有写工作表名,则默认为活动工作表 End Sub Sub 复制方法() Sheet1.Range("a1:a10")
VBA第三课 恒量与变量
VBA第三课 常量与变量Sub 常量() Const pi = 3.1415926 End Sub Sub 变量() Dim a As Integer a = 100 a = 200 End Sub Sub 应用() Const pi = 3.1415926 '常量 a = 200
怎么将一个数据库查询到的记录添加到另一个数据库中
怎样将一个数据库查询到的记录添加到另一个数据库中Private Sub CommandButton2_Click() Dim Conn1 As New ADODB.Connection Dim Conn2 
关于怎么格式化一个十六进制数成为类似0xAA的形式
关于如何格式化一个十六进制数成为类似0xAA的形式我尝试如下方法 num=9 stringNum=Format(Hex(a),"00") 当num=9时 ,stringNum可以得到我想要的结果 "09" 但是num=10的是hoiu,stringNum
【VBA研究】使用ADO的两种模式
【VBA研究】使用ADO的两种方式作者:iamlaosong 1、引用法      引用ADO相关组件:打开VBA编辑器,在菜单中点选“工具”--》“引用”。确保“Microsoft ActiviteX Data Objects 2.8 Li
怎么在VC中操纵PPT,生成表格,文字等
如何在VC中操纵PPT,生成表格,文字等?如何在VC中操纵PPT,在生成的PPT中动态生成表格,并用字符串填充,百度了没? http://www.baidu.com/s?ie=utf-8&bs=vba%E7%9A%84dll&f=8&rsv_bp=1&am
【VBA研究】利用DateAdd函数取上月或去年同期的日期
【VBA研究】利用DateAdd函数取上月或上年同期的日期作者:iamlaosong      DateAdd函数返回一个日期,这一日期加上了一个时间间隔。通过这个函数可以计算很多我们需要的日期,比如上月上年同期日期等
Excel VBA将全部Sheet重命名为单元格a1的名称
Excel VBA将所有Sheet重命名为单元格a1的名称 Sub RenameSheet() Dim i As Integer For i = 1 To Sheets.Count Sheets(i).Name = Sheets(i).Range("A1").Va
使用EXCEL宏打开 .CSV文件解决方案
使用EXCEL宏打开 .CSV文件最近玩EXCEL宏,遇到几个问题,还请大神们解惑赐教一下,非常感谢! 问题: 1.EXCEL宏打开 .CSV文件用什么语句? 2.已写的EXCEL宏在第一次运行时,在打开其他excel读数据的时
VBA学习笔记(五)-几个有用的例子
VBA学习笔记(5)-几个有用的例子显示当前page size: Application.ActiveDocument.Name Application.ActiveDocument.PaperSize Application.ActiveDoc
VSTO 开发outlook插件,找寻关闭事件
VSTO 开发outlook插件,寻找关闭事件    private void ThisAddIn_Startup(object sender, System.EventArgs e)
pageoffice for .net 怎么保留Word的修改痕迹以及怎么给Word末尾的下一页写内容
pageoffice for .net 如何保留Word的修改痕迹以及如何给Word末尾的下一页写内容本帖最后由 jupiterax 于 2014-11-09 13:44:08 编辑 1、用pageoff
大神请看超级奇葩有关问题
大神请看超级奇葩问题大神请看超级奇葩问题: 这个XLS文件,将最后一张工作表中字体的粗体去掉后,保存,再打开会自动恢复。 如果将其字体设置为“微软雅黑,12号,常规”,保存再打开,则更奇葩…… 求解释,求真相,求解决! 文件地址:http://pan.baidu.com/s/1kT
上一页 2/74 下一页