lzth.net
当前位置:首页 >> 如何通过OutLook 用VBA引用已经打开的EXCEL表格中的单元格 >>

如何通过OutLook 用VBA引用已经打开的EXCEL表格中的单元格

建议换个方式你可以在excelvba里面编程, 调用outlook发送邮件即可以前做过,现在东西找不到了,资料直接baidu就可以了

必须vba吗? 其实利用word的邮件合并功能,点点鼠标可以完成你说的以excel文件为数据源,每行生成一个邮件到outlook中发送.将上述过程录制成宏,就是你要的vba代码(可能在录制完成后需要做一些必要的调整或修改).

多到论坛逛逛.http://club.excelhome.net

Workbooks("C:\Documents and Settings\Administrator\桌面\黄石成美自施\K01(总的部分)\K0101第一册\K0101ml.xls").openworkbooks(1).sheets("sheet1").cells(1,1).value=Workbooks("K0101ml.xls").sheets("sheet1").cells(1,1).valueworkbooks("K0101ml.xls").close你可以自己改改,也可以用循环来实现多个单元格引用

Dim xlApp as Objectset xlapp = CreateObject("Excel.Application")'注意这里必须确认“某工作簿”已经打开,否则下面的代码依然会出错!'通常情况下我会这么做:Dim wb as objectFor wb in xlapp.Workbooks if wb.name = "某工作不.xls"

Public Function InsertToTransact(strUID As String, strText As String, strTran As String, strSpecial As String) As Boolean Dim cnn As ADODB.Connection Dim rst As ADODB.Recordset Dim strAccess As String strAccess = "D:\VBA Work\

我自己做的模块 很好用的'ModExcelPublic ExcelApp As Excel.ApplicationPublic ExcelBook As Excel.WorkbookPublic ExcelSheet As Excel.WorksheetPublic IsOpen As Integer'取值Public Function GetExcelKey(r As Long, c As Long) As String

用加载宏可以.如果是独立的vb程序得要知道打开的Workbook的名字

工具:microsoft office excel 2007 办公软件 步骤: 1、打开microsoft office excel 2007 办公软件,击 “开始” ->“excel 选项”. 2、选择“常规”选项卡,并在右侧点选“在功能区显示'开发工具'选项卡”,并单击“确定". 3、在单元格a

在a.xls中新建一个模块,复制下面代码进去,b.xls与a.xls放在同一文件夹中,置于要什么颜色,你自己改数字就得 还有一样要切记,把分给我!!不要那句的话,直接省略它就可以了 Sub 合并单元格() Dim myPath$, myFile$, ak As Workbook

网站首页 | 网站地图
All rights reserved Powered by www.lzth.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com