Mise à jour des données sur la même plage

[nayz]

Bonjour,

Voici mon code :

Sub Copier()

With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://nnnnnnnnnnnnnnn", _
Destination:=Range("A1"))
.Name = "daily"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "2"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
End Sub
Mais voilà, quand je veux recharger les données, excel me les mets cote à cote, sauf que moi je veux que mes nouvelles données écrasent les anciennes, vous voyez ce que je veux dire?

 

[Compte Supprimé 979]

Re : Mise à jour des données sur la même plage

Salut Nayz,

Peut-être avec

ActiveSheet.QueryTable.Delete

avant de rajouter des données

A+

 

[nayz]

Re : Mise à jour des données sur la même plage

Non ça ne marche pas, mais merci quand même.

 

[Compte Supprimé 979]

Re : Mise à jour des données sur la même plage

Re,

Alors peut-être avec

ActiveSheet.Cells.Clear

Qui efface toutes tes cellules

a+

 

[nayz]

Re : Mise à jour des données sur la même plage

Yessss hehehehe

Je venais de l'essayer avant que tu me l'envoie. Merci beaucoup!!

Là je vais pouvoir avancer, quand je pense à ce qu'il me faut comme code avant lundi. J'en tremble! Et je ne suis que débutant en plus.

Merci bcp Bruno

 

[nayz]

Re : Mise à jour des données sur la même plage

C'est où pour mettre résolu?