Re: PRINTING SIDEWAYS IN RB 6.5+ FOR WINDOWS

[Scott Salisbury]

Dan,

In the example below, you create an Excel
Object, in this case "oExcel".  From there,
you could put data into cell "A1" and then
you could make the text print sideways.

You could probably write an Excel macro
that would go out and get the data from
R:BASE via ODBC or you could go the
other way and write a VB application that
manipulates Excel and bridges the gap between
R:BASE and Excel.  This is a lot more work
than you would be used to with the R:BASE
report writer but it would get the job done
for you.

Here's the code that would turn the text sideways:

With oEcel
  .Range("A1").Select
  With Selection
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlBottom
        .WrapText = False
        .Orientation = 90
        .ShrinkToFit = False
        .MergeCells = False
    End With
End With
 

Dan Goldberg wrote:

--Original Message Text---
From: Dan Goldberg
Date: Tue, 28 Aug 2001 15:08:42 -0700

I have column headers in reports that I would like to print sideways.

Does anybody have any ideas??

Thanks

Dan Goldberg

 

Scott
====
Scott J. Salisbury
Matrix Data Systems / The R:Street Journal
5114 Point Fosdick Drive NW, Suite E-272
Gig Harbor, WA 98335-1733

E-Mail Address: [EMAIL PROTECTED]
Temporary URL: www.seanet.com/~sjs  (downloads available)
New Web Address: www.rStreetJournal.Com
Direct Line: 206-423-7679
Toll Free: 888-386-5040
Seattle: 206-448-7975
Fax: 305-425-0491