View Single Post
 
Old 03-05-2012, 11:59 PM
jolivanes jolivanes is offline Windows XP Office 2007
Advanced Beginner
 
Join Date: Sep 2011
Posts: 91
jolivanes will become famous soon enough
Default

If the Websites are in Column C, starting at C1, try

Code:
Sub TryThis()
    With Range("C1:C" & Cells(Rows.Count, "C").End(xlUp).Row)
        .Value = Evaluate("""www.""&" & .Address)
    End With
End Sub
Reply With Quote