Printing
 

I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?

Printing
 

Hide columns B to Y, then select A to Z and print. Need the code?


Bill


"rachelk" wrote:

I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?

Printing
 

You can hide the colums you don't want to print.


rachelk wrote:
I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?

Printing
 

Yes, please

"Bill Pfister" wrote:

Hide columns B to Y, then select A to Z and print. Need the code?


Bill


"rachelk" wrote:

I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?

Printing
 

Sub PrintSomeStuff()
Dim wkb As Workbook
Dim wks As Worksheet

Set wkb = ThisWorkbook
Set wks = wkb.ActiveSheet

wks.Columns("B:Y").Hidden = True
wks.Columns("A:Z").PrintOut
wks.Columns("B:Y").Hidden = False

End Sub



"rachelk" wrote:

Yes, please

"Bill Pfister" wrote:

Hide columns B to Y, then select A to Z and print. Need the code?


Bill


"rachelk" wrote:

I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?

Printing
 

WHERE DO YOU ENTER THE CODE SO I DO NOT KEEP HAVING TO HIDE THE ONE COLUMN I
DO NOT WANT PRINTED?

THANKS

"Bill Pfister" wrote:

Sub PrintSomeStuff()
Dim wkb As Workbook
Dim wks As Worksheet

Set wkb = ThisWorkbook
Set wks = wkb.ActiveSheet

wks.Columns("B:Y").Hidden = True
wks.Columns("A:Z").PrintOut
wks.Columns("B:Y").Hidden = False

End Sub



"rachelk" wrote:

Yes, please

"Bill Pfister" wrote:

Hide columns B to Y, then select A to Z and print. Need the code?


Bill


"rachelk" wrote:

I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?

Printing
 

The line "wks.Columns("B:Y").Hidden = True" hides columns "B" through "Y".
Is that what you're asking?



"LEOPARDSHIDEAWAY" wrote:

WHERE DO YOU ENTER THE CODE SO I DO NOT KEEP HAVING TO HIDE THE ONE COLUMN I
DO NOT WANT PRINTED?

THANKS

"Bill Pfister" wrote:

Sub PrintSomeStuff()
Dim wkb As Workbook
Dim wks As Worksheet

Set wkb = ThisWorkbook
Set wks = wkb.ActiveSheet

wks.Columns("B:Y").Hidden = True
wks.Columns("A:Z").PrintOut
wks.Columns("B:Y").Hidden = False

End Sub



"rachelk" wrote:

Yes, please

"Bill Pfister" wrote:

Hide columns B to Y, then select A to Z and print. Need the code?


Bill


"rachelk" wrote:

I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?

Printing
 

You can enter the code in

Private Sub Workbook_BeforePrint(Cancel As Boolean)




LEOPARDSHIDEAWAY wrote:
WHERE DO YOU ENTER THE CODE SO I DO NOT KEEP HAVING TO HIDE THE ONE COLUMN I
DO NOT WANT PRINTED?

THANKS

"Bill Pfister" wrote:

Sub PrintSomeStuff()
Dim wkb As Workbook
Dim wks As Worksheet

Set wkb = ThisWorkbook
Set wks = wkb.ActiveSheet

wks.Columns("B:Y").Hidden = True
wks.Columns("A:Z").PrintOut
wks.Columns("B:Y").Hidden = False

End Sub



"rachelk" wrote:

Yes, please

"Bill Pfister" wrote:

Hide columns B to Y, then select A to Z and print. Need the code?


Bill


"rachelk" wrote:

I need the ability of printing everything in Column A next to everything in
Column Z without printing all the columns in between. How do I do this?