Hi leg,

Unless you need to do this often, you could put 1000 into an unused cell,
select the range you want to update and use Edit|Paste Special|Values:Divide

For a macro-based solution, you could use:
Sub Divide()
Dim oCell As Range
On Error Resume Next
For Each oCell In Selection
If oCell.Value < "" Then oCell.Value = oCell.Value / 1000
Next oCell
End Sub

Cheers


"leg" wrote in message
...

Hi people,

i'm trying to write a macro to divide some cells by 1000.

i have a table with the values in there, and i need to divide the
values by 1000 and put the new values in the same table. i don't know
if this is posible, but it whould be great if it is!
;)


Thank you very much!


--
leg
------------------------------------------------------------------------
leg's Profile:
http://www.excelforum.com/member.php...o&userid=34931
View this thread: http://www.excelforum.com/showthread...hreadid=546650