vba里面没有split函数，有没有类似的函数呢

topirol

比如：filenames() = Split(cd.FileName, vbNullChar)

subtlation

有split函数的

Split函数

描述

返回一个下标从零开始的一维数组，它包含指定数目的子字符串。 语法

Split(expression[, delimiter[, limit[, compare]]])

Split函数语法有如下命名参数：

部分	描述
expression	必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串("")，Split则返回一个空数组，即没有元素和数据的数组。
delimiter	可选的。用于标识子字符串边界的字符串字符。如果忽略，则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串，则返回的数组仅包含一个元素，即完整的 expression字符串。
limit	可选的。要返回的子字符串数，–1表示返回所有的子字符串。
compare	可选的。数字值，表示判别子字符串时使用的比较方式。关于其值，请参阅“设置值”部分。

设置值

compare参数的设置值如下：

常数	值	描述
vbUseCompareOption	–1	用Option Compare语句中的设置值执行比较。
vbBinaryCompare	0	执行二进制比较。
vbTextCompare	1	执行文字比较。
vbDatabaseCompare	2	仅用于Microsoft Access。基于您的数据库的信息执行比较。

topirol

奇怪我在VBA里面编译不通过，表示Split没有定义

efan2000

跟版本有关系，在R2000的VBA是5.0的不支持。而在R2002以上的VBA是6.0的，就支持了。

mccad

如果是R2000版，可以在实用函数栏目中找到该自定义函数