VB Script help

[tg2006]

I'm looking for an easy way to build column L from Column M. Example - Column M has a weight of 5 pounds. I need to insert into column L the same row a price of $6.64. I need this tool to look at all the rows in colymn M and insert a corresponding price in column L.

Column M Column L
<=5 pounds $6.64
<=10 pounds $8.74
<=15 pounds $12.07

Thanks for your help - Ken

 

[Macropheliac]

Can you modify this to fit your needs?

Sub Case_Select()
Dim Tcell As Range

For Each Tcell In Range("M:M")
        Select Case Tcell.Value
            Case "Whatever 1"
                Tcell.Offset(0, -1).Value = "Whatever x"
             Case "Whatever 2"
                Tcell.Offset(0, -1).Value = "Whatever y"
            Case "Whatever 3"
                Tcell.Offset(0, -1).Value = "Whatever z"
        End Select
Next Tcell
               
End Sub

If not, post back with a little more information (What value matches what value).

Mac

 

[acw]

Hi

How about

Range("m4").Formula = "=IF(L4<=5,6.64,IF(L4<=10,8.74,12.07))"
Range("M4").AutoFill Destination:=Range("M4:M" & Cells(Rows.Count, "L").End(xlUp).Row)
With Range("M4:M" & Cells(Rows.Count, "M").End(xlUp).Row)
 .Value = .Value
End With

Tony