If you'd looked back a couple of days, you would have found the following
response I gave Andrew Gabb in a thread entitled "Manipulating Excel from
Access":
Easiest way is to do what it is you want one-time in Excel, recording it as
a macro.
Once you're done, look at the VBA code Excel uses, and adapt it for use from
Access.
For example, assume you want the first row (the field titles) to be bold,
and each of the columns to be expanded to be large enough to show all of the
data. Recording what's necessary in Excel to accomplish this will give the
following macro:
Rows("1:1").Select
Selection.Font.Bold = True
Columns("A:A").Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Columns.AutoFit
Unfortunately, it's not quite as simple as just plugging that code into
Access.
Because Excel assumes that the VBA code is working with Excel objects, it
can take a few shortcuts with referring to the objects. When you're running
from inside of Access, you have to be explicit. It's not sufficient, for
example, to refer to Rows: you need to indicate Rows on which spreadsheet.
As well, it's not really necessary to create a selection and then refer to
that selection, the way Excel does: you can combine those two steps into
one.
Note, too, that the 3rd line of code about refers to an intrinsic Excel
constant xlToRight (if you're not that familiar with Excel VBA,
Selection.End(xlToRight) lets you extend the current selection to the right
until the last populated cell. In this case, since the selection is a
column, this means that the resultant range will be all contiguous columns
that have some data in them.) It you're using Late Binding, Access has no
idea what the value of that constant is, so it's necessary to provide the
actual value.
In the end, the following code will perform the desired formatting.
With objActiveWkb.Worksheets(intCurrSheet)
.Rows("1:1").Font.Bold = True
.Range(.Columns(1), .Columns(1).End(-4161)) _
.Columns.Autofit
End With
--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)
wrote in message
news:1130777441.421211.299930@o13g2000cwo.googlegr oups.com...
> Hi!
> Is there a way to format Excel from Access? I am exporting a table with
> X Columns from Access to Excel and I would like the first row to be
> lets say Italic and bold and the textcolor would be red and all the
> others would be yellow, the fill color would be red and the would be
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=6270
> font 14. The format would take place only from the first to the last
> column(X) where i have some data and to the last row with data.
> Just tell me how can i select a section of a sheet like A1
1 and
Reference:: Sikh Philosophy Network http://www.sikhphilosophy.net/showthread.php?t=6270
> format it.
> Thanks!
>
> Danijela
>
Our Donation Goal
: Why Donate? : Donate Today! : Donate Anonymously (ਗੁਪਤ) : Our Family of Supporters 
Linear Mode
