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

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

Рабочий, готовый к использованию "модуль" загрузки общей, домашней и гостевой таблицы на базе Shurik91. Для полноценности, добавил запись РГ, может кто пользуется этими значениями.

Грузит так:


table_a - пишем свои, или необходимые.
nmshet - название листа.
frow и lrow - диапазон столбцов для записи данных.

В принципе на этом фсё, пока что )

g_5_Data.bas

Изменено 2 августа, 2024 пользователем Валерий Иванович

[geff 4]

Может кому пригодится. Таблицу грузит. Пристально не тестил.  Ничего не менял. 

DeluX_API-based_v1.0 mod RedStar.xlsm

[cemre 2]

Automatic version of the file. Outosaves the output.  I hope someone repairs the non-working parts
 

Univers_liga_2v (6).xlsm

[Кирилл Клейменов 311]

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

Рабочий, готовый к использованию "модуль" загрузки общей, домашней и гостевой таблицы на базе Shurik91. Для полноценности, добавил запись РГ, может кто пользуется этими значениями.

Грузит так:


table_a - пишем свои, или необходимые.
nmshet - название листа.
frow и lrow - диапазон столбцов для записи данных.

В принципе на этом фсё, пока что )

g_5_Data.bas 2.85 kB · 15 загрузок

Может кому-то (по отдельности) - конечно понадобится... НО - в Канале - недавно была таблица - которая (за секунды) парсила Линию на день и за минуту - подставляла те-же данные... правда считала - по последним шести играм... (что меня в принципе устраивает... хотя...))  

Называется - Nicnaim - Stats.2...

[Игорь Бухтяев 13]

IncoSJSportFormula 1,2.xlsb

Добрый день. Возможно отремонтировать данную таблицу?

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

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

Линию на день и за минуту

Линия - это я понимаю просто названия лиг, команд, счет, разные ID, страна. Короче вся информация что дается по этой ссылке: Call Download_site("https://d." & sourcer & "x/feed/f_1_" & dayzone & "_" & timezone & suffix, fs_input)

У меня 1500 матчей в среднем за 3 секунды прогружаются без всякого api и т.д. Около 2 сек уходит на загрузку home\away\data\odds данных для одного матча. И это на старом парсере. 

А это чудо "Nicnaim - Stats.2" не встречал )

Изменено 3 августа, 2024 пользователем Валерий Иванович

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

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

Около 2 сек уходит на загрузку home\away\data\odds данных для одного матча

Что бы не думали что я балабол ))
Это загрузка данных:

Это касательно загрузки списка игр, сегодня 1182 игры за 1.48 сек

Изменено 3 августа, 2024 пользователем Валерий Иванович

[Shurik91 651]

17 часов назад, k.a.isakov сказал:

А может быть такое, что ссылки с приставкой ss1 нет?

такое может быть в 2-х случаях:

1-й если таблица, не использует турнирную таблицу для анализа

2-й таблица уже использует новый url для загрузки.

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

[red_star 162]

1 час назад, Кирилл Клейменов сказал:

Может кому-то (по отдельности) - конечно понадобится... НО - в Канале - недавно была таблица - которая (за секунды) парсила Линию на день и за минуту - подставляла те-же данные... правда считала - по последним шести играм... (что меня в принципе устраивает... хотя...))  

Называется - Nicnaim - Stats.2...

Эта программа всем хороша. Но есть одно НО.) Не считывается количество матчей, сыгранных в данном сезоне (количество туров). То есть, если чемпионат только начался, то считывается статистика прошлого чемпионата. Вот если бы это подправить, цены бы ей не было. А так очень нравится разделение на считывание всей линии и потом отбор с исключением "дворовых" лиг. 

[red_star 162]

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

Рабочий, готовый к использованию "модуль" загрузки общей, домашней и гостевой таблицы на базе Shurik91. Для полноценности, добавил запись РГ, может кто пользуется этими значениями.

Грузит так:


table_a - пишем свои, или необходимые.
nmshet - название листа.
frow и lrow - диапазон столбцов для записи данных.

В принципе на этом фсё, пока что )

g_5_Data.bas 2.85 kB · 17 загрузок

То есть Вы рекомендуете убрать все блоки с ss и вместо них вставить Ваши подпрограммы?

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

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

То есть Вы рекомендуете убрать все блоки с ss и вместо них вставить Ваши подпрограммы?

Именно. Блоки ss отличаются от данного кода, тем что жутко тормозят. Шурик написал функцию для загрузки таблиц и форм. Я дал обработку этих данных для записи в таблицу, с последующим их использованием.

Кусок данного кода полностью замещает блоки ss, имеет компактный вид и понимание к чтению. Интегрирован с функцией Шурика.

 

Sub getData(match_id)
On Error Resume Next
optimize (True)
selectSource
Sheets("Data").Range("A2:AF49").ClearContents
table_a = Array("table_overall", "table_home", "table_away")
For table_i = 0 To 2
rw = 2
Select Case table_i
Case 0: nmshet = "Data": frow = 1: lrow = 10
Case 1: nmshet = "Data": frow = 12: lrow = 21
Case 2: nmshet = "Data": frow = 23: lrow = 32
End Select
table_name = getTable(match_id, sourcer, table_a(table_i))
For Each subMatches In table_name
If IsEmpty(subMatches) Then Exit For
table_m = Array(subMatches(0), subMatches(3), subMatches(6), subMatches(9), subMatches(12), subMatches(15), subMatches(18), subMatches(19), subMatches(22), subMatches(25))
Sheets(nmshet).Cells(rw, frow).Resize(1, lrow - frow + 1).value = table_m
rw = rw + 1
Next subMatches
Next table_i
optimize (False)
End Sub

 

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

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

Именно. Блоки ss отличаются от данного кода, тем что жутко тормозят. Шурик написал функцию для загрузки таблиц и форм. Я дал обработку этих данных для записи в таблицу, с последующим их использованием.

Кусок данного кода полностью замещает блоки ss, имеет компактный вид и понимание к чтению. Интегрирован с функцией Шурика.

 

Sub getData(match_id)
On Error Resume Next
optimize (True)
selectSource
Sheets("Data").Range("A2:AF49").ClearContents
table_a = Array("table_overall", "table_home", "table_away")
For table_i = 0 To 2
rw = 2
Select Case table_i
Case 0: nmshet = "Data": frow = 1: lrow = 10
Case 1: nmshet = "Data": frow = 12: lrow = 21
Case 2: nmshet = "Data": frow = 23: lrow = 32
End Select
table_name = getTable(match_id, sourcer, table_a(table_i))
For Each subMatches In table_name
If IsEmpty(subMatches) Then Exit For
table_m = Array(subMatches(0), subMatches(3), subMatches(6), subMatches(9), subMatches(12), subMatches(15), subMatches(18), subMatches(19), subMatches(22), subMatches(25))
Sheets(nmshet).Cells(rw, frow).Resize(1, lrow - frow + 1).value = table_m
rw = rw + 1
Next subMatches
Next table_i
optimize (False)
End Sub

 

Вам только нужно подставить названия своих листов, и нумерацию столбцов - только то.
Кстати, optimize (True) и selectSource скорее всего не будет работать, у вас данных модулей нет.

Изменено 3 августа, 2024 пользователем Валерий Иванович

[red_star 162]

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

Вам только нужно подставить названия своих листов, и нумерацию столбцов - только то.

Спасибо! Сейчас займусь.

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

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

Спасибо! Сейчас займусь.

Удачи  

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

5 минут назад, red_star сказал:

Спасибо! Сейчас займусь.

Можете просто сравнить свои старые блоки ss с блоком ss этой версии (которая перестала работать). В ваших заблудиться можно, а тут все перед глазами

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

3 часа назад, Кирилл Клейменов сказал:

Называется - Nicnaim - Stats.2...

В чем ее суть? Кроме быстроты ))

[HukMakcuM 11]

Товарищи прогеры!
Поделитесь пожалуйста рабочей на сегодня версией "Proga Farela"?
Небезвоздмезно конечно.

[Farel 991]

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

Товарищи прогеры!
Поделитесь пожалуйста рабочей на сегодня версией "Proga Farela"?
Небезвоздмезно конечно.

Тут уже выложил. 

 

[HukMakcuM 11]

13 минут назад, Farel сказал:

Тут уже выложил. 

 

А другие варианты есть?

[Smallville 0]

15 минут назад, HukMakcuM сказал:

Товарищи прогеры!
Поделитесь пожалуйста рабочей на сегодня версией "Proga Farela"?
Небезвоздмезно конечно.

в соседней теме лежит

[виталий морозов 26]

посмотрите вот эту программу может кто то ремонтирует

3F_ELIZABET_PRO_2022_V.1.0.71.xlsm

[wanderer375 150]

36 минут назад, виталий морозов сказал:

посмотрите вот эту программу может кто то ремонтирует

3F_ELIZABET_PRO_2022_V.1.0.71.xlsm 10.94 MB · 2 загрузки

А вот в ней что хорошего вы нашли? Я ее когда то крутил  и так, и сяк - всё мимо

[Farel 991]

1 час назад, HukMakcuM сказал:

А другие варианты есть?

В каком смысле другие варианты, последний рабочий вариант.

[виталий морозов 26]

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

А вот в ней что хорошего вы нашли? Я ее когда то крутил  и так, и сяк - всё мимо

в первом тайме неплохо идет, только когда много игр, суббота, воскрксенье 

[виталий морозов 26]

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

А вот в ней что хорошего вы нашли? Я ее когда то крутил  и так, и сяк - всё мимо

ok

Изменено 3 августа, 2024 пользователем виталий морозов