populate column

[stevenash]

Hey guys,
been coming to the site often lately and it has been a great help. this is the first time posting however.

A screenshot of my situation (Sorry, I'm not sure how to attach files onto the post)

http://imageshack.us/photo/my-images/825/subsution.png/

So basically I'm after vba code that will take the values from column H and substitute into cell C4, which then will give an output on C5, and this output values need to be placed in column I for corresponding inputs.

Would anyone shed some light into doing this? I'm just starting out learning VBA so sorry for the lack of knowledge.
Thanks

 

[Peter_SSs]

Welcome to the MrExcel board!

You will get many more potential helpers if you post any small screen shot directly in your post. My signature block below suggests 3 ways you can do that. Test them out in the Test Here forum.

I assume C5 contains a formula that uses C4 as input?

If that is the case, couldn't we just put a similar formula in I2:Ix?

 

[stevenash]

Thank you very much, yes that is correct about the formula in the yellow cells. This is not exactly the problem I'm trying to solve but a small part of it and dummbed down so I can explain it clearly
I'm really looking for a way to do it in VBA.

hopefully this works:

Excel Workbook
	B	C	D	E	F	G	H	I
1	*	*	*	*	*	*	input	output
2	*	*	*	*	*	*	1	*
3	*	*	*	*	*	*	2	*
4	input	44	*	*	*	*	3	*
5	output	88	*	*	*	*	4	*
6	*	*	*	*	*	*	5	*
7	*	*	*	*	*	*	6	*
8	*	*	*	*	*	*	7	*
9	*	*	*	*	*	*	8	*
10	*	*	*	*	*	*	9	*
11	*	*	*	*	*	*	10	*
12	*	*	*	*	*	*	11	*
13	*	*	*	*	*	*	12	*
14	*	*	*	*	*	*	13	*
Sheet1

Thank you again!

 

[Peter_SSs]

When using Excel jeanie, if you preview your post before submitting then after the preview re-paste your jeanie code (it will most likely still be on your clipboard) over the old lot. That will eliminate all the asterisks.

I'm still not sure why we couldn't do something like this (or whatever other formula may be in C5)?

<font face=Courier New><br><SPAN style="color:#00007F">Sub</SPAN> CalcValues()<br>    Application.ScreenUpdating = <SPAN style="color:#00007F">False</SPAN><br>    <SPAN style="color:#00007F">With</SPAN> Range("I2", Range("I" & Rows.Count).End(xlUp)).Offset(, 1)<br>        .FormulaR1C1 = "=RC[-1]*2"<br>        .Value = .Value<br>    <SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">With</SPAN><br>    Application.ScreenUpdating = <SPAN style="color:#00007F">True</SPAN><br><SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN><br></FONT>

 

[stevenash]

thank you sir, I will work with that. thanks again for your time