Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 如何设置工作表名称=函数调用返回的名称_Excel_Vba - Fatal编程技术网

Excel 如何设置工作表名称=函数调用返回的名称

Excel 如何设置工作表名称=函数调用返回的名称,excel,vba,Excel,Vba,此代码可编译但不起作用: Dim wsLabel As String Dim ws As Worksheet wsLabel = paramToWriteWorksheet(paramLabel) Set ws = Sheets("wsLabel") 其中paramToWriteWorksheet返回一个字符串,该字符串是现有工作表的名称 我怎样才能让代码按照我的标题所说的去做呢?类似于: Sub qwerty() Dim wsLabel As String Dim ws As

此代码可编译但不起作用:

Dim wsLabel As String
Dim ws As Worksheet

wsLabel = paramToWriteWorksheet(paramLabel)
Set ws = Sheets("wsLabel")
其中paramToWriteWorksheet返回一个字符串,该字符串是现有工作表的名称

我怎样才能让代码按照我的标题所说的去做呢?

类似于:

Sub qwerty()
   Dim wsLabel As String
   Dim ws As Worksheet
   Set ws = ActiveSheet

   wsLabel = paramToWriteWorksheet(paramLabel)
   ws.Name = wsLabel
End Sub

删除引号。编辑:也许不是。。。您可能必须将引号与该变量连接起来。不走运,我试过你的密码了。现在,主函数触发循环引用警告,要求用户单击[确定],然后主函数的计算结果为0,这不是正确答案,可能是因为它没有指向所需的工作表。@Max**在修改此代码时,必须在
paramLabel
中输入一个值。我知道:paramLabel是传递给函数paramToWriteWorksheet的字符串,该函数返回另一个字符串,该字符串是要在主函数中使用的工作表的名称。