Array Function

рдбреЗрдЯрд╛ рдлрд╛рдБрдЯрд╕рдБрдЧ рдЪрд▓ рднрд┐рдиреНрди рдкреНрд░рдХрд╛рд░ рдлрд░реНрдХрд╛рдЙрдБрдЫ ред

рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:


рдПрд░реЗ (рддрд░реНрдХ рд╕реВрдЪреА)

DimрдПрд░реЗ рдкрдирд┐ рд╣реЗрд░реНрдиреБрд╣реЛрд╕реН

рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:

рдЕрд▓реНрдкрд╡рд┐рд░рд╛рдорд╣рд░реВрджреНрд╡рд╛рд░рд╛ рд╡рд┐рднрд╛рдЬрд┐рдд рддрд░реНрдХ рд╕реВрдЪреА: рдХреБрдиреИ рдкрдирд┐ рддрд░реНрдХрд╣рд░реВрдХреЛ рд╕реВрдЪреА рд╕рдЩреНрдЦреНрдпрд╛ ред

рдЙрджрд╛рд╣рд░рдг:


    Dim A As Variant
    A =рдПрд░реЗ("рдлреНрд░реЗрдб","рдЯрдо","рдмрд┐рд▓")
    Msgbox A(2)