Изменение названия документа документа с использованием значений текстового поля

Question

В настоящее время я создаю пользовательскую форму VBA с несколькими текстовыми полями. Моя цель состоит в том, чтобы создать шаблон с включенным макросом, который выдает пользовательскую форму при запуске, содержащий несколько текстовых полей, где пользователь может вводить значения.

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

«Textbox1.Value_Textbox2.Value_Combobox1.Value_Textbox3.Value _.....» (Space для пользователя, чтобы персонализировать название документа)

Подчеркнутое разделение очень важно.

Я попытался установить его с

'WORKS' 
With Dialogs(wdDialogFileSummaryInfo) 
    .Title = TextBox7.Value 
    .Execute 
End With 

С целью объединить все эти значения TextBox в текстовое поле 7, но я просто не могу заставить его работать. Есть ли другой способ исправить эту проблему?

Answer 1

вы можете попробовать это:

With Me 
    .TextBox7 = Join(Array(.TextBox1.Text, .TextBox2.Text, .ComboBox1.Value, .TextBox3.Text), "_") '<--| list your controls 'name.property' in the desired order 
End With 

With Dialogs(wdDialogFileSummaryInfo) 
    .Title = Me.TextBox7.Text 
    .Execute 
End With