Home |
Search |
Today's Posts |
|
#1
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
I have this code
UltimaRiga = Range("A65356").End(xlUp).Row For i = 3 To UltimaRiga Range("G" & i).Value = (Range("D" & i).Value - Range("I" & i).Value) Range("G" & i).NumberFormat = "0_ ;[Red]-0 " Next i but I think is better (faster) without loop, is it possible? Thanks in advance! |
#2
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
You could fill the range with a formula, then convert those formulas to values:
Dim UltimaRiga as long Dim myRng as range With worksheets("Sheet1") unltimariga = .cells(.rows.count,"A").end(xlup).row set myrng = .range("G3:G" & ultimariga) with myrng .numberformat = "0_ ;[Red]-0 " .formula = "=D3-I3" .value = .value end with end with franco monte wrote: I have this code UltimaRiga = Range("A65356").End(xlUp).Row For i = 3 To UltimaRiga Range("G" & i).Value = (Range("D" & i).Value - Range("I" & i).Value) Range("G" & i).NumberFormat = "0_ ;[Red]-0 " Next i but I think is better (faster) without loop, is it possible? Thanks in advance! -- Dave Peterson |
#3
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
Dave, can Yuo tell me what riferiments I nedd?
on the line Set myRng = .Range("G3:G" & UltimaRiga) I have the error: Errore di run-time '1004'. Errore definito dall'applicazione o dall'oggetto. Thanks in advance |
#4
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
Dave, can You tell me what riferiments I need?
On the line Set myRng = .Range("G3:G" & UltimaRiga) I have the error: Errore di run-time '1004'. Errore definito dall'applicazione o dall'oggetto. Thanks in advance! |
#5
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
Dave, it seems work correct, is it right for you?
With Range("G3:G" & UltimaRiga) .NumberFormat = "0_ ;[Red]-0 " .Formula = "=D3-I3" .Value = .Value End With |
#6
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
After the typo correction, it worked fine.
If you want to double check the formulas first, just comment that ".value = .value" line. franco monte wrote: Dave, it seems work correct, is it right for you? With Range("G3:G" & UltimaRiga) .NumberFormat = "0_ ;[Red]-0 " .Formula = "=D3-I3" .Value = .Value End With -- Dave Peterson |
#7
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
Try fixing my typo.
I spelled ultimariga incorrectly on one of those lines. franco monte wrote: Dave, can You tell me what riferiments I need? On the line Set myRng = .Range("G3:G" & UltimaRiga) I have the error: Errore di run-time '1004'. Errore definito dall'applicazione o dall'oggetto. Thanks in advance! -- Dave Peterson |
#8
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
Dave, you are right!
I correct it and now it's ok! Thank again! |
#9
Posted to microsoft.public.excel.newusers
|
|||
|
|||
Formula in a coloum
Dave, you are right!
I correct it and now it's ok! Thank again! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to count a coloum if two conditions are met | Excel Worksheet Functions | |||
Delete coloum in VB | Excel Discussion (Misc queries) | |||
how to change coloum to row | Excel Worksheet Functions | |||
Regonise coloum A while adding up coloum B to give a result in C | Excel Discussion (Misc queries) | |||
Need to import data to a coloum not a row | Excel Discussion (Misc queries) |