VBA Simple Public Sub调用公共函数

Question

我正在寻找这个简单的函数，它只存在于调用另一个函数（它简化了我的代码过程）。它给了我错误信息：

  

编译错误：

     

参数不是可选的

以下是代码（我已经处理了大约2-3周）：

Public Sub Function32or16Bit()
Call Function4_ArrangeData1
End Sub

Function4_ArrangeData1的第一行：

Public Sub Function4_ArrangeData1(ByRef pathAndFileName As String)

Dim sourceBook As Workbook
Dim isCellValueNull As Boolean
Dim DataRange As Variant
On Error GoTo ErrorHandler

DataRange = Range(A1, Z200)

Answer 1

你的Function4_ArrangeData1 Sub要求你传入一个字符串。

更改您的通话，将路径和文件名包含为文字＆＃34; C：\ Temp \ Temp.tmp＆＃34;或字符串变量。

或者通过在ByRef前面输入OPTIONAL来使参数可选。

或从Public Sub Function4_ArrangeData1（）

中删除参数