printing on one page (2000)

[fedorn]

I have a sheet with one column, in that one I 've about 200 filled with data. When I print this, I get 4 pages with one colum.
Can I get 1 page with more then 1 column. I will fill up the page.

[AndrewO]

Not via an Excel printing option. (assuming you don't want it to reduce the font size by 4)

One way is to create a new sheet that contains 4 columns which reference your main sheet

A1 has the formula =Sheet1!A1
B1 has the formula =Sheet1!A61
C1 has the formula =Sheet1!A121
D1 has the formula =Sheet1!A181

and then select and fill downwards for 60 (59?) rows.

[Jim Cone]

HUP,

I've written and Excel add-in "Side by Side" that does what you want.
It adds a new menu item to the Format menu and is easy to use and very quick.
It does not affect your data as a new worksheet is created with the side by side column arrangement.
You print from the new worksheet.
If you want to give it a try, I will be glad to email it to you.

Jim Cone
San Francisco, CA
jim.coneXXX@rcn.comXXX

[JohnBF]

See also WMVP <!profile=macropod>macropod<!/profile>'s excellent solution in <post#=180685>post 180685</post#>

[fedorn]

The solution from macropod (post180685) doesn't work here. I 'll try further.
(I work with the dutch version)

[fedorn]

Hi Jim,
Thanks for your help. Is it possible to send me this file to my e-mail.
Thanks in advance.
Fedorn

[Jim Cone]

Fedorn,

The "Side by Side" program and one page Word.doc directions are on the way.
Anyone else interested?

Jim Cone
San Francisco, Ca
jim.coneXXX@rcn.comXXX

[JohnBF]

Me (for certain reports). Jim, can you post the whole thing here as a zipped attachment?

[Jim Cone]

John,

Good idea. I didn't think that both files would fit into 100KB, but they do.

The attached zipped file contains:

"Side by Side".xla - 137kb
"Side by Side Read Me.doc - 31kb

The Read Me has instructions for installing the Excel add-in, along with some general info on the program.
For others not familiar with add-in files (.xla) - Do not attempt to open the xla file - read the Read Me file first.

Comments about, suggestions on the program are welcomed.

Regards,

Jim Cone
San Francisco, CA
jim.coneXXX@rcn.comXXX

[JohnBF]

It should if translated correctly, but I'm unable to help you with translation.

[HansV]

Here is the Dutch version of Macropod's formula:

=VERSCHUIVING(Blad1!$A$1;(REST(RIJ()-1;80))+(KOLOM()-1)*80

Substitute the name of the sheet for Blad1.

Note: it is easy to translate a formula from English into the local language:
- Select the cell you wish to set the formula for
- Activate the Visual Basic Editor (Alt+F11)
- Activate the Immediate window (Ctrl+G)
- Type ActiveCell.Formula = "=..." followed by Enter, where the English-language formula should be inserted between the quotes

The other way round is also easy (I got this tip from Jan Karel Pieterse): if you want to translate a formula from the local language into English:
- Select the cell you wish to set the formula for
- Activate the Visual Basic Editor (Alt+F11)
- Activate the Immediate window (Ctrl+G)
- Type ? ActiveCell.Formula followed by Enter

[fedorn]

Thanks HansV for your translation, I will try this out.
The side by side program from Jim Cone is great. Thanks Jim it works.
Thanks to all for your coorperation.