提取函数，返回提取到的值

path：文件路径
file:文件名
sheet：工作表名
ref：需要读取的目标单元格

Private Function GetValue(path, file, sheet, ref)'   从未打开的Excel文件中检索数据Dim arg As String'   确保该文件存在If Right(path, 1) <> "" Then path = path & ""If Dir(path & file) = "" ThenGetValue = "File Not Found"Exit FunctionEnd If'   创建变量arg = "'" & path & "[" & file & "]" & sheet & "'!" & Range(ref).Range("A1").Address(, , xlR1C1)'   执行XLM 宏GetValue = ExecuteExcel4Macro(arg)
End Function

使用示例

比如需要读取的文件为D:\Test\data.xlsx，
工作表名为Sheet1，
读取D9单元格的内容：

读取后存放到本表的C7单元格中

'注意不要漏掉最后的  \
path = "D:\Test\
file = "data.xlsx"
sheet = "Sheet1"
address = "D9"Cells(7, "C") = GetValue(path, file, sheet, address)

Excel（WPS）使用VBA，不打开文件情况下提取其他工作簿数据相关推荐

Excel VBA实例教程 #051：不打开工作簿取得其他工作簿数据
在Excel的使用过程中,经常需要引用其他工作簿的数据,而用户往往希望能在不打开工作簿或看似不打开工作簿的情况下取得其他工作簿中的数据,有以下几种方法可以实现. 1.使用公式如果需要引用的数据不是太 ...
java读取rvt文件数据_在不打开Rvt文件情况下读取rvt 里的信息
https://blog.csdn.net/The_Eyes/article/details/52328305 在Revit中插件中可以在后台打开rvt文件,并且访问他的数据,但是这个数据读取时依赖于 ...
oracle自动恢复数据库文件,只有数据文件情况下恢复Oracle数据库
只有数据文件情况下恢复数据库 1,创建几个表,进行 log switch SQL> create table t9 as select * from dba_tables; Table crea ...
批量打开文件夹下的所有文件
一眨眼的功夫,就可以批量打开某个文件夹下的所有Excel文件,省时省力且不会漏掉,如何做到呢?请看绝招: # -*- coding: utf-8 -*- __author__ = 'ouyangmin ...
cassss服务未启动_Mysql无法启动情况下，如何恢复数据呢？
本文适用于,mysql无法启动,但数据文件未丢失的情况. Mysql因意外情况,导致无法启动,数据库未做备份的情况下,如何将数据迁移至其他数据库中. 原数据库地址:192.168.1.100(以下简称 ...
Android 无 EditText 情况下接受扫码枪扫描数据
2019年04月12日更新,根据评论区反馈,可能不是很好用(但是我当时用的时候就是这么实现的),可以选择性尝试 Android 无 EditText 情况下接受扫码枪扫描数据简单无脑! 去下载个 J ...
VBA 汇总指定文件夹下的Excel文件数据
案列:现需要按条件汇总一个文件夹下的多个Excel文件中的某列数据到汇总表格中,文件夹中的所有Excel文件都是基于一个模板,只是数据不同. 所有的Excel文件结构: 库存组织:XXX 货主类型:X ...
【Android 内存优化】Android 工程中使用 libjpeg-turbo 压缩图片 ( 初始化压缩对象 | 打开文件 | 设置压缩参数 | 写入压缩图像数据 | 完成压缩 | 释放资源 )
文章目录一.使用 libjpeg-turbo 压缩图片流程二.初始化 JPEG 压缩对象三.打开文件四.设置压缩参数五.开始压缩六.循环写入压缩数据七.完成图片压缩及收尾八.libjp ...
matlab对多个矩阵循环,MATLAB：在不使用循环的情况下提取矩阵的多个部分
有许多方法可以在没有循环的情况下完成此操作.大多数解决方案涉及将向量x和y扩展为更大的索引矩阵,并且可能使用函数 REPMAT, BSXFUN或 SUB2IND中的一个或多个.可以在 here找到用于 ...

Excel（WPS）使用VBA，不打开文件情况下提取其他工作簿数据

Excel（WPS）使用VBA，不打开文件情况下提取其他工作簿数据

提取函数，返回提取到的值

使用示例

Excel（WPS）使用VBA，不打开文件情况下提取其他工作簿数据相关推荐

最新文章

热门文章