Thanks again Joel. Below is part of the macro query I run. Could you show
me exactly where I would insert your suggestion, also will this change the
value every day by adding 86400? Apologies if I am hogging your time, how do
you learn all of this anyway, can it be picked up easily or are you a man
with many years experience?
Sheets("Query Sheet").Select
Range("E6").Select
Sheets("Query Sheet").Select
With Selection.QueryTable
.Connection =
"URL;http://www.bondflights.com/index.php?day=1228089600"
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "2,3"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
"Joel" wrote:
I would use this code to get the new number
StartDate = DateValue("12/1/08")
StartNumNum = 1228089600
TDate = Date()
NumDays = int(TDate - StartDate)
NewNum = StartNumNum + (86400 * NumDays)
URL = "http://www.bondflights.com/index.php?day=" & NewNum
"Joel" wrote:
A URL is a string that can be combined like any other string.
IPNum = 1228089600
URL = "http://www.bondflights.com/index.php?day=" & IPNum
"Woodi2" wrote:
Hi, I have recorded a macro that runs a query to an internet address. I have
set up the macro to run automatically at 9pm every evening. My only problem
is the web address changes daily, only the last 10 numbers. Her is the
address for today http://www.bondflights.com/index.php?day=1228089600. The
number always adds 86400 to the new address, therefore tomorrows number will
be 1228176000. Obviously when my macro runs, it only looks at the address I
have in the macro. Is it possible to have the macro change itself by adding
this number to that address or is that just plain stupid.
Thanks for whatever replies this generates.