#"Сведенный столбец" = Table.Pivot (
    #"Измененный тип1", 
    List.Distinct ( #"Измененный тип1"[Пользовательская.1] ), 
    "Пользовательская.1", 
    "Пользовательская.2", 
    ( x ) => x
  )

let
  src = Excel.CurrentWorkbook(){[ Name = "Таблица1" ]}[Content],
  typed = Table.TransformColumnTypes ( src, { { "Столбец3", type text }, { "Столбец4", type text }, { "Столбец5", type text } } ),
  filter = Table.SelectRows (
    typed,
    each not Text.Contains ( [Столбец3] ?? ".", "." ) and [Столбец3] <> [Столбец4] and not Text.StartsWith ( [Столбец3], "недвижимости:" )
  ),
  transform = Table.FromRecords (
    Table.TransformRows (
      filter,
      ( r ) =>
        Record.TransformFields (
          r,
          {
            {
              "Столбец3",
              ( x ) =>
                List.Accumulate (
                  {
                    { "Виды разрешенного использования объекта", "Виды разрешенного использования объекта недвижимости:" },
                    { "Виды разрешенного использования объекта недвижимости: недвижимости:", "Виды разрешенного использования объекта недвижимости:" }
                  },
                  x,
                  ( s, c ) => Text.Replace ( s, c{0}, c{1} )
                )
            },
            { "Столбец4", ( x ) => x ?? r[Столбец5] }
          }
        )
    )
  ),
  fillDown = Table.FillDown ( transform, { "Столбец1" } ),
  group = Table.Group (
    fillDown,
    { "Столбец1" },
    { { "tbl", ( t ) => Table.FromList ( { t[Столбец4] }, ( x ) => x, t[Столбец3] ), type table } },
    GroupKind.Local
  ),
  combine = Table.Combine ( group[tbl] )
in
  combine