Добрый день! столкнулся с проблемой, в таблице, где ведется учет товара необходимо каждый день проставлять дату внесения информации, функция ТДАТА и СЕГОДНЯ обновляет дату каждый день, то есть учет товара слетает, уже прочитал множество похожих статей, есть решение через макрос, но у меня на маке он не работает почему то...
Лист книги - "Двери" Диапазон для тригера функции - J:J100 Столбец для даты - U
Private Sub Worksheet_Change(ByVal Target As Range) ThisWorkbook.Sheets("Двери").Select For Each cell In Target 'проходим по всем измененным ячейкам If Not Intersect(cell, Range("J2:J100")) Is Nothing Then 'если изменененная ячейка попадает в диапазон A2:A100 With cell.Offset(0, 11) 'вводим в соседнюю справа ячейку дату .Value = Date .EntireColumn.AutoFit 'выполняем автоподбор ширины для столбца B, чтобы дата умещалась в ячейке End With End If Next cell End Sub