Спасибо огромное!
Макрос при открытии файла
Макрос при открытии файла
Макрос при открытии файла
Удаление всех файлов в папке в определенное время
Удаление всех файлов в папке в определенное время
Удаление всех файлов в папке в определенное время
25.04.2023 19:36:59
Добрый вечер, помогите, пожалуйста, очень нужно, чтобы при открытии файла в определённое время удалились все файлы pdf в папке где расположен сам файл эксель и желательно сам файл эксель ликвидировался для конфиденциальности очень строго, пробую, но никак не получается(
Изменено: |
|||
|
Убрать уведомление макроса об ошибке
Убрать уведомление макроса об ошибке
22.04.2023 06:39:41
Добрый день ребята, подскажите пожалуйста, вот у меня макрос применяется с условием, но когда условие не выполняется, ексель выдаёт уведомление типа ошибки, можно как-то код применить, чтобы оно просто не появлялось, а то надоедает всё время, достало уже
Изменено: |
|
|
код на удаление поле со списком (элементы управления формы)
09.04.2023 17:59:08
Пробовал выше большой код в точности и другими способами, выдаёт всё равно ошибку, сейчас получилось удалить по этому методу:
"Замещающий текст" что-нибудь типа "меткаДляУдаления". А в коде
Изменено: |
||||
|
код на удаление поле со списком (элементы управления формы)
код на удаление поле со списком (элементы управления формы)
09.04.2023 15:37:04
Я видел эту тему, изучал и пробовал:
For i = ActiveSheet.Names.Count To 1 Step -1 ActiveSheet.Names(i).Delete Next i тоже не выходит, жёлтым выделяется, не работает этот способ у меня Прошу прощения, оказывается у меня макрос не срабатывал не на именнованный диапазон, а на фигуру - поле со списком (элементы управления формы), теперь не знаю как тему поменять, выходит что нужно код на удаление этой фигуры она берётся из разработчик/вставить/элементы управления формы/поле со списком...) подскажите пожалуйста какой код нужен на удаление этой фигуры, сил уже нет(
Изменено: |
|
|
код на удаление поле со списком (элементы управления формы)
09.04.2023 14:50:07
Здравствуйте всем, замучился, не могу, пробовал всяко, не получается(
Dim nm As Name For Each nm In ActiveWorkbook.Names If nm.RefersToRange.Parent.Name = "Лист1" Then nm.Delete Next nm Нужна Ваша помощь, нужен код, который удаляет именованный диапазон, дело в том, что когда вручную удаляю именнованный диапазон - макрос у меня работает правильно, но имея на листе именнованный диапазон - не работает так как надо, нужно удалить именнованной диапазон используя код макроса, пример в файле, помогите пожалуйста
Изменено: |
|
|
Код условия под команду окна предупреждения, при сохранении окно предупреждения: "...уже существует в данном месте. Заменить?"
08.04.2023 17:23:48
Добрый ночи, добрые люди, помогите с одним условием решить задачу, есть код макроса:
В остальном после условия всё работает как надо, только с условием не могу решить эту задачу самостоятельно, буду премногом благодарен. Хочу удалить тему, т.к. решение своей задачи нашёл, неправильно оказывается ставил выбор решение своей задачи, нужно сразу было строкой ниже после Else добавить Application.DisplayAlerts = FalseFalse и всё работает как надо, хочу удалить тему, не знаю как это сделать, пожалуйста, удалите тему, вопрос решён, спасибо
Изменено: |
|||
|
Макрос который открывает окно сохранения при условии
08.04.2023 15:14:26
Фуф, получилось
Всем низкий поклон.
Изменено: |
|||
|
Макрос который открывает окно сохранения при условии
08.04.2023 11:54:57
Скажите пожалуйста, вот на будущее, можно как-то распознавать формулы в коде макроса, понимаю, что это ценная информация - преобразования формул в виде кода макроса. Собственно мне нужен код:
Если в ("А22") ничего не содержит, то соответственно [CHAR(95)&TEXT(NOW(),"DDMMYYHHSS")], в противном случае ("А22") и в дальнейшем по аналогии мне будет понятно, макредером тоже пробовал, сейчас применяю If, Range, Then - не получается, приходится к Вам обращаться, во многом Вам благодарен.
Изменено: |
|
|
Макрос который открывает окно сохранения при условии
Макрос который открывает окно сохранения при условии
Макрос который открывает окно сохранения при условии
08.04.2023 05:39:49
Применяю макрос по 3 способу, где нужно сохранить выделенный лист как отдельной книгой, проблема в том, что при первом открытии файла документ сохраняется в папку документы, а нужно, чтобы с первого открытия файла документ сохранялся в папку с исходником, макрос работает так как нужно если добавить к нему Filename = Application.GetSaveAsFilename(ThisWorkbook.Path), но один нюанс, предлагаемое окно сохранения нужно самостоятельно закрыть, поэтому думаю, как вот обойти этот момент, а вызов окна обязательно нужно, иначе при первом открытии файла документы будут сохраняться в папку документы чего допустить этого нельзя, т.к. файлы в разных папках, нужно чтобы сохранялись в папку с исходником.
Sub SplitSheets3() Filename = Application.GetSaveAsFilename(ThisWorkbook.Path) Dim AW As Window Set AW = ActiveWindow For Each s In AW.SelectedSheets Set TempWindow = AW.NewWindow s.Copy TempWindow.Close ActiveWorkbook.SaveAs s.Range("A22") & "_" & s.Name, FileFormat:=51 ActiveWorkbook.Close False Next End Sub
Изменено: |
|||
|
Макрос который открывает окно сохранения при условии
07.04.2023 20:15:17
Хорошо, а как макросом будет выглядеть команда ескейт? Код нужен
(Точно не знаю, команда эскейт вообще существует код макроса или нет; я так понимаю, что-то вроде application.undo)
Изменено: |
|
|
Макрос который открывает окно сохранения при условии
Макрос который открывает окно сохранения при условии
07.04.2023 17:14:01
Понял, нужен код на закрытие открытого предлагаемого сохранения окна.
Боюсь как бы не оказалось это другой темой
Изменено: |
|
|
Макрос который открывает окно сохранения при условии
07.04.2023 15:58:02
Дело в том, что когда сохраняю через ActiveWorkbook.SavesAs, оно не сохраняет у меня в папку, где находится исходник, а только в документы, но через этот метод, как говорите с нулевым циклом, как раз вот наоборот работает, сохраняет с автонаименованием в ту папку, где находится исходник, по сути только один нюанс, нужно только эту команду, открытие предлагаемого сохранения - закрыть окно, это будет у меня вначале макроса, а всё остальное походу автонаименование и остальное, т.е. нужен код просто на закрытие предлагаемого сохранения окна, а то, когда я нажимаю на отмену, после этого только все операции проводятся, сохранения в нужный путь с автонаименованием, хотелось бы действие закрытия окна этот шаг обойти, иначе может такое быть, выйдет окно, он сохранит под своим названием и в итоге этого файла, который он наименовал - нет, а далее с автонаименованием сохранился, честно, сложно объяснить, но очень нужно и с покаянием, конечно, согласен, это всем нужно.
Изменено: |
|
|
Макрос который открывает окно сохранения при условии
Макрос который открывает окно сохранения при условии
07.04.2023 15:31:22
т.е. этот код который Ваш применил, оно правильно открыло предлагаемое окно сохранения и нужно чтобы оно без каких-либо действий сохранения или отмены просто закрылось, макредером пробовал нажимать отмену, ничего не показывает
Изменено: |
|
|
Макрос который открывает окно сохранения при условии
Макрос который открывает окно сохранения при условии
При экспорте из экселя в ворд автонаименовался, (в открытом окне в ворд перед сохранением наименовался)
При экспорте из экселя в ворд автонаименовался, (в открытом окне в ворд перед сохранением наименовался)
При экспорте из экселя в ворд автонаименовался, (в открытом окне в ворд перед сохранением наименовался)
При экспорте из экселя в ворд автонаименовался, (в открытом окне в ворд перед сохранением наименовался)