Corrigé 22.1 Créer une requête simple sur une page web
Sub Tout_CAC40()
' 22.1 Récupérer un tableau du CAC40
Call effaceRequêtes
ActiveWorkbook.Queries.Add Name:="CAC40", Formula:= _
"let Source = Web.Page(Web.Contents(""https://fr.finance.yahoo.com/
q/cp?s=^FCHI""))," & _
" Data0 = Source{0}[Data] , #""Type modifié"" =
Table.TransformColumnTypes(Data0,{{""Symbole"", type text},
{""Nom de la société""...