excel 多行标签框VBA

zzzyeukh 于 2023-02-05 发布在其他

关注(0)|答案(1)|浏览(152)

我有一个问题，试图使多行条目到标签框（在一个表单内），不想使用文本框，我知道有一种方法可以在代码中做到这一点，但我只是似乎不能得到它在我的头周围所有我尝试出来假或只返回一个值。基本上我正在尝试做的是导入一个文本条目comlumn，从列B到第一个空单元格，文本已经在列中了。2现在我需要在单击按钮时将文本放入标签字段的多行中。
任何帮助都将不胜感激。
谢谢大家!

Private Sub readbtn_Click()
Dim content As Variant
content = 1
Range("B1").Select
Do While Range("B" & content) <> ""
Me.ValuesLbl.Caption = Range("B" & content)
content = content + 1
Loop

Selection.End(xlDown).Select
End Sub

excel

来源：https://stackoverflow.com/questions/75302555/multiline-label-box-vba

1条答案

按热度按时间

vltsax251#

可以在Label控件的caption属性中使用vbNewLine常量：

Private Sub readbtn_Click()
   Dim content As Variant
   content = 1
   Range("B1").Select
   Me.ValuesLbl.Caption = "" 'clear any existing text in the Label control
   Do While Range("B" & content) <> ""
      Me.ValuesLbl.Caption = Me.ValuesLbl.Caption & Range("B" & content) _
                             & vbNewLine
      content = content + 1
   Loop
End Sub

赞(0）回复(0）举报 2023-02-05

我来回答

excel 多行标签框VBA

1条答案

相关问题

热门标签

最新问答