Make a 'Print button'

  • Thread starter Thread starter BrianT
  • Start date Start date
B

BrianT

How would I make a cell into a 'print button' (radio button?)

I need to be able to mouseover and either click or press enter on
cell, and doing so would cause a range of other cells to be printed. S
cell A1 would be my button, click on it or hit enter once it wa
highlighted and it would print cells D10-x41 say
 
Try this event

Copy it in the sheet module
If you select A1 it print the range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Range("A1"), Target) Is Nothing Then
Range("D10:X41").PrintOut
End If
End Sub
 
Back
Top