Activate a Print job within an "IF" function

pblundell · May 24th, 2002, 03:47 PM

I have developed a macro to fill in certain areas of a spreadsheet using "IF" functions. I would like to also add to this macro, the ability to print the selected spreadsheet if the criteria is "TRUE". Can this be done?

dsnbld · May 24th, 2002, 06:22 PM

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("A1") = True Then
ActiveSheet.PrintOut
End If
End Sub

Ivan F Moala · May 24th, 2002, 10:07 PM

Quote:

On 2002-05-24 17:22, dsnbld wrote:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("A1") = True Then
ActiveSheet.PrintOut
End If
End Sub

You'll have to put some Kind of Static boolean variable so that this doesn't print every time you change selection and A1 is true, or just maintain a cell with this value
ie. weather it has printed or not...

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

May 24th, 2002, 03:47 PM	#1
pblundell New Member Join Date: May 2002 Posts: 1	I have developed a macro to fill in certain areas of a spreadsheet using "IF" functions. I would like to also add to this macro, the ability to print the selected spreadsheet if the criteria is "TRUE". Can this be done?

May 24th, 2002, 06:22 PM	#2
dsnbld Board Regular Join Date: May 2002 Posts: 206	Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Range("A1") = True Then ActiveSheet.PrintOut End If End Sub