فعال و غیر فعال نمودن یک دکمه که یک ماکرو را اجرا می نماید

[qaem]

سلام و خدا قوت
من میخوام توی یک شیت که الان چندتا دکمه تعبیه کردم و هرکدام از اونها توسط ماکرو فرمی رو چاپ میکنه ... در کنار هر کدام از این دکمه های چاپ یک چک باکس هم بذارم که اگه تیک خورد چاپ انجام بشه و اگر نداشت چاپ انجام نشه
قبلا از لطف شما دوستان سپاسگذارم

[rasools13]

سلام
میتونید ترتیبی دهید با تیک نخوردن یا خوردن چک باکس مقادیر خاصی مثلا 0 و 1 در سلول A1 وارد شود
و در ادامه دستور چاپ در کد ماکروی دکمه چاپ رو در داخل یک شرط به صورت ذیل قرار بدید که زمانی مقدار سلول A1 برابر 1 بود چاپ انجام شود

IF Range("A1")= 1 Then
 'Print
End If 

[qaem]

ممنون از پاسخ شما...
اگر بخوام چند if که نوشتم و هرکدام چاپهای جداگانه انجام میدن رو اجرا کنم چکار کنم . من تمام if ها رو پشت سرهم قرار دادم. اما فقط اولی اجرا میشه .
کدی که نوشتم اینه

Sub Macro11()'
' Macro11 Macro
'


'
If Range("F6") = True Then
    Sheets("ÊãÈÑ").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
If Range("F5") = True Then
    Sheets("˜ÇÑãÒÏÇÓÊÚáÇã").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
If Range("F4") = True Then
    Sheets("ÇÚÊÈÇÑ").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
If Range("F9") = True Then
    Sheets("ËÈÊ ÇÍæÇá").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
If Range("F10") = True Then
    Sheets("˜ÇÑãÒÏ720").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
If Range("F7") = True Then
    Sheets("˜ÇÑãÒÏ ÊÔ˜íá ÑæäÏå").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
If Range("F8") = True Then
    Sheets("1").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
If Range("F11") = True Then
    Sheets("2").Select
    ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=3
End If
    Sheets("Ç").Select
End Sub

[rasools13]

یک متغیر مثل x تعریف کنید و تو این کد های بالا بجای دستور پرینت قرار بدید و در هر شرط یک مقدار یکتا پیدا کنه
بعد در ادامه کد ها از چند تا شرط دیگه برای پرینت استفاده کنید یعنی با هر مقدارx چاپ مربوطه انجام بشه