[gr8styl]

Φίλε Δημήτρη
χωρίς να ξέρω για ποιόν κώδικα του Τάσου μιλάς,
στο ερώτημά σου Πώς γίνεται να αλλάζει η ημερομηνία θα σου έλεγα ότι πρώτα θα πρέπει αντί για σταθερά (CONST) να δηλώσεις την DefaultURL σαν μεταβλητή τύπου STRING
DIM DefaultURL as STRING
Στη συνέχεια μπορείς να καταχωρήσεις αυτό που θές σαν τιμή της μεταβλητής πχ

Dim DefaultURL As String

DefaultURL = "URL;http://www.oddsfair.net/index.php?date=" & _
    Year(Sheets(1).Range("c3").Value) & "-" & _
    Month(Sheets(1).Range("c3").Value) & "-" & _
    Day(Sheets(1).Range("c3").Value) & _
    "&league=%&order=timeasc"

όπου το Sheets(1).Range("c3") σημαίνει ότι θα διαβάζεται η ημερομηνία από το κελί c3 του πρώτου φύλλου.

Καλή συνέχεια.
Θανάσης