VB Code to enter cell content within VB code

I am using below code to go to certain website.
In the below code i need to make Address part to be variable.
So assume i have http://www.google.com in cell C4, I need the content of Cell C4 inserted in Address:=
so that i dont have to create seperate Sub for each Website, just need to enter the website address in excel.

Sub WebSite1()
ThisWorkbook.FollowHyperlink Address:="http://www.google.com", NewWindow:=True
End Sub

Sub WebSite2()
ThisWorkbook.FollowHyperlink Address:="http://www.Yahoo.com", NewWindow:=True
End Sub

Sub WebSite3()
ThisWorkbook.FollowHyperlink Address:="http://www.CNN.com", NewWindow:=True
End Sub

Please let me know if you have any questions.
Thanks.

Riz