Just for fun, I tried doing this using PowerQuery. Just stupid level easy.
Code:
let
Source = Web.BrowserContents("https://www.fedex.com/fedextrack/?trknbr=581190049992&trkqual=12023~581190049992~FDEG"),
#"Extracted Table From Html" = Html.Table(Source, {{"Column1", "TRK-SHARED-SHIPMENT-FACTS-NEW:nth-child(2) > DIV > DIV.shipment-facts-box.mt-8.mb-7:nth-child(1) > DIV.body > TABLE.shipment-fact-table.fdx-c-table.fdx-c-table\-\-default.mt-2.mb-2:nth-child(5) > * > TR > :nth-child(1)"}, {"Column2", "TRK-SHARED-SHIPMENT-FACTS-NEW:nth-child(2) > DIV > DIV.shipment-facts-box.mt-8.mb-7:nth-child(1) > DIV.body > TABLE.shipment-fact-table.fdx-c-table.fdx-c-table\-\-default.mt-2.mb-2:nth-child(5) > * > TR > :nth-child(2)"}}, [RowSelector="TRK-SHARED-SHIPMENT-FACTS-NEW:nth-child(2) > DIV > DIV.shipment-facts-box.mt-8.mb-7:nth-child(1) > DIV.body > TABLE.shipment-fact-table.fdx-c-table.fdx-c-table\-\-default.mt-2.mb-2:nth-child(5) > * > TR"]),
#"Changed Type" = Table.TransformColumnTypes(#"Extracted Table From Html",{{"Column1", type text}, {"Column2", type text}}),
#"Filtered Rows" = Table.SelectRows(#"Changed Type", each ([Column1] = "ACTUAL DELIVERY")),
#"Transposed Table" = Table.Transpose(#"Filtered Rows"),
#"Promoted Headers" = Table.PromoteHeaders(#"Transposed Table", [PromoteAllScalars=true]),
#"Changed Type1" = Table.TransformColumnTypes(#"Promoted Headers",{{"ACTUAL DELIVERY", type text}})
in
#"Changed Type1"
The super annoying thing is the Excel includes the PowerQuery library or whatever, but Access doesn't. So you'd likely have to run it through Excel, so I guess it's a non- answer. (that's okay... took me like 2 minutes to do)