РыбаМоя

Список может быть достаточно длинным (сотни значений). Я использую этот приём во всех своих викторинах, И даже сделала его автоматическое обновление каждый раз, когда он доходит до последнего значения (вот тут и возможно повторение одного вопроса два раза подряд - если в прошлом списке он был последним, а в новом стал первым)...

В служебном листе "С" перед тем как изменять наш макрос, надо определить две ячейки, желательно стоящих рядом, с именами "старт" и "финиш". Теперь перейдём к макросам. Выберем наш. Правый клик по кнопке —> выбираем "Назначить макрос" (уже имеется) —> и жмём "Править" Вот эти две строки: ---------------------------------------------------------------------------------------- Range("старт").Value = Now Range("финиш").Value = 0 Команда Now зафиксирует в ячейке "старт" время выдачи задания. А ячейку...

Тот замороченный способ, который я показывала раньше https://dzen.ru/a/Zfgbp2Nd9lHkb5ug больше подходит для больших и сложно-вложенных массивов данных. Гораздо чаще нужно получить список файлов из одной директории. Тогда вся эта заморочка с открытием и перекодировкой неоправданно сложна. На этот случай имеется такая, встроенная в Excel возможность. Пишем макрос и "вешаем" его на какую-нибудь оригинальную кнопочку Он работает следующим образом: ...

Sub Маркер() tc = ActiveCell.Column zvet = ActiveCell.Interior.ColorIndex trig = ActiveCell.Value If trig = Empty Then GoTo fin i = 0 hole = 0 'счётчик пустых строк konstr: 'новая строка i = i + 1 j = 0 molny: ' следующая ячейка справа soder = Cells(i, tc + j).Value ...