QUIK

winbin, firstbyte.ru/manuals/kak-zamenit-rdp-port-v-windows-server-2012-2016-2019-2022/ минимум это надо сделать обязательно.

Установка Quik на виртуальный сервер VPSВ связи с одновременным отключением проводного и мобильного интернета по всему краю в любой момент р...

Cubigator,
может потом квик запускать оффлайн?

Павел Н., Открываете новый график с любым текущим инструментом, желательно с которым вы не работаете. Выходите из квика. В папке архивы нахо...

Павел Н., Открываете новый график с любым текущим инструментом, желательно с которым вы не работаете. Выходите из квика. В папке архивы нахо...

Как отключить вход в Квик по смс? В Сбере кто нить смог отключить это ?
В региональных банках есть вход через ключ на флешке.
В стране уже к...

квикДобрый день, тема избита но всё же, кто подскажет как загрузить архив за август 2016 в квик, обращение к брокеру результата не дает . Ав...

----------
Send  0.001
----------
Reply 0.029
status 3
trans_id 9999
msg Заявка 2001882023283372213 успешно зарегистрирована.
client_code SPBFUT00egd
order_num 2001882023283372213 price 2508.0
----------
Order 0.103
client_code SPBFUT00egd
order_num 2001882023283372213 price 2508.0
----------
Order 0.103
client_code SPBFUT00egd
order_num 2001882023283372213 price 2508.0
----------

-- Если FILL_OR_KILL не исполняется, msg в окне сообщений
-- Ошибка создания заявки. [GW][4103]
-- "Неполное сведение FOK заявки."
-- result = "",
-- OnTransReply(): status=4, msg=см.выше, order_num=0.
SecCode = "MMZ5"
ClsCode = "SPBFUT"
TransId = 9999
EventLog = {}
Tags = {"Send", "Reply", "Order", "Trade"}

function OnInit (scriptPath)
  ScriptPath = scriptPath
end -- OnInit()

function OnOrder (order) -- Постановка в очередь
  if order.

🚀 Шаг 1: Создаем новый Excel файл

1.1. Структура листов:

• 📊 Котировки - текущие цены инструментов

• 🎯 Торговля - ручная отправка заявок

• 🤖 Автоторговля - автоматические стратегии

• 💼 Портфель - текущие позиции

• ⚙ Настройки - параметры подключения

• 📈 Графики - визуализация данных

🎨 Шаг 2: Настраиваем листы

Лист «Настройки» (Settings)

A1: "НАСТРОЙКИ ПОДКЛЮЧЕНИЯ К QUIK"
A3: "DDE Service:"      B3: "QLUA"
A4: "DDE Topic:"        B4: "QuikTrans2"
A5: "Торговый счет:"    B5: "L01-00000F00"
A6: "Клиентский код:"   B6: ""

A8: "СПИСОК ИНСТРУМЕНТОВ"
A9: "Тикер"   B9: "Название"        C9: "Класс"   D9: "Лот"
A10: "GAZP"   B10: "Газпром"        C10: "TQBR"   D10: "10"
A11: "SBER"   B11: "Сбербанк"       C11: "TQBR"   D11: "10"
A12: "LKOH"   B12: "Лукойл"         C12: "TQBR"   D12: "1"
A13: "GMKN"   B13: "Норникель"      C13: "TQBR"   D13: "1"

Лист «Котировки» (Quotes)

A1: "ТЕКУЩИЕ КОТИРОВКИ"
A2: "Тикер"   B2: "Послед."   C2: "Бид"   D2: "Оффер"   E2: "Объем"   F2: "Время"   G2: "Изменение %"

🔧 Настройка связи Excel → QUIK

1. Установка необходимых компонентов

' В Excel нужно добавить ссылки на библиотеки:
' 1. QUIK API (qlua.exe)
' 2. Microsoft XML
' 3. ADODB для работы с базой данных

2. Базовый шаблон торговой таблицы Excel

Код для Excel VBA

' Модуль для работы с QUIK через DDE
Option Explicit

' Настройки подключения
Private Const QUIK_DDE_SERVICE = "QLUA"
Private Const QUIK_DDE_TOPIC = "QuikTrans2"
Private Const TRANS2_TABLE = "TRANS2"

' Подключение к QUIK
Public Sub ConnectToQUIK()
    On Error GoTo ErrorHandler
    
    Dim ddeChannel As Long
    ddeChannel = DDEInitiate(QUIK_DDE_SERVICE, QUIK_DTE_TOPIC)
    
    If ddeChannel > 0 Then
        ThisWorkbook.Sheets("Контроль").Range("B2").