Excel表格:通过VBA添加超链接时,超链接将添加到表中的所有行

g52tjvyc  于 2023-03-13  发布在  其他
关注(0)|答案(1)|浏览(130)

当我将超链接添加到表中时,超链接会在列中的所有行单元格中重复。

url = "https://example.com/s/" & Sheets("config").Range("B9").Value & "/users/" & ws_import.Cells(i, ExportUsers.eUser_ID).Value
    
' this works
ws_user.Cells(x, DisableUsers.eName).Value = ws_import.Cells(i, ExportUsers.eUser_Name).Value ' Name

' repeat hyperlink in all rows cells  of the column

ws_user.Cells(x, DisableUsers.eName).Formula = "=HYPERLINK(""" & url & """, """ & ws_import.Cells(i, ExportUsers.eUser_Name).Value & """)"

没有table,它工作得很完美
有什么想法吗?

nqwrtyyt

nqwrtyyt1#

尝试在添加公式之前添加以下内容:

Application.AutoCorrect.AutoFillFormulasInLists = False

它应该阻止表格自动填充公式。
请确保在使用输入公式后启用此功能

Application.AutoCorrect.AutoFillFormulasInLists = True

相关问题