2

我正在尝试将文本包装在超链接单元格中,但无法使其正常工作。我收到“对象不支持此属性”错误。我意识到格式不正确,但找不到正确的语法。如果您有指向网站或建议的链接,我们将不胜感激。谢谢!

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
4

1 回答 1

2

WrapText与范围一起使用,而不是超链接或工作表,因此您需要完全限定它。

将行更改.WrapText = True为以下内容以使其工作:

rngResults.WrapText = True
于 2013-03-15T13:08:30.153 回答