Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
макрос проставить текущую дату в пустую ячейку столбца при условии другого столбца (не автоматическая на листе, а в макросе), В колонку - К проставляю текущую дату(Now, "dd.mm.yyyy"), При условии цвета RGB (255,255,255) в столбце - А
 
БЕСПОЛЕЗНО! ИЩИ САМ!!!!!!!
Изменено: Василий Нисс - 21.06.2022 15:18:17
VBA закрытие всех книг с сохранением, если открыты на другом компьютере, Пакет документов находятся на сервере в общем доступе.
 
Друзья, у меня очередной вопрос. Прошу помощи!!

Пакет для обновления находится в папке на сервере, имеющая доступ конкретных  ID компьютеров. И где-то сотрудник оставил открытым файл требующий общего обновления. Есть ли возможность через VBA закрыть файл (в случае его положения - ОТКРЫТЫЙ) на его компе с сохранением?

Что если перед обновлением VBA  застанет открытым файл на чужом компе? Предполагаю, что даст сбой.
Может на ID в установленное время установить закрытие приложения по расписанию через "Планировщик заданий"?
Изменено: Василий Нисс - 26.05.2022 03:18:10 (добавил вопрос)
VBA Подставить в ячейку дату при условии смены месяца, можно формулой, В конкретной ячейке нужна запись только первого числа текущего месяца
 
Со сменой каждого месяца нужна запись даты  типа 01.05.2022. Соответственно меняется только месяц.
Пробовал реализовать формулой =СЦЕПИТЬ("01.";ТЕКСТ(СЕГОДНЯ();"ММ.ГГГГ")), но другие ячейки ссылающиеся на эту ячейку воспринимают эту запись как текст.

   Друзья, прошу помощи в этой реализации.
Заранее признателен за помощь
Код в VBA очистка диапазона с преобразованием в нужный тип ячеек., После применения кода Selection.ClearContents в диапазоне меняется тип ячейки.
 
Друзья! По методу Николая Павлова (https://www.planetaexcel.ru/techniques/2/197/) настроил расширенный фильтр.
В ниже привязанный файл в диапазон A24:H500 подтягиваю с другого файла данные с VBA. При этом, предварительно перед обновлением очищаю диапазон A15:H21 с условиями для фильтрации командой ClearContents. После процесса макроса фильтр в диапазоне A15:H21 начинает криво работать ( Принимает написанное как дата, или текст). Порылся и накопал, что даже не формат, а тип ячейки отличается (пример в столбце I ячейки окрашены ярко-желтым).
    Какой командой очистить диапазон условий корректно? Или после очистки преобразовать в нужный тип?
Код
'ОЧИСТИТЬ ФИЛЬТР
    Range("A13:I21").Select
    Selection.ClearContents
Ошибка автозапуска макроса по времени, Планировщик открывает файл, но макрос выдает ошибку.
 
Помогите пожалуйста разобраться.
Пробовал и другой код, Но при записи подсвечивает красным:
Private Sub Workbook Open ()
Application.OnTime TimeValue("15:00:00")."MyMacro"
End Sub
____-
Этот не запустился, хотя ошибок не показывает:
Private Sub Workbook_Open()
Application.OnTime TimeValue("23:42:00"), "MyMacro"
End Sub
Макрос VBA преобразования в значения, После преобразования формул книги в значения VBA преобразовал как числа с десятичной 1,01
 
Код
'преобразование формул в значения во всей книге
    For Each ws In ActiveWorkbook.Worksheets
        ws.UsedRange.Value = ws.UsedRange.Value
    Next ws
Друзья, нужны значения вместо десятичных чисел "1,01" такие "01.01", т. к. это номер паки номенклатуры, а не число.
Прошу помощи.
Как при написании формулы в VBA поставить знак формулы диапазона, { } - эти знаки диапазона обычно ставят в ячейке с формулой. С нажатием горячих клавиш, конечно.
 
Подскажите, пожалуйста, как эти скобки реализуются при написании формулы в VBA.

Заранее Вам признателен.
Записанный в макрорекордере дает ошибка, Записал макрорекодором, но дает ошибку. Хотя Select нужной ячейки на листе происходит. В чем может быть причина?
 
Код
Sub Макрос11()
'
' Макрос11 Макрос
'

'
    Range("AW3").Select
    ActiveCell.FormulaR1C1 = _
        "=SUM(COUNTIF(номенклатура!C[-37],RC[-14]),COUNTIF(номенклатура!C[-37],RC[-13]),COUNTIF(номенклатура!C[-37],RC[-12]),COUNTIF(номенклатура!C[-37],RC[-11]),COUNTIF(номенклатура!C[-37],RC[-10]),COUNTIF(номенклатура!C[-37],RC[-9]),COUNTIF(номенклатура!C[-37],RC[-8]),COUNTIF(номенклатура!C[-37],RC[-7]),COUNTIF(номенклатура!C[-37],RC[-6]),COUNTIF(номенклатура!C[-37],RC[-5]" & _
        "F(номенклатура!C[-37],RC[-4]),COUNTIF(номенклатура!C[-37],RC[-3]))"
    Range("AX3").Select
End Sub
Предыдущие формулы ссылающиеся на этот Лист работают исправно. Буду признателен за любую подсказку...
В VBA при преобразовании формул в значения формула не успевает пересчитывать., макросом протянутая формула с последующим преобразованием этого массива в значения, не успевает просчитывать. Значения остаются первой ячейки
 
Друзья, прошу Вас помочь. Думаю, что есть что-то типа Application.ВКЛЮЧИТЬ_ВЫЧИСЛЕНИЯ перед тем, как преобразовать диапазон в значения.
Как в VBA ответить "Нет" на сообщение Microsoft Excel, При копировании макросом постоянно приходится отвечать вручную на это сообщение
 
Доброго всем времени суток. При копировании макросом сообщение от Microsoft Excel предлагает сохранить или нет находящееся в буфере обмена. Приходится нажимать постоянно "Нет". Можно, конечно, ответить в ручную, но хотелось бы отшлифовать до идеальности (ну, и пригодится на будущее). Буду признателен за ответ или ссылки по теме.
Ссылка на ТЕКСТ В ЯЧЕЙКЕ в написании макроса., Подскажите, пожалуйста. Как вместо прописи, например, путь к файлу в макросе заменить на текст в ячейке, где прописан этот путь. Такая же штука с листом и ячейками.
 
Workbooks.Open Filename:="C:\Users\Февраль 2022.xlsx" 'Скопировать нужный диапазон в открывшейся книге на листе 1
Workbooks("Февраль 2022.xlsx").Worksheets("График").Range("A1:AM100").Copy 'Активируем нужную нам книгу
Workbooks("макрос 2 проба.xlsm").Activate

Путь написан жирным шрифтом. Этот путь я планирую записать в ячейку на листе эксель, а макрос будет ссылаться на текст этой ячейке.
Заранее признателен.
[ Закрыто] Макрос Двумерный поиск в таблице (ВПР 2D)
 
Подскажите, пожалуйста, как реализовать подобную формулу макросом.
Заранее признателен.
Макрос по принципу ЕСЛИМН двухмерного поиска
 
Уважаемые профессионалы! По немногу изучаю макросы, и практикуюсь на примерах (дается пока тяжело =)..). Прошу Вас помочь примером или подсказать ходом мыслей.
   Ранее собрал конструктор макрос на Лист1 из Ваших же доступных примеров на сайте (сейчас этот макрос в приложенном файле). Но остановился пока только на копировании с файла массива и процедур разъединения объединенных ячеек, форматирование формул в значения.
  Задача: С файла "Февраль 2022" лист "График" копировать в файл "Макрос 2" на лист "Лист2" в диапазон F3:F100 только те ФИО, которые совпадают в файле "Макрос 2" на Лист2 по условиям ячеек A2, B2, C2, D2, E2, F2. Т.е. Дата, время смены, время работы (условия выбора), путь к папке, имя файла, Диапазон даты графика. Эти условия могут периодически меняться поэтому условия забиты в диапазоне Лист2 в ячейках A2, B2, C2, D2, E2, F2.
    Статус смены: ночь , день в файле графика обозначен текстом "должность", ночь - обозначен текстом "должность+ночь"
    Буду очень признателен всякой помощи. Заранее признателен.
Доверенный файл для донора файла под паролем.
 
Видел, несколько похожих тем, где предлагались макросы. Но так и не понял. Предлагаемые макросы автору не работали, или предлагаемые ответы были вскользь.
  Огромная к Вам просьба, уважаемые, нужна Ваша помощь.
В прилагаемых мною файлах пример: "Файл донор" (пароль 123456). "Файл прием информации" постоянно запрашивает при открытии пароль вышеуказанного. Как обойти этот казус?
    В оригиналах у меня все привязанные формулы ломаются ошибкой, пока я не введу все пароли предыдущих. И обновление информацией только через ручной подтверждение.
Похожая тема здесь:
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=145442&a...
и
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=message&FID=1&TID=145276&a...
Заранее всем признателен за любое участие.
С уважением к Вашему делу
Нисс Василий
Изменено: Василий Нисс - 29.11.2021 19:21:46
Страницы: 1
Наверх