• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

import in power query all pages from multi-page site.

RAM72

Member
How do I import in from power query the pages that has multiple pages

From webpage I insert url , I click inside the table, but import the first page only in power query

https://www.chcl.mu/storage-guide/

I have tried as below but still struggling

Original step

Code:
let
    Source = Web.Page(Web.Contents("https://www.chcl.mu/storage-guide/")),
    Data0 = Source{0}[Data],
    #"Changed Type" = Table.TransformColumnTypes(Data0,{{"ATP", type text}, {"VESSEL", type text}, {"CODE", type text}, {"VOYAGE", type text}, {"ACTUAL TIME OF ARRIVAL", type datetime}, {"DISCHARGE COMPLETE", type datetime}})
in
    #"Changed Type"

Modified code but still struggling

Code:
let GetResults=(URL) =>

let
    Source = Web.Page(Web.Contents("URL")),
    Data0 = Source{0}[Data],
    #"Changed Type" = Table.TransformColumnTypes(Data0,{{"ATP", type text}, {"VESSEL", type text}, {"CODE", type text}, {"VOYAGE", type text}, {"ACTUAL TIME OF ARRIVAL", type datetime}, {"DISCHARGE COMPLETE", type datetime}})
in
    #"Changed Type"

in GetResults
Preciously I used this code , but the site has changed its format

Code:
let
    Source = List.Numbers(1, 12),
    #"Converted to Table" = Table.FromList(Source, Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Changed Type" = Table.TransformColumnTypes(#"Converted to Table",{{"Column1", type text}}),
    #"Renamed Columns" = Table.RenameColumns(#"Changed Type",{{"Column1", "Page"}}),
    #"Added Custom" = Table.AddColumn(#"Renamed Columns", "Custom", each Web.Page(Web.Contents("http://www.chcl.mu/info/?id=30&page=" & [Page]))[Data]{2}),
    #"Expanded Custom" = Table.ExpandTableColumn(#"Added Custom", "Custom", {"VESSEL", "CODE", "VOY", "DATE START", "DISCHARGE", "STORAGE", "RESTACK", "RATE", "STORAGE REEFER"}, {"VESSEL", "CODE", "VOY", "DATE START", "DISCHARGE", "STORAGE", "RESTACK", "RATE", "STORAGE REEFER"}),
    #"Filtered Rows" = Table.SelectRows(#"Expanded Custom", each not Text.Contains([VESSEL], "12"))
in
    #"Filtered Rows"

Can someone help

 
Back
Top