Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 4,391
Default 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
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Copy contents from one cell to another Don[_4_] New Users to Excel 0 September 25th 09 04:18 PM
Copy cell contents with VB TheMilkGuy Excel Discussion (Misc queries) 6 July 21st 09 11:46 PM
how to copy the contents from last cell Lamb Chop Excel Discussion (Misc queries) 2 January 17th 08 01:27 AM
copy cell value not contents D Moran Excel Discussion (Misc queries) 2 April 24th 06 03:29 PM
Data entry - Copy contents of cell typed in one cell to another ce danie Excel Worksheet Functions 2 March 16th 06 06:51 PM


All times are GMT +1. The time now is 08:59 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"