2015-05-25 3 views
1

У меня есть пользовательское меню для быстрого щелчка. Вот часть кода. Он хорошо работает:Передача переменных при вызове sub из .OnAction (настраиваемое контекстное меню)

With menu.Controls.Add(Temporary:=True, Type:=msoControlButton, before:=i_menu) 
    .BeginGroup = False 
    .OnAction = "'" & ThisWorkbook.Name & "'!" & "'complet """ & num_doc & """'" 
    .FaceId = 1087 
    .Caption = "Complété" 
    .Tag = "commande_custom" 
End With 

Как вы можете видеть, на действия, он вызывает вспомогательный Complet (num_doc как строка). Я изменил sub, чтобы получить другую строку: complete (num_doc as String, etape_doc as String). Я не могу за жизнь мне понять, надлежащее количество "мне нужно поставить там кто-нибудь объяснить, как работают эти цитаты что-то вроде:?

.OnAction = "'" & ThisWorkbook.Name & "'!" & "'complet """ & num_doc & num_etape"""'" 

ПОЖАЛУЙСТА скажите мне, если я могу назвать это в более простой способ

ответ

1

не тестировалось:

.OnAction = "'" & ThisWorkbook.Name & "'!" & "'complet """ & num_doc & """,""" & num_etape & """'" 

источник ->Excel, VBA: How to pass multiple variables to .OnAction

+0

Испытанный, хорошо работает Спасибо, я голосовал бы, если бы это было не для моего 13 репутации (!.! хех). –

+0

@ DavidGrand'Maison: вы можете принять мой ответ, ура :) – Dawid

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