有没有办法使用 Power Query 从跨度中提取“标题”属性内容？

Question

我正在尝试从网站上抓取一些数据，但我需要 span 标签中包含的日期/时间，如下所示：

<span class="hourAgo ng-binding" title="07/07/2020 às 09:43:33">Há 3 horas</span>

PowerQuery 看起来像这样：

    Source = Web.BrowserContents("https://www.reclameaqui.com.br/empresa/nestle/lista-reclamacoes/"),
    #"Extracted Table From Html" = 
        Html.Table(Source, {{
            "Column1", ".text-title"
            }, {
            "Column2", ".text-description"
            }, {
            "Column3", ".status-text"
            }, {
            "Column4", ".hourAgo" <<<<<<< Here's the class selector I got, but I need the title content
            }, {
            "Column5", ".mdi-map-marker + *"
            }}, 
            [RowSelector=".complain-list:nth-child(1) LI"]),

    #"Changed Type" = Table.TransformColumnTypes(#"Extracted Table From Html",{{
            "Column1", type text
            }, {
            "Column2", type text
            }, {
            "Column3", type text
            }, {
            "Column4", type text
            }, {
            "Column5", type text
            }})
in
    #"Changed Type"

所有其他列都很好。到目前为止，该代码返回了“Há 3 horas”跨度内容。

Answer 1

您可能希望单独提取该标题，因为它位于 span 标记内，这意味着您必须将站点解析为文本而不是 HTML。

1. 按换行符（新行）分割 HTML 文本。
2. 转换为表格。
3. 过滤以仅获取包含"hourAgo" 的行。
4. 提取引号之间的日期。

let
    Source = Web.BrowserContents("https://www.reclameaqui.com.br/empresa/nestle/lista-reclamacoes/"),
    #"Split Text" = Text.Split(Source, "#(lf)"),
    #"Converted to Table" = Table.FromList(#"Split Text", Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Filtered Rows" = Table.SelectRows(#"Converted to Table", each Text.Contains([Column1], "hourAgo")),
    #"Extracted Text Between Delimiters" = Table.TransformColumns(#"Filtered Rows", {{"Column1", each Text.BetweenDelimiters(_, "<span class=""hourAgo ng-binding"" title=""", """>"), type text}})
in
    #"Extracted Text Between Delimiters"

---

您也可以稍作更改以包含其他列之一，以便您可以与原始表格合并：

let
    Source = Web.BrowserContents("https://www.reclameaqui.com.br/empresa/nestle/lista-reclamacoes/"),
    #"Split Text" = Text.Split(Source, "#(lf)"),
    #"Converted to Table" = Table.FromList(#"Split Text", Splitter.SplitByNothing(), null, null, ExtraValues.Error),
    #"Filtered Rows" = Table.SelectRows(#"Converted to Table", each Text.Contains([Column1], "hourAgo")),
    #"Split Column by Delimiter" = Table.SplitColumn(#"Filtered Rows", "Column1", Splitter.SplitTextByDelimiter("</span>", QuoteStyle.Csv), {"Column1.1", "Column1.2", "Column1.3", "Column1.4", "Column1.5", "Column1.6", "Column1.7", "Column1.8", "Column1.9", "Column1.10", "Column1.11"}),
    #"Removed Other Columns" = Table.SelectColumns(#"Split Column by Delimiter",{"Column1.4", "Column1.7"}),
    #"Extracted Text After Delimiter" = Table.TransformColumns(#"Removed Other Columns", {{"Column1.4", each Text.BetweenDelimiters(_, "title=", ">"), type text}, {"Column1.7", each Text.Trim(Text.AfterDelimiter(_, ">")), type text}})
in
    #"Extracted Text After Delimiter"