我可以添加一个计算值在VBA悬停鼠标移至细胞?

我在想是否有可能VBA来计算,然后把这些信息,这样当我在一个细胞,我看到这些信息。 细胞本身会举行不同的值…

例如:

 .Cells.Value = Round((ds.Cells(x, 57).Value _
                / ds.Cells(x, 40).Value) * 100, 0) & "% (" _
                & ds.Cells(x, 57).Value & "/" & ds.Cells(x, 40).Value & ")"
            .Cells(ltaLR + 1, "K").Value = Round((ds.Cells(x, 71).Value _
                / ds.Cells(x, 41).Value) * 100, 0) & "% (" _
                & ds.Cells(x, 71).Value & "/" & ds.Cells(x, 41).Value & ")"

我可以把这段代码在两个吗

& ds.Cells(x, 71).Value & "/" & ds.Cells(x, 41).Value

添加到鼠标悬停?