Добрый день! Подскажите, может у кого-то была такая проблема? Используется внешний SDD накопитель. В день создания файла все работает стабильно, но на следующий день. Он почему-то повреждается (см. скриншот).
Добрый день! Подскажите, пожалуйста, как сделать чтобы файл ссылался на себя при обновлении данных без пути? Если его переместили на другой ПК или папку. Возможно ли?
MikeVol, чем дополнить данный код, чтобы при закрытии файла было запоминание? Работает отлично то что надо, но при повторном открытии все приходится вносить данные заново.
Добрый день! Написала макрос на раскрытие/скрытие:
Private Sub CommandButton1_Click() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets("Реестр MDR")
ws.Columns("F:K").EntireColumn.Hidden = Not CheckBox1.value ws.Columns("M:X").EntireColumn.Hidden = Not CheckBox2.value ws.Columns("AB:AD").EntireColumn.Hidden = Not CheckBox3.value ws.Columns("AE:AS").EntireColumn.Hidden = Not CheckBox4.value ws.Columns("AT:AX").EntireColumn.Hidden = Not CheckBox5.value ws.Columns("AZ:BA").EntireColumn.Hidden = Not CheckBox6.value ws.Columns("BB").EntireColumn.Hidden = Not CheckBox7.value ws.Columns("BC:BM").EntireColumn.Hidden = Not CheckBox8.value ws.Columns("BN:BX").EntireColumn.Hidden = Not CheckBox9.value ws.Columns("BY:CK").EntireColumn.Hidden = Not CheckBox10.value ws.Columns("CL:CX").EntireColumn.Hidden = Not CheckBox11.value ws.Columns("CY:DK").EntireColumn.Hidden = Not CheckBox12.value ws.Columns("DL:DV").EntireColumn.Hidden = Not CheckBox13.value
MsgBox "Изменения применены!" End Sub
Добавила запуск через кнопку:
Sub ShowUserForm() UserForm2.Show End Sub
Хочу добавить условие чтобы при повторном открытии макроса через кнопку он запоминал, что было ранее выбрано. Как это сделать? Подскажите, пожалуйста.
Необходимо создать генератор случайных чисел от общей суммы с определенной позицией чисел. Н-р: надо разбить число 50 на 5 позиций. Он автоматом разбил на эти числа 12 8 16 9 5 (могут быть любые но в сумме должны давать общее, т.е. в данном случае 50) Или хочу разбить 50 на 3 позиции, тогда 25 14 11 , или 245 на 2 , тогда 156 89. Числа в позициях не должны быть одинаковыми.
Добрый день! Подскажите где ошибка в формуле? Не считает условие если ячейка не пустая, выводит #Н/Д. В ячейке AG стоит дата.
=ЕСЛИМН(AG4="";"";AG4="нет в ГПР";"";AG4="<>";(ЕСЛИ(ПСТР(H4:H2021;39;2)="АС";AG4:AG2021-240;ЕСЛИ(ПСТР(H4:H2021;39;2)="КМ";AG4:AG2021-240;ЕСЛИ(ПСТР(H4:H2021;39;2)="ТК";AG4:AG2021-240;ЕСЛИ(ПСТР(H4:H2021;39;2)="ТХ";H4:H2021-240;AG4:AG2021-150))))))
Добрый день! Необходимо создать умную систему ведения MDR-реестров. Основные функции: - Быстрый поиск нужной информации - Скачивание файлов; -Сохранение истории вх. файлов по накладным; -привязка сообщений к файлам.
Добрый день! Подскажите, пожалуйста, возможно ли завязать в эксель ссылки на файлы таким образом, чтобы можно было при необходимости вставить из списка нужные файлы и он автоматически скачал их в необходимую папку?
Может кто-то пишет программки на базе эксель, необходимо создать умную систему ведения MDR-реестров, чтобы при одном клике можно было оперативно пользоваться информацией.
Добрый день! Необходимо подсветить ячейки с датой, которые заканчиваются на сегодняшний день, но при условии, что в другой ячейки пусто или #Н/Д. Подскажите, пожалуйста, формулу.
Добрый день! Подскажите, пожалуйста, как объединить ячейки?
Пример: У меня имеется 6 столбцов которые необходимо объединить.
Делаю следующим способом: =СЦЕПИТЬ([@[ГСП-1]];[@[ГСП-6]];[@[ССК Газрегион]];[@ГЭС];[@Дельта];[@[Не распределено]])
Однако данный способ мне не подходит, необходим / между значениями.
Если я ставлю формулу следующим образом =СЦЕПИТЬ([@[ГСП-1]];"/";[@[ГСП-6]];"/";[@[ССК Газрегион]];"/";[@ГЭС];[@Дельта];"/";[@[Не распределено]]) То если ячейка была пустая получается значение следующим образом ГСП-1////. Лишние / мне не нужны.
Поделитесь, пожалуйста, опытом объединения ячеек. Какое условие необхдимо добавить?
Изменено: Sanja - 06.09.2024 05:04:54(Изменил название темы)