How do I replace 10000 in the code bellow with 10005, 10010, 10015 etc? Do I use integer for a variable or a string? What's the syntax?

Thanks!

With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.sinisa.com/uklocator/sear...pageNo=0&Code=10000&primaryCity=10000&src=null&method=search" _
, Destination:=ActiveCell)
.Name = _
"search.do?country=uk&pageNo=0&Code=10000&primaryCity=10000&src=null&method=search"
.
.
.
End With