14 часов назад, Михаил Корепанов сказал:

Кто подскажет как исправить, не грузит результат игр тайм матч после того как игры закончились(обновить результаты)

FOOTBALL CALCULATION_Kovan(2026) (2).xlsb

Вот рабочий вариант

FOOTBALL CALCULATION_Kovan(2026).xlsb

14 часов назад, Feltra сказал:

Благодарю

👍

Изменено 19 августа19 авг пользователем sad

В 12.08.2026 в 09:56, Shurik91 сказал:

попросили восстановить😉

1F_MRT_HEAD_HUNTER_V12.08.2026.xlsb

Благодарю. Только мне кажется лист 6 НТ не правильно считает

В 12.08.2026 в 09:56, Shurik91 сказал:

попросили восстановить😉

1F_MRT_HEAD_HUNTER_V12.08.2026.xlsb

Прошу прощения !!!!!!!!

Все норм

miren arregle el elizabet q es super bueno.. ya descarga todos los datos y todos los resultados de nuevo, los mejores filtros de ambos marcan, 2.5 goles. y 1x o x2 ya funcionan

ElizaBet-DeLuxeGold_V4(KA) SJ fix 02-09-2026.xlsm

miren arregle el elizabet q es super bueno.. ya descarga todos los datos y todos los resultados de nuevo, los mejores filtros de ambos marcan, 2.5 goles. y 1x o x2 ya funcionan

ElizaBet-DeLuxeGold_V4(KA) SJ fix 02-09-2026.xlsm

Не знаю чем хороша эта табличка, хоть и приложил руку когда-то к ней. Но рекомендую дополнить.
Мокросом открытия всех закрытий😊
Sub Gizle()

Application.ExecuteExcel4Macro "Show.ToolBar(""Ribbon"",True)"

Application.DisplayStatusBar = True

ActiveWindow.DisplayWorkbookTabs = True

Application.DisplayFormulaBar = True

ActiveWindow.DisplayHeadings = True

ActiveWindow.DisplayGridlines = True

ActiveWindow.DisplayHorizontalScrollBar = True

ActiveWindow.DisplayVerticalScrollBar = True

End Sub
И макрос очистки заменить:
Sub ClearDataSheet()

Dim ws As Worksheet

Set ws = ThisWorkbook.Sheets("DataSheet")

Dim lastRow As Long

lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row

If lastRow < 3 Then Exit Sub

ws.Range(ws.Cells(3, 1), ws.Cells(lastRow, 86)).ClearContents

Sheets("DataPort").Range("J1").Calculate

End Sub

Увидите разницу😉

Изменено 3 сентября3 сент пользователем kovan

всем привет😉, на флешскор очередное маленькое изменение, по этому причине не работала таблица сверху и многие др не работают. Исправление касается, только тех таблиц, которые используют листы Дома, Дома/Дома, Дома/Гости

Как быстро восстановить работу, вашей любимой таблицы? Нужно заменить всего одну строчку кода, как все любят и всё☺️

ищем такую строку ( старая ):

oRegExp.Pattern = """id"":\""(\w\w\w\w\w\w\w\w)\"""

заменяем на новую:

oRegExp.Pattern = """(?:home|away)""\:\[\{""id"":\""(\w\w\w\w\w\w\w\w)\"""

готово👍

скрин для лучшего понимания ( исправление для Delux )

Для 1F_MRT данный вариант не подходит?

Для 1F_MRT данный вариант не подходит?

Подходит, только строка чуть другая:

.Pattern = """(?:home|away)""\:\[\{""id"":\""(\w\w\w\w\w\w\w\w)\"""

например этот:

1F_MRT_HEAD_HUNTER_.xlsb

Изменено 6 сентября6 сент пользователем kovan
добавил файл

Для 1F_MRT данный вариант не подходит?

уже восстанавливал😉

Salut, poate cineva să repare această masă?

BET-TOTAL 2020 (1).xlsx

Șurik91 Daca acel fisier nu se poate repara pentru ca este gol te rog mult ,mult de tot daca poti repara acest fisier pentru mine da rezultate foarte bune

BET-PLUS-2020-PRO-Ven (9).xlsm