如何在通过 refedit 选择范围后更新用户表单标签
How to update a userform label once range selected via refedit
我有一个带有 2 个 refedit 框的用户表单。它们都允许用户 select 一个单元格。我在每个 refedit 下面都有一个标签,我想在该行上显示特定单元格的文本(不一定是 selected 单元格),我想它会是这样的:
Range("D" & Range(Refedit1.Value).Row)
或类似(任何 suggestions/improvements 对此表示赞赏)
我的问题是:如何在每次 selected 新单元格时更新它?我读过 refedit 有很多问题,如果做得太复杂,很容易崩溃。
您可以这样做 - 处理 refedit 的 Change
事件:
Private Sub RefEdit1_Change()
Dim rng As Range
Set rng = Range(Me.RefEdit1.Value).Cells(1) 'in case >1 cell selected
Debug.Print rng.EntireRow.Cells(4).Value 'col D on that row
End Sub
我有一个带有 2 个 refedit 框的用户表单。它们都允许用户 select 一个单元格。我在每个 refedit 下面都有一个标签,我想在该行上显示特定单元格的文本(不一定是 selected 单元格),我想它会是这样的:
Range("D" & Range(Refedit1.Value).Row)
或类似(任何 suggestions/improvements 对此表示赞赏)
我的问题是:如何在每次 selected 新单元格时更新它?我读过 refedit 有很多问题,如果做得太复杂,很容易崩溃。
您可以这样做 - 处理 refedit 的 Change
事件:
Private Sub RefEdit1_Change()
Dim rng As Range
Set rng = Range(Me.RefEdit1.Value).Cells(1) 'in case >1 cell selected
Debug.Print rng.EntireRow.Cells(4).Value 'col D on that row
End Sub