[AccessD] Creating New Spreadsheet with Automation

Marco recorder,eh?  Dang, forgot about that.  I did an app like this once 
with one of the most Byzantine accounting systems where they wanted an 
elaborate spreadsheet created and used that macro recorder.

Thanks.

Rocky

----- Original Message ----- 
From: "Hale, Jim" <Jim.Hale at fleetpride.com>
To: "'Access Developers discussion and problem solving'" 
<accessd at databaseadvisors.com>
Sent: Friday, May 06, 2005 12:16 PM
Subject: RE: [AccessD] Creating New Spreadsheet with Automation


> Number:
> Columns("F:F").NumberFormat = "#,##0.00"
> Currency:
>    Columns("G:G").NumberFormat = "$#,##0.00"
> Text:
>    Columns("H:H").NumberFormat = "@"
>
> BTW all I did was run the macro recorder and read the result. Its the
> easiest way to get Excel syntax. ;-)
> HTH
>
> Jim Hale
>
> -----Original Message-----
> From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com]
> Sent: Friday, May 06, 2005 1:28 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Creating New Spreadsheet with Automation
>
>
> Jim:
>
> .Add.  That's it  Thanks.
>
> Do you know offhand how to set a column to a specific format?  Text? 
> Number?
>
> Currency?  etc.
>
> TIA
>
> Rocky Smolin
> Beach Access Software
> http://www.e-z-mrp.com
> 858-259-4334
>
>
> ----- Original Message ----- 
> From: "Hale, Jim" <Jim.Hale at fleetpride.com>
> To: "'Access Developers discussion and problem solving'"
> <accessd at databaseadvisors.com>
> Sent: Friday, May 06, 2005 8:28 AM
> Subject: RE: [AccessD] Creating New Spreadsheet with Automation
>
>
>> Try objXLApp.Workbooks.Add
>> Jim Hale
>>
>> -----Original Message-----
>> From: Rocky Smolin - Beach Access Software [mailto:bchacc at san.rr.com]
>> Sent: Friday, May 06, 2005 10:05 AM
>> To: AccessD at databaseadvisors.com
>> Subject: [AccessD] Creating New Spreadsheet with Automation
>>
>>
>> Dear List:
>>
>> I have been manipulating existing spreadsheet from Access:
>>
>> ' Object variables for Automation stuff
>> Dim objXLApp As Excel.Application
>>
>> Set objXLApp = New Excel.Application
>> objXLApp.Workbooks.Open "C:\Clients\Placement22"
>>
>> Now I want to create a new spreadsheet instead of opening one that 
>> already
>> exists.  But I can't seem to find the method.
>>
>> Does anyone know the right syntax?
>>
>> MTIA
>>
>> Rocky Smolin
>> Beach Access Software
>> http://www.e-z-mrp.com
>> 858-259-4334
>> -- 
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>> ***********************************************************************
>> The information transmitted is intended solely for the individual or
>> entity to which it is addressed and may contain confidential and/or
>> privileged material. Any review, retransmission, dissemination or
>> other use of or taking action in reliance upon this information by
>> persons or entities other than the intended recipient is prohibited.
>> If you have received this email in error please contact the sender and
>> delete the material from any computer. As a recipient of this email,
>> you are responsible for screening its contents and the contents of any
>> attachments for the presence of viruses. No liability is accepted for
>> any damages caused by any virus transmitted by this email.
>
>
> ----------------------------------------------------------------------------
> ----
>
>
>> -- 
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
> ***********************************************************************
> The information transmitted is intended solely for the individual or
> entity to which it is addressed and may contain confidential and/or
> privileged material. Any review, retransmission, dissemination or
> other use of or taking action in reliance upon this information by
> persons or entities other than the intended recipient is prohibited.
> If you have received this email in error please contact the sender and
> delete the material from any computer. As a recipient of this email,
> you are responsible for screening its contents and the contents of any
> attachments for the presence of viruses. No liability is accepted for
> any damages caused by any virus transmitted by this email.


--------------------------------------------------------------------------------


> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>