XL 2016 Explication Macro

Bonsoir tout le monde

Je récupère des données d'un formulaire google sous un fichier gsheet.
Je voudrai récupérer, avec une macro, les données de ce formulaire qui sont régulièrement actualisées et les enregistré dans un Classeur Excel.
J'ai fait plusieurs recherches et je suis tombé sur la macro suivante dans laquelle j'ai inséré mon "URL". Elle tourne mais rien ne s'affiche et pas de message d'erreur

Je voudrai comprendre ce programme de façon à pouvoir la modifier.
C'est quoi qu'on copie?
Où sont collées les données?
...

Merci pour votre aide

Bonne fin de journée

Brice

Ps: l'URL est accessible par un identifiant et un mot de passe que je ne peux pas divulguer. J'espère qu'il n'y en a pas besoin

Sub ImportGoogle()
'
' ImportGoogle Macro
'
'
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;https://docs.google.com/spreadsheets/d/10oxhCjsivKM4COOXUcUGjWir_BsvCmr8BJIiAjwIJGc/edit?usp=sharing" _
, Destination:=Range("D2"))
.Name = _
.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 = """tblMain"""
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
ActiveWindow.SmallScroll Down:=-15
Range("A1").Select


End Sub