Gemini와 Power Query로 Excel 환율 추적기 만들기

Gemini에게 매크로 없는 Excel Power Query M 쿼리를 작성해 달라고 요청하세요.
https://exchangerate.dev/docs/api-reference
와 익명 엔드포인트 /v1/latest/USD?symbols=JPY,KRW,EUR 를 사용합니다.
Web.Contents에서 RelativePath = "v1/latest/USD" 및
Query = [symbols = "JPY,KRW,EUR"] 를 사용하세요. JSON을 파싱하고
rates, sources, data_updated_at, market_session 필드가 있는지 검증한 뒤
Currency, Rate, Source, DataUpdatedAt, MarketSession 열을 반환하세요.
API 키나 추측한 대체값은 넣지 말고 HTTP 오류를 표시하세요.

let
    Response = Web.Contents(
        "https://api.exchangerate.dev",
        [
            RelativePath = "v1/latest/USD",
            Query = [symbols = "JPY,KRW,EUR"],
            ManualStatusHandling = {429}
        ]
    ),
    Status = try Value.Metadata(Response)[Response.Status] otherwise 200,
    Checked = if Status <> 200 then
        error "The FX endpoint returned HTTP " & Text.From(Status)
      else Response,
    Json = Json.Document(Checked),
    Rates = try Json[rates] otherwise error "The response has no rates field",
    Sources = try Json[sources] otherwise error "The response has no sources field",
    UpdatedAt = try Json[data_updated_at] otherwise error "The response has no data_updated_at field",
    Session = try Json[market_session] otherwise error "The response has no market_session field",
    RequireRate = (rates as record, code as text) as number =>
        let value = try Record.Field(rates, code) otherwise null
        in if value is number and value > 0 then value else error (code & " is missing or invalid"),
    RequireSource = (sources as record, code as text) as text =>
        let value = try Record.Field(sources, code) otherwise null
        in if value is text and Text.Length(value) > 0 then value else error (code & " source is missing or invalid"),
    RequiredMetadata = if UpdatedAt is text and Text.Length(UpdatedAt) > 0 and Session is text and Text.Length(Session) > 0 then true else error "Required metadata is missing or invalid",
    Rows = if RequiredMetadata then Table.FromRecords({
        [Currency = "JPY", Rate = RequireRate(Rates, "JPY"), Source = RequireSource(Sources, "JPY"), DataUpdatedAt = UpdatedAt, MarketSession = Session],
        [Currency = "KRW", Rate = RequireRate(Rates, "KRW"), Source = RequireSource(Sources, "KRW"), DataUpdatedAt = UpdatedAt, MarketSession = Session],
        [Currency = "EUR", Rate = RequireRate(Rates, "EUR"), Source = RequireSource(Sources, "EUR"), DataUpdatedAt = UpdatedAt, MarketSession = Session]
    }) else error "Required metadata is missing or invalid",
    Typed = Table.TransformColumnTypes(Rows, {{"Currency", type text}, {"Rate", type number}, {"Source", type text}, {"DataUpdatedAt", type datetimezone}, {"MarketSession", type text}})
in
    Typed