我正在尝试将文本包装在超链接单元格中,但无法使其正常工作。我收到“对象不支持此属性”错误。我意识到格式不正确,但找不到正确的语法。如果您有指向网站或建议的链接,我们将不胜感激。谢谢!
With wbk.Sheets(1)
Set rngResults = .Range("A" & .Rows.Count).End(xlUp).Offset(1, 0)
bingo = fld.Path & "\" & fl.Name
ActiveSheet.Hyperlinks.Add Anchor:=rngResults, Address:=bingo, SubAddress:=aCell.Address, TextToDisplay:=strJackpot
.WrapText = True
End With