РЕМОНТ ТАБЛИЦ

[VBAbots 100]

1 минуту назад, Nazarnineangels сказал:

Короче понял, машинное обучение.

Вот оно самое)) Но практика показала что это все фигня. У буков там свои программки похлеще любых машинных обучений))

[The Iron Wizard 1 436]

2 часа назад, Nazarnineangels сказал:

Не знаю даст ли результат тестирование на одной лиге.

Ты же любишь по экспортировать. Для извлечение счета я использую эту формулу 

=ПОДСТАВИТЬ(ПРАВСИМВ(ПСТР(" "&ПОДСТАВИТЬ($CT2;"_";ПОВТОР("_";999));1;999*1);999);"_";"")

 

germany - bundesliga.xlsx

[Валерий Иванович 543]

Нужен кому-нибудь этот макрос? Или не стоит тему засорять? )

Лично мое использование, авто прокручивание live игр прямо из excel таблицы, при достижении определённых условий из статистики, отправка сигнала в телеграмм бот по заданному алгоритму. И сбор xg для архива. 

Возможности использования ограничены лишь вашей фантазией. Ничего не нужно за него )

Video_2025-06-13_222106.wmv

Изменено 13 июня пользователем Валерий Иванович

[Nazarnineangels 6 032]

7 минут назад, The Iron Wizard сказал:

Ты же любишь по экспортировать. Для извлечение счета я использую эту формулу 

=ПОДСТАВИТЬ(ПРАВСИМВ(ПСТР(" "&ПОДСТАВИТЬ($CT2;"_";ПОВТОР("_";999));1;999*1);999);"_";"")

 

germany - bundesliga.xlsx 706.22 kB · 0 загрузок

Спасибо.

[Xylio 0]

В 06.06.2025 в 00:25, kovan сказал:

Так хотел?

Punter Bets Flashscorev_mod_RedStar (2).xlsb 846.86 kB · 30 загрузок

Да, все верно)) Спасибо!

[Al ousseni guira 0]

qui a ou peut trouver ce program

[Fiksar 268]

11 часов назад, Валерий Иванович сказал:

Нужен кому-нибудь этот макрос? Или не стоит тему засорять? )

Лично мое использование, авто прокручивание live игр прямо из excel таблицы, при достижении определённых условий из статистики, отправка сигнала в телеграмм бот по заданному алгоритму. И сбор xg для архива. 

Возможности использования ограничены лишь вашей фантазией. Ничего не нужно за него )

Video_2025-06-13_222106.wmv 17.72 MB · 16 загрузок

Валерий Иванович, буду премного благодарен за этот макрос!

[Andrey Nikitin aka Nik Andre 2]

13 часов назад, Валерий Иванович сказал:

Нужен кому-нибудь этот макрос? Или не стоит тему засорять? )

Лично мое использование, авто прокручивание live игр прямо из excel таблицы, при достижении определённых условий из статистики, отправка сигнала в телеграмм бот по заданному алгоритму. И сбор xg для архива. 

Возможности использования ограничены лишь вашей фантазией. Ничего не нужно за него )

Video_2025-06-13_222106.wmv 17.72 MB · 21 загрузка

Конечно нужен

[Druskoking777 627]

16 часов назад, Валерий Иванович сказал:

Нужен кому-нибудь этот макрос? Или не стоит тему засорять? )

 

Video_2025-06-13_222106.wmv 17.72 MB · 23 загрузки

Чтобы ответить на ваш вопрос... вы можете попробовать поделиться файлом, и если он кому-то нужен, они его скачают.

 

Например, Shurik91 поделился восстановленными файлами, не спросив об этом... Вы хотите, чтобы я поделился файлами macbeth-altadar, когда закончу их восстановление?

 

[Валерий Иванович 543]

6 часов назад, Fiksar сказал:

Валерий Иванович, буду премного благодарен за этот макрос!

Скидываю файл целиком в формате *.bas - это экспортируемый файл из таблицы.
1. Его так же можно импортировать в любую другую таблицу: вашу, чужую, общую и т.д. Но в исходном виде он работать у вас не будет из-за разности в ячейках, указанных столбцах, названиях страниц. Все это требует персональной настройки под конкретную таблицу.

2. Версия excel не имеет значения, т.к. многие будут говорить, что у меня другая версия, что не подходит, не запускается и т.д. и т.п., написана под определенную версию. Нет, работает в любой версии.

3. Так же оговариваю момент, что Win'da ваша тоже роли в ее работе никакой не играет и никак на ее поведение не реагирует.  

Для работы в общем цикле, вызывается стандартно: 

Call getLive(match_id)

Переменные outWs, inWs - название страниц, указываем свои из своих таблиц.
inWs.Range("R" & rw).value и inWs.Range("S" & rw).value - столбец для записи, указываем свои, куда вам будет писать их автомат (кнопка Live из видео).

Кусочек кода для hyperlink в подарок:

match_id = Sheets("Анализ").Range("B7").value
If Target.Range.Address = "$I$61" Then
match_id = Sheets("Анализ").Range("B7").value
If IsEmpty(match_id) Then MsgBox "Отсутствует match_id для загрузки данных!": Exit Sub
getLive (match_id)
End If
If Target.Range.Address = "$N$61" Then
Sheets("Анализ").Range("I27:O60").ClearContents
End If

Отвечает за ссылки Загрузить и Очистить. Диапазон указываем свой, так же как и название страницы.


Указываем там все свое: ячейки, название страниц и прочее. С наладкой под ваши таблицы обращайтесь к уважаемому Александру. Кто разбирается - разберется. Кто не разбирается - не пытайтесь. 

Всем благ и удачи 

Сам файлик тута:
g_8_Live.bas

Изменено 14 июня пользователем Валерий Иванович

[Druskoking777 627]

Hace 3 minutos, Valery Ivanovich dijo:

Subo el archivo completo en formato *.bas; se trata de un archivo exportado de la tabla.
1. También se puede importar a cualquier otra tabla: la suya, la de otro usuario, una común, etc.
2. La versión de Excel no importa, ya que muchos dirán que tengo una versión diferente, que no es compatible, que no se inicia, etc., que está escrita para una versión específica. No, funciona en cualquier versión.
3. También estipulo que su Win'da no influye en su funcionamiento ni reacciona a su comportamiento de ninguna manera.  

Para trabajar en un ciclo común, se llama de forma estándar: 

Variables outWs e inWs: nombres de página; especifique los suyos propios de sus tablas.
inWs.Range("R" & rw).value e inWs.Range("S" & rw).value: columnas para la grabación; especifique las suyas propias, donde la máquina las escribirá (botón "En directo" del video).

Un fragmento de código para el hipervínculo como obsequio:

Responsable de cargar y borrar enlaces. Especificamos nuestro propio rango, así como el nombre de la página. Especificamos todo: celdas, nombres de página, etc. Para ajustes en sus tablas, contacte con el respetado Alexander. Quienes lo entiendan, lo entenderán. Quienes no,  mejor no lo intenten. ¡Mucha suerte  ! El archivo está aquí:







g_8_Live.bas

Большое спасибо, очень благодарен.

[Fiksar 268]

55 минут назад, Валерий Иванович сказал:

Скидываю файл целиком в формате *.bas - это экспортируемый файл из таблицы.
1. Его так же можно импортировать в любую другую таблицу: вашу, чужую, общую и т.д. Но в исходном виде он работать у вас не будет из-за разности в ячейках, указанных столбцах, названиях страниц. Все это требует персональной настройки под конкретную таблицу.

2. Версия excel не имеет значения, т.к. многие будут говорить, что у меня другая версия, что не подходит, не запускается и т.д. и т.п., написана под определенную версию. Нет, работает в любой версии.

3. Так же оговариваю момент, что Win'da ваша тоже роли в ее работе никакой не играет и никак на ее поведение не реагирует.  

Для работы в общем цикле, вызывается стандартно: 

Call getLive(match_id)

Переменные outWs, inWs - название страниц, указываем свои из своих таблиц.
inWs.Range("R" & rw).value и inWs.Range("S" & rw).value - столбец для записи, указываем свои, куда вам будет писать их автомат (кнопка Live из видео).

Кусочек кода для hyperlink в подарок:

match_id = Sheets("Анализ").Range("B7").value
If Target.Range.Address = "$I$61" Then
match_id = Sheets("Анализ").Range("B7").value
If IsEmpty(match_id) Then MsgBox "Отсутствует match_id для загрузки данных!": Exit Sub
getLive (match_id)
End If
If Target.Range.Address = "$N$61" Then
Sheets("Анализ").Range("I27:O60").ClearContents
End If

Отвечает за ссылки Загрузить и Очистить. Диапазон указываем свой, так же как и название страницы.


Указываем там все свое: ячейки, название страниц и прочее. С наладкой под ваши таблицы обращайтесь к уважаемому Александру. Кто разбирается - разберется. Кто не разбирается - не пытайтесь. 

Всем благ и удачи 

Сам файлик тута:
g_8_Live.bas

Спасибо большое за файлик!! Будем разбираться.

[kovan 1 516]

В 03.05.2025 в 08:53, kovan сказал:

Ещё вариант. Добавил пункт "ТОП-10", фильтрует топ из списка "UEFA рейтинги"

Англия Premier League, Италия Serie A, Испания LaLiga, Германия Bundesliga, Франция Ligue 1, Нидерланды Eredivisie, Португалия Liga Portugal Betclic, Чехия Chance Liga, ТурцияTrendyol Super lig, Бельгия Pro League.

Исключив все женские.

Добавил кнопки по одбору на ТБ2.5 или ОЗ (но это только на "все лиги" иначе ничего не будет)

Тема из телеграм https://t.me/c/1318481457/12635

 

MACBETH_v3.2_top5_10_KA.xlsb 762.09 kB · 132 загрузки

Обновил мой мод, добавлено кое-что.

Спасибо Shurik91

MACBETH_v3.2_top5_10_KA+1.xlsb

Изменено 14 июня пользователем kovan

[Nazarnineangels 6 032]

На сколько точно можна доверять статистике на айскор? Может кто в курсе.

[sergij solovij 18]

порівняти з флешскор

 

[Nazarnineangels 6 032]

7 минут назад, sergij solovij сказал:

порівняти з флешскор

 

Топові матчі норм, але цікавлять ігри в яких на флешскор нема статистики, а тут є.

[sergij solovij 18]

подивитись в якійсь конторе , наприклад бетсіті

[VBAbots 100]

21 минуту назад, Nazarnineangels сказал:

На сколько точно можна доверять статистике на айскор? Может кто в курсе.

Я доверяю)) Но как ее спарсить не знаю)

[Nazarnineangels 6 032]

18 минут назад, VBAbots сказал:

Я доверяю)) Но как ее спарсить не знаю)

Я уже сделал, просто интересно достоверная ли там инфа по статистике.

[Nazarnineangels 6 032]

25 минут назад, VBAbots сказал:

Я доверяю)) Но как ее спарсить не знаю)

Если нужно, я могу выложить этот парсер, будет вся эта инфа выводится списком по всех лайв играх. Но помню прошлый раз у некоторых были проблемы с этим сайтом.

[VBAbots 100]

29 минут назад, Nazarnineangels сказал:

Если нужно, я могу выложить этот парсер, будет вся эта инфа выводится списком по всех лайв играх. Но помню прошлый раз у некоторых были проблемы с этим сайтом.

Ну там единственное что матч может по факту не идти а он идет))) Либо он еще не закончился а на сайте уже закончился. А ты это через апи или через эйджтиэмэль?

[Nazarnineangels 6 032]

2 минуты назад, VBAbots сказал:

Ну там единственное что матч может по факту не идти а он идет))) Либо он еще не закончился а на сайте уже закончился. А ты это через апи или через эйджтиэмэль?

Там нужна имитация работы человека. Нет не html.

[Nazarnineangels 6 032]

Только что, Nazarnineangels сказал:

Там нужна имитация работы человека. Нет не html.

Точнее да, html.

[VBAbots 100]

6 минут назад, Nazarnineangels сказал:

Точнее да, html.

Вот по этому я и не делаю)) Для меня это трудновато в плане времени)) За  html парсинг надо брать двойной тариФ))))

[Nazarnineangels 6 032]

3 минуты назад, VBAbots сказал:

Вот по этому я и не делаю)) Для меня это трудновато в плане времени)) За  html парсинг надо брать двойной тариФ))))

Спасибо за подсказку, про двойной тариф.