Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/sql/68.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

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/28.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
Sql Hyperlink-给出运行时错误5“;无效的过程调用或参数”;_Sql_Excel_Vba - Fatal编程技术网

Sql Hyperlink-给出运行时错误5“;无效的过程调用或参数”;

Sql Hyperlink-给出运行时错误5“;无效的过程调用或参数”;,sql,excel,vba,Sql,Excel,Vba,我试图在excel工作表中选择文件夹中的某个位置以调用所有文件并使用超链接时遇到问题,但这是我在以下代码中遇到的错误: Sub Y_ADD_HYPERLINK_AMBETTER() Range("A4").Select Selection.End(xlDown).Select z = ActiveCell.Row a = 2 Do Until a = z + 1 Range

我试图在excel工作表中选择文件夹中的某个位置以调用所有文件并使用超链接时遇到问题,但这是我在以下代码中遇到的错误:

 Sub Y_ADD_HYPERLINK_AMBETTER()
    
     Range("A4").Select
     Selection.End(xlDown).Select
     z = ActiveCell.Row
     a = 2
     
      Do Until a = z + 1
      
       Range("A" & a).Select
       Selection.Hyperlinks.Delete
       c = Range("A" & a).Value
       ' COMBINE PATH NAME IN CELL P & a
       'Range("P" & a) = "..\MOLINA%20-%20AGENTS%20COMMISSIONS%202017\MOLINA%20AGENTS%20COMMISSIONS\"
       Range("P" & a) = "..\AMB%20-%20AGENTS%20COMMISSIONS%202020\"
       Range("P" & a).Select
       ActiveCell.FormulaR1C1 = ActiveCell.Formula & c & ".xlsx"
       Path = Range("P" & a).Value
       ' GO TO HYPERLINK CELL
       Range("A" & a).Select
       ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Path, TextToDisplay:=c

activecell有公式吗<代码>范围(“P”&a)是否要将“c”添加到
范围(“P”&a)
的值中?当出现错误时,需要解释哪一行出错。