VBA Excel: подпроцедура для изменения заголовка в элементе управления пользовательской формы

Question

Я создаю пользовательскую форму, которая показывает значение (числовое) последней использованной ячейки в столбце.

Я просто думаю о том, как это сделать, но это не работает, вот что я получил:

Sub show()

UserForm1.show

'xTotal is the name of the label control and B4 is the column with a list of numbers:

UserForm1.xTotal.Caption = ThisWorkbook.Sheets("Sheet1").Range("b4").End(xlDown)

End Sub

Я знаю, что это элементарные вещи, я был бы признателен за вашу помощь. Благодарю.

Answer 1

Вы не можете установить заголовок для диапазона, что и делает ваш код (но не ваше намерение). Вы должны установить заголовок на значение диапазона -

UserForm1.xTotal.Caption = ThisWorkbook.Sheets("Sheet1").Range("b4").End(xlDown).Value
Userform1.Show

Вы также захотите установить заголовок перед отображением пользовательской формы.