let
// There is a named range in the workbook, reportDate
// The date value is taken from the named cell
// Make sure it is a valid date entered into the cell, so the following expression can convert it to the require format
reportDate = Date.ToText(Date.From(Excel.CurrentWorkbook(){[Name="reportDate"]}[Content]{0}[Column1]), [Format="dd.MM.yyyy"]),
// The reportDate identifier is supposed to returna text
// You can test it by enabling the following line if you experience problems with the named range
// reportDate = "13.07.2023",
// This is tricky, and requires more than HTML knowledge
// It is a lot to explain here, but simply need to monitor the actual page request/response,
// Find the necessary query elements and values from the request to form the actual URL
Source = Web.Page(Web.Contents("https://bildirim.epdk.gov.tr/bildirim-portal/faces/pages/tarife/petrol/yonetim/bultenSorgula.xhtml?bultenKriterleriForm%3Aj_idt32=bultenKriterleriForm%3Aj_idt32&bultenKriterleriForm=bultenKriterleriForm&bultenKriterleriForm%3Aj_idt30_input=" & reportDate & "&javax.faces.ViewState=")),
// This web service returns HTML code as a whole page
// Beyond that, it returns unknown number of elements,
// Therefore, we need to find the table we need to get
FindTable = Table.SelectRows(Source, each Table.ColumnNames([Data]){0} = "Yakıt Tipi"),
// If the requested table is found, then expand it
Result = if Table.RowCount(FindTable) = 1 then FindTable{0}[Data] else null
in
Result