Добрый день. Помогите решить задачу. Имеется две ячейки, необходимо чтобы значение из одной переносилось в другу. Например, из А1 в А2. Формулу в А2 нельзя писать, т.к. потом эта ячейка будет копироваться со значением в другую книгу. Это простой пример, для объяснения сути задачи. В первой А1 ячейке будет формула подсчёта, необходимо чтобы значение в А1 автоматически присваивалось и ячейке А2.
Добрый день. Помогите решить задачу. Имеется две ячейки, необходимо чтобы значение из одной переносилось в другу. Например, из А1 в А2. Формулу в А2 нельзя писать, т.к. потом эта ячейка будет копироваться со значением в другую книгу. Это простой пример, для объяснения сути задачи. В первой А1 ячейке будет формула подсчёта, необходимо чтобы значение в А1 автоматически присваивалось и ячейке А2.MarCr
Сообщение отредактировал MarCr - Понедельник, 16.08.2021, 22:29
Здравствуйте. Не совсем понятно, почему нельзя сразу из А1 скопировать значение в другую книгу. Если точно по поставленной задаче, то в модуль листа [vba]
Код
Private Sub Worksheet_Calculate() Range("A2") = Range("A1") End Sub
[/vba]
Здравствуйте. Не совсем понятно, почему нельзя сразу из А1 скопировать значение в другую книгу. Если точно по поставленной задаче, то в модуль листа [vba]
Код
Private Sub Worksheet_Calculate() Range("A2") = Range("A1") End Sub
Всё дело в том, что из на самом деле там будет переноситься в другую книгу не одна ячейка а целая таблица, в которой половина ячеек с формулами, а другая с ячейка с простыми данными, в которые нельзя переносить с формулами. Поэтому ищется решение присвоения им данных через макрос. Ещё вопрос, как сделать в макросе, в ответе выше, чтобы он работал для определённой вкладки в книге, например с названием "1", и тогда как сделать макрос с такой же функцией уже для другой вкладки с названием "2" ? Спасибо за помощь!
Всё дело в том, что из на самом деле там будет переноситься в другую книгу не одна ячейка а целая таблица, в которой половина ячеек с формулами, а другая с ячейка с простыми данными, в которые нельзя переносить с формулами. Поэтому ищется решение присвоения им данных через макрос. Ещё вопрос, как сделать в макросе, в ответе выше, чтобы он работал для определённой вкладки в книге, например с названием "1", и тогда как сделать макрос с такой же функцией уже для другой вкладки с названием "2" ? Спасибо за помощь!MarCr
событие Worksheet_Calculate работает для того листа, в модуль которого помещён код. Разместите этот код в листе 2, и он будет работать в нём. Либо если листов много, можно использовать событие книги Workbook_SheetCalculate и там уже привязываться к определенному листу
событие Worksheet_Calculate работает для того листа, в модуль которого помещён код. Разместите этот код в листе 2, и он будет работать в нём. Либо если листов много, можно использовать событие книги Workbook_SheetCalculate и там уже привязываться к определенному листуPelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816