Re: Need Help writing Print Macro

Tech-Archive recommends: Speed Up your PC by fixing your registry


Thanks Ryan : ) !



"Gerard Sanchez" <geepeeoneREMOVEME@xxxxxxxxx> wrote in message
news:eovkj9HoJHA.3572@xxxxxxxxxxxxxxxxxxxxxxx

Hi Ryguy

Is there a way we can modify this code into a module that I can assign to
a button instead of being an even code?



Thanks
"ryguy7272" <ryguy7272@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:B0EDBB0E-56A1-434A-9283-DED0BB22B7B9@xxxxxxxxxxxxxxxx
I think this will do what you want:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("E65,F64,G59")) Is Nothing Then
If G59 <> "Select Customer from Dropdown List" And F64 <> "Select
Customer
from Dropdown List" And E65 <> "Not Balanced!" Then
Range("A18:I69").Select
Selection.PrintOut Copies:=1, Collate:=True
End If
End Sub

Remember, this is event-ode, so you have to right-click on the tab of the
*** where you want to run the code. Paste it into the window that
opens.

Regards,
Ryan---
--
RyGuy


"Gerard Sanchez" wrote:

Hi,

I'd like a print macro to print range A18:I69 only IF:

IF --> G59 <> "Select Customer from Dropdown List"
IF---> F64 <> "Select User from Dropdown List"
IF---> E65 <> "Not Balanced !"

IF all conditions above are not met:

Message Box:

"Batch will not print until all discrepancies have been settled
and required information filled."

Appreciate any help.


Thanks!








.

Quantcast