在IXLWorksheet中向IXLCell添加工具提示

Question

在IXLWorksheet中將工具提示添加到IXLCell的語法是什麼？ 我想這種做法，但它不工作..........

Dim xlDoc As New XLWorkbook() 
    xlDoc.AddWorksheet(filename) 
    Dim xlWS As IXLWorksheet = xlDoc.Worksheets(0) 
    xlWS.Range("A1", "I177").Style.Font.SetFontName("Arial") 
    xlWS.Range("A1", "I177").Style.Font.SetFontSize(10) 
    xlWS.Range("A1", "I177").Style.Fill.BackgroundColor = XLColor.FromArgb(253, 233, 217) 
    xlWS.Protect().SetSelectLockedCells(False) 
    Dim rowInt As Integer = 5 
    While rowInt <= 177 
     xlWS.Rows(rowInt).Height = 14.25 
     xlWS.Rows(rowInt).Style.Alignment.SetVertical(XLAlignmentVerticalValues.Center) 
     rowInt = rowInt + 1 
    End While 


xlWS.Cell("H30").Hyperlink.Tooltip = "Tooltip text string goes here" 

Answer 1

這工作，但可能有做它像包裹的評論框的大小，而不是一個更優雅的方式手動設置尺寸

xlWS.Cell("H30").Comment.Style.Size.SetHeight(50) 
    xlWS.Cell("H30").Comment.Style.Size.SetWidth(50) 
    xlWS.Cell("H30").Comment.AddText("Tooltip text 1") 
    xlWS.Cell("H30").Comment.AddNewLine() 
    xlWS.Cell("H30").Comment.AddNewLine() 
    xlWS.Cell("H30").Comment.AddText("Tooltip text 2").Bold = True