Hi guys

I'm importing numbers from a custom application into excel, after the import
I cannot autosum, but if i manually remove the number and re-type it works
fine.

Any ideas?

DavidB wrote:
Hi guys

I'm importing numbers from a custom application into excel, after the import
I cannot autosum, but if i manually remove the number and re-type it works
fine.

Any ideas?

What do you have the cell formatted as?

What do you have the cell formatted as?

Currency

DavidB wrote:
What do you have the cell formatted as?

Currency

Have you tried fromatting the cells after import then summing?

Regardless, it sounds like you values are stored as Text instead of as
numbers.

Select a blank cell, then do Edit=copy

then select the offending cells and do Edit=Paste Special, select Values
and ADD.

This should convert them back to being stored as numbers.

--
Regards,
Tom Ogilvy


"DavidB" wrote:


What do you have the cell formatted as?

Currency

Currency

Sorry, When I generate the excel sheet from the custom app the cell is
formatted general

generally formatting a cell that already contains a value will not change the
way the value is stored.

--
Regards,
Tom Ogilvy


"stevebriz" wrote:


DavidB wrote:
What do you have the cell formatted as?

Currency

Have you tried fromatting the cells after import then summing?

DavidB wrote:

Currency

Sorry, When I generate the excel sheet from the custom app the cell is
formatted general

try: create a macro like below and then sum
(substitute your range)

Sub Macro8()
Range("D1:D34").Select
Selection.NumberFormat = "$#,##0.00"
End Sub

This should do nothing. Why not back off on the untested advice.

Format some cells as text, put numbers in them

See that autosum doesn't work.

try your solution and see that it still doesn't work.

I tested it and it doesn't work.

If you add the code equivalent of what I suggested such as:

Sub Macro8()
Range("D1:D34").Select
Selection.NumberFormat = "$#,##0.00"
Range("D1:D34").Value = Range("D1:D34").Value
End Sub

then it does work.

--
Regards,
Tom Ogilvy


"stevebriz" wrote:


DavidB wrote:

Currency

Sorry, When I generate the excel sheet from the custom app the cell is
formatted general

try: create a macro like below and then sum
(substitute your range)

Sub Macro8()
Range("D1:D34").Select
Selection.NumberFormat = "$#,##0.00"
End Sub

See answer in the other group you posted to.


Gord

On Wed, 19 Jul 2006 15:37:59 +0100, "DavidB" wrote:

Hi guys

I'm importing numbers from a custom application into excel, after the import
I cannot autosum, but if i manually remove the number and re-type it works
fine.

Any ideas?


Gord Dibben MS Excel MVP

DavidB wrote:
Hi guys

I'm importing numbers from a custom application into excel, after the import
I cannot autosum, but if i manually remove the number and re-type it works
fine.

Any ideas?

I have a similar problem when i import from access. i use this code as
a workaround.

'workaround code to get rid of the apostrphe's that are appended from
access export
Dim C As Excel.Range

ActiveSheet.Range("A1:G" &
XLapp.WorksheetFunction.CountA(ActiveSheet.Range(" A:A"))).Select 'this
line and above line should be together. they wrap when posted.

For Each C In XLapp.Selection.Cells
C.Formula = C.Formula
Next

try this and lemme know if it works

AR