Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Copy cell contents?
Mark,
Not sure I follow, as column K is 11 not 12, but something like: With Cells(i, 10) If .Value 0.2 Then .Offset(0, 1).Value = .Offset(0, -9).Value & ": 3 day average is " & Format(.Value, "0%") End With NickHK "Mark J" wrote in message ... i have a workbook with the following table: Row column(A) column(J) column(K) 1 PS003_Pump1.RT_Daily -0.08 2 PS003_Pump2.RT_Daily -0.04 3 PS010_Pump1.RT_Daily 0.04 4 PS010_Pump2.RT_Daily 0.02 5 PS005_Pump1.RT_Daily -0.03 6 PS005_Pump2.RT_Daily -0.03 7 PS006_Pump1.RT_Daily -0.06 8 PS006_Pump2.RT_Daily 0.21 9 PS007_Pump1.RT_Daily -0.01 10 PS007_Pump2.RT_Daily -0.01 i would like to have the following: If Cells(i, 10) 0.2 Then Cells(i, 12) = PS006_Pump2.RT_Daily & "3 day average is" & 21% as below: Row column(A) column(J) column(K) 1 PS003_Pump1.RT_Daily -0.08 2 PS003_Pump2.RT_Daily -0.04 3 PS010_Pump1.RT_Daily 0.04 4 PS010_Pump2.RT_Daily 0.02 5 PS005_Pump1.RT_Daily -0.03 6 PS005_Pump2.RT_Daily -0.03 7 PS006_Pump1.RT_Daily -0.06 8 PS006_Pump2.RT_Daily 0.21 PS006_P2 = 21% 9 PS007_Pump1.RT_Daily -0.01 10 PS007_Pump2.RT_Daily -0.01 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Copy contents from one cell to another | New Users to Excel | |||
Copy cell contents with VB | Excel Discussion (Misc queries) | |||
how to copy the contents from last cell | Excel Discussion (Misc queries) | |||
copy cell value not contents | Excel Discussion (Misc queries) | |||
Data entry - Copy contents of cell typed in one cell to another ce | Excel Worksheet Functions |