2014-01-03 2 views
1

Я пытаюсь скрыть поле Скрытая копия в электронном письме, которое в настоящее время разрабатывается в Outlook 2010 с использованием VBA. Причиной скрыть это является то, что я использую код для добавления адреса электронной почты в Bcc, который показывает это поле, но затем я хочу вернуть недвижимость на экран.хочу скрыть поле Bcc в Outlook 2010 с помощью vba

Вот что я до сих пор (в ThisOutlookSession):

Sub add_bcc_to_cur_email() 
     Dim cur_msg As MailItem 
     Set cur_msg = ActiveInspector.CurrentItem 
     cur_msg.BCC = "[email protected]" 'this works correctly 
     cur_msg.GetInspector.CommandBars.ExecuteMso "Bcc" 'this does nothing 
    End Sub 

Первое дерево рявкнул я до подумал, что есть способ контролировать видимость поля Bcc непосредственно, поэтому я искал информацию о что, и я нашел this page - У второго сообщения, похоже, было решение, но это было за 2003 год, и, увы, не получилось.

Тогда я подумал, что могу попытаться запустить Bcc-элемент в ленте, который находится здесь: Options> Show Fields> Bcc. Итак, я googled, как запустить элемент в ленте, и придумал this page, у которого был интересный код, но нить казалась неубедительной.

Так или иначе - Есть ли у кого-нибудь идеи? :)

С Новым годом, и огромное спасибо заранее ~

ответ

2

Это работало для меня в 2010 году

cur_msg.GetInspector.Commandbars("Menu Bar").Controls("View").controls("Bcc Field").execute 
+0

обыкновение над разместим ваш ответ с другим ответом, но это работает, а cur_msg.GetInspector .CommandBars.FindControl (, 1860,, False) .Execute – Sorceri

+0

Спасибо, Дик. Я скопировал ваше решение, которое, похоже, было тем, что было во второй ссылке, которую я опубликовал, и на этот раз это сработало. Я, должно быть, скопировал из ссылки ошибочно в первый раз или что-то в этом роде. Спасибо! – chrono

+0

Спасибо, Sorceri! На данный момент я буду придерживаться решения Дика, так как его легче разобрать, но я ценю дополнительные знания :) – chrono

Смежные вопросы