EXCEL HELP

[aparness]

I have a excel sheet in which i have 4 columns ( A, B , C, D)
In Column A I have 4 categories like the following one.

shipping cost : 60

deposit : $
return : $

Profit : $

What I have to do is get the shipping cost which is 60 here then make the calculations like the following and write the result back to the same cell in the same format as the original like here under

Shipping cost : 60

deposit : $ 60*0.50
return : $ 60*.25

Profit : $ 60*0.10

there are 800 rows and every cell in Column A's shipping cost changes. Also I should not change Column B, C and D.

Please help me with a VB Macro for this.

[vass0922]

no need for a macro

A1 = Shipping Cost
A2 = Deposit
A3 = Return
A4 = Profit

A1 = Value of shipping cost
A2 = "=A1*.5"
A3 = "=A1*.25"
A4 = "=A1*.10"

Then select the whole 800 records, and "Fill" the formula (think its in edit menu

That help?

Welcome to TechIMO

[aparness]

Vass0922,
Thank you for your repply, may be I was not clear on my question. The shipping cost, Deposit, Return and Profit are all in on cell that is A1. The A2 cell has a different value so the proposed solution will not work. I appreciate your help.
I need to have a macro to run through the entire spread sheet.

[vass0922]

You can parse it out as well
InStr function will parse out text... can you give us an idea of exactly what a cell would like like? how is each value delimited?

[aparness]

Vass,
I am on it, I could get the values from a cell now after manipulation I want to right is back to the same cell.

the delimiter is ":"

followin is the test code I am working on right now.

Sub test()
Dim Temp As Integer
Dim Str As String

Str = (Cells(1, 1).Value)
Temp = InStrRev((Cells(1, 1).Value), "/")
MsgBox Mid(Str, (Temp + 1), 3)
MsgBox Mid(Str, 1, Temp)

End Sub