17、探索 VBA 中 API 调用的强大功能

探索 VBA 中 API 调用的强大功能

1. API 调用概述

API 调用通常是返回某种类型值的函数，有时也会同时执行一些操作，还有仅执行操作的子程序。使用 API 调用时，首先要声明想使用的函数或子程序，这也是最困难的部分。 Declare 语句用于在动态链接库（DLL）文件中设置函数或子程序的描述，它会说明使用哪个 DLL、函数或子程序的名称以及要传递的参数。声明过程较为复杂，一旦出错，调用将无法正常工作，甚至可能导致系统崩溃。所以在进行 API 调用前，务必保存好文件，因为 API 调用在出错时容错性较差，可能需要重启计算机，从而丢失未保存的数据。

2. 使用 API 调用获取磁盘空间

• 声明函数 ：在模块的声明部分（模块页面顶部）添加以下声明语句：

Private Declare Function GetDiskFreeSpaceEx Lib "kernel32"  _
Alias "GetDiskFreeSpaceExA" (ByVal lpDirectoryName As  _
String, lpFreeBytesAvailableToCaller As Currency,  _
lpTotalNumberOfBytes As Currency, lpTotalNumberOfFreeBytes  _
As Currency) As Long

该语句设置了对 Windows 系统目录下 kernel32.dll 的引用，明确