Why this isn't running properly (excel macro) Pls help!!
 

If Sheet3.optD1D2.Value = True Then

MsgBox "D1/D2Kgs and D1/D2"

ElseIf Sheet3.optD3.Value = True Then

MsgBox "D3Kgs and D3"

ElseIf Sheet3.optBoth = True Then

MsgBox "Computes both Plant"

Else

MsgBox "Please choose what source to run."

End If

Why this isn't running properly (excel macro) Pls help!!
 

Describe your problem, so we know what to look for.

Regards,
Per

"Jay" skrev i meddelelsen
...
If Sheet3.optD1D2.Value = True Then

MsgBox "D1/D2Kgs and D1/D2"

ElseIf Sheet3.optD3.Value = True Then

MsgBox "D3Kgs and D3"

ElseIf Sheet3.optBoth = True Then

MsgBox "Computes both Plant"

Else

MsgBox "Please choose what source to run."

End If

Why this isn't running properly (excel macro) Pls help!!
 

What I want to happen is if I click on optD1D2 a message would appear
= MsgBox "D3Kgs and D3"
next if I click optD3 a message would appear stating,
=MsgBox "D3Kgs and D3"
and last option
=MsgBox "Computes both Plant"
else
Msgbox "Please choose an option."

thanks,
Jay
"Per Jessen" wrote:

Describe your problem, so we know what to look for.

Regards,
Per

"Jay" skrev i meddelelsen
...
If Sheet3.optD1D2.Value = True Then

MsgBox "D1/D2Kgs and D1/D2"

ElseIf Sheet3.optD3.Value = True Then

MsgBox "D3Kgs and D3"

ElseIf Sheet3.optBoth = True Then

MsgBox "Computes both Plant"

Else

MsgBox "Please choose what source to run."

End If

Why this isn't running properly (excel macro) Pls help!!
 

Jay,

How do you call this macro.

I tried to call it from a button on the sheet and it's working as desired.

---
Per


"Jay" skrev i meddelelsen
...
What I want to happen is if I click on optD1D2 a message would appear
= MsgBox "D3Kgs and D3"
next if I click optD3 a message would appear stating,
=MsgBox "D3Kgs and D3"
and last option
=MsgBox "Computes both Plant"
else
Msgbox "Please choose an option."

thanks,
Jay
"Per Jessen" wrote:

Describe your problem, so we know what to look for.

Regards,
Per

"Jay" skrev i meddelelsen
...
If Sheet3.optD1D2.Value = True Then

MsgBox "D1/D2Kgs and D1/D2"

ElseIf Sheet3.optD3.Value = True Then

MsgBox "D3Kgs and D3"

ElseIf Sheet3.optBoth = True Then

MsgBox "Computes both Plant"

Else

MsgBox "Please choose what source to run."

End If