vb默认参数传递想必都是比较想知道,关于vb中过程参数默认的传递方式这类的话题一直是大家很想去了解的,让小编为你揭秘案吧!


【分享成果,正能量欢喜】寒冷的中心春天依然明媚,温暖又凉爽,随缘而欢喜,遇见就好,遇见就是福,不遇见也好,遇见就是喜悦,不见面也是一种快乐。

《VBA的Excel应用》非常经典。这是我推出的第七套教程。它定位于初级水平,目前是第一次修订。这套教程从简单的宏录制开始,一直到表单的搭建,内容丰富,实例多。您可以轻松掌握相关知识。这套教程共三册,十七章。都是我们在使用EXCEL过程中需要掌握的知识点。希望您能够掌握并运用它们。今天讲解的内容是《VBAEXCEL应用》第三章Dir函数在循环提取中的应用

第五节循环提取目录中的所有文件

大家好,上一讲我们讲了如何提取打开的工作簿的名称以及工作簿中所有工作表的名称,那么如何提取某个目录文件夹下的所有文件以及提取所有工作表的名称呢?同时处理文件的工作表呢绒?在本次讲座中,我们将学习Dir函数和DoWhile循环,并再次向您展示对象的层次结构。

1循环提取目录下所有文件的实际场景分析

当前路径下有一个名为“extractedfiles”的文件夹,该文件夹下有几个文件,如下图

我们需要提取其中的EXCEL文件,并提取每个文件的名称以及每个文件的所有工作表名称并回填到当前工作表中。

2提取文件夹中文件的VBA代码思路分析

为了提取文件夹中的Excel文件以及每个文件的工作表名称,我们需要在文件夹中创建一个循环,获取循环中每个文件的文件名,然后打开文件,最后使用中的方法上一节获取文件的工作表名称。

获得上述信息后,即可将信息回填到工作表中。

这里需要提取的是Excel类型的文件,所以我们在提取文件的时候要注意文件类型。同时,为了提高程序的运行效率,我们可以关闭电脑的屏幕刷新功能。下面我们将一步步讲解上述想法的实现过程。

3Dir函数解释

我们首先看一个函数Dir函数,它返回一个字符串,表示与指定模式或文件属性或驱动器卷标匹配的文件、目录或文件夹的名称。

语法

目录[路径名,[属性]]

范围

1)路径名是可选的。指定文件名的字符串表达式,可以包括目录或文件夹和驱动器。如果未找到路径名,则返回零长度字符串34;

2)属性是可选的。以及指定文件属性的常量或数值表达式。如果省略,则返回与路径名匹配但没有属性的文件。

属性参数设置为

常数值说明

vbNormal0指定没有属性的文件。

vbReadOnly1指定只读文件和没有属性的文件。

vbHidden2指定隐藏文件和没有属性的文件。

vbSystem4指定系统文件以及没有属性的文件。在Macintosh上不可用。

vbVolume8指定卷标;如果指定了任何其他属性,则忽略vbVolume。在Macintosh上不可用。

vbDirectory16指定不带属性的目录或文件夹和文件。

vbAlias64指定文件名作为别名。仅适用于Macintosh。

在MicrosoftWindows中,Dir支持多字符和单字符通配符来指定多个文件。在Macintosh上,这些字符被视为有效的文件名字符,不能用作指定多个文件的通配符。由于Macintosh不支持通配符,因此请使用文件类型来标识文件组。您可以使用MacID函数指定文件类型而不是文件名。

第一次调用Dir函数时必须指定路径名,否则会发生错误。如果还指定了文件属性,则必须包含路径名。

Dir返回第一个与路径名匹配的文件名。要获取与路径名匹配的任何其他文件名,请调用不带参数的Dir。Dir将返回零长度字符串34;当没有更多匹配的文件名时。返回零长度字符串后,必须在后续调用中指定路径名,否则会发生错误。

可以更改为新的路径名,而无需检索与当前路径名匹配的所有文件名。但是,Dir函数不能递归调用。使用vbDirectory属性调用Dir不会连续返回子目录。

在ExcelforMac2016中,初始Dir函数调用将成功。但是,后续调用迭代指定目录将导致错误。不幸的是,这是一个已知的错误。

[待续]

参考本讲程序文件练习册03xlsm

我20年的VBA成果都在以下信息中

【分享成果,欢乐正能量】生活不如意的时候,就是上天赐予的长假。这个时候,你应该好好享受假期。当有一天假期突然结束时,时间就会转动,生活才真正开始。


广大网友都想知道的关于vb默认参数传递和vb中过程参数默认的传递方式的相关内容,本文已为大家解完毕,谢谢各位的支持!

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。