[英]Populate Excel MsgBox with last row cell value
我试图产生一个消息框,用户可以从中复制文本。 此消息框应包含两个最后一行的单元格值,如下所示:
-MsgBox-
'First Value: xxxx'
'Second Value: xxxx'
我有以下vba来查找最后一个单元号:
Dim Lastrow As String
Lastrow = sumsht.Cells(Rows.Count, 1).End(xlUp).Row
我想将最后一个单元格S和T值输出到一个消息框,用户可以从中复制文本。 下面的内容是不正确的,尽管它使您了解我正在尝试做的事情。
MsgBox.Range(("S" & Lastrow), ("T" & Lastrow))
编辑:我应该提到我的最后一个'T'单元格包含一个公式。 我试图用公式产生的值填充框。
EDIT2:这与这个问题不同,因为我希望用户能够实际从框中选择文本。 我也无法解释如何在我的上下文中实际创建输入框(对不起,我是初学者)。
尝试如下:
Dim Lastrow As String
Lastrow = sumsht.Cells(Rows.Count, 1).End(xlUp).Row
Call MsgBox("First Value: " & sumsht.Range("S" & Lastrow) & vbNewLine & "Second Value: " & sumsht.Range("T" & Lastrow))
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.