在单元格中显示消息框值

Question

VBA新手。所以发布这个问题：

要求：我想在单元格中显示我的消息框值。

例如：

以下是我的代码：

Sub Button1_Click()

    MsgBox "value of a cell is" & Worksheets("Sheet1").Range("A1")

End Sub

当我点击按钮时，它显示单元格A1的值，如下所示

但我希望消息框中的值显示在任何单元格上。

让我们说我希望“细胞的价值是45”，以便在其他一些细胞上显示。

先谢谢。

Answer 1

而不是

MsgBox "value of a cell is" & Worksheets("Sheet1").Range("A1")

使用

Worksheets("Sheet1").Range("E1") = "value of a cell is " & Worksheets("Sheet1").Range("A1")

将Cell E1更改为您想要的单元格。

Answer 2

我必须同意@Mrig 你告诉msgbox要显示什么，就像告诉单元格显示什么一样。

Sub Button1_Click()
    Dim rng As Range, s As String, x As String
    Set rng = Range("A1")
    s = "value of a cell is "
    x = s & rng.Value

    MsgBox x
    Range("B3") = x
End Sub