копирование ячейки с одного листа в другой - Microsoft Office Excel

RECit · 02.08.2010, 14:35

здравствуйте форумчане............помогите плз

допустим, в ячейке А1 Листа1 некоторые данные, нужно , чтобы данные с ячсейки А1 копировались в ячейку С1 Листа2

если не сложно, выручите...

аналитика · 02.08.2010, 14:40

Код:

sheets("Лист2").range("С1").value=sheets("Лист1").range("А1").value

как водится сочетание клавиш сделаешь для этого чудовищного макроса

RECit · 02.08.2010, 16:58

Цитата:

Сообщение от аналитика

Код:

sheets("Лист2").range("С1").value=sheets("Лист1").range("А1").value

как водится сочетание клавиш сделаешь для этого чудовищного макроса

можешь, пожалуйста, от начала и до конца прописать все?
просто я в этом мало что понимаю...а вот сегодня столкнулся по работе.
за ранее спасибо!

аналитика · 02.08.2010, 17:11

а может так пойдет - в ячейку C1 листа "Лист2" пишешь формулу:
=Лист1!A1

RECit · 02.08.2010, 18:37

Цитата:

Сообщение от аналитика

а может так пойдет - в ячейку C1 листа "Лист2" пишешь формулу:
=Лист1!A1

спасибо за помошь.......но мне нужно сделать это ч помошью макроса..

аналитика · 02.08.2010, 19:26

Цитата:

Сообщение от RECit

спасибо за помошь.......но мне нужно сделать это ч помошью макроса..

вот так вот (>10 букв)

IgorGO · 02.08.2010, 19:57

по закладке лист1 правой кнопкой, выбыраете "исходный текст", копируете туда этот

Код:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect([A1], Target) Is Nothing Then Exit Sub
    [A1].Copy Destination:=Sheets("Лист2").[C3]
End Sub

Обратите внимание, чтобы "Лист2" было написано как "Лист2", а не "Ëèñò2"

аналитика · 02.08.2010, 20:37

мне кажется, формулу из A1 копировать в С1(3) не есть желаемый результат, а если там константа, то за исключением копирования формата данный код эквивалентен формуле "=Лист1!A1"
мое мнение...

02.08.2010, 14:35	#1
RECit Регистрация: 19.04.2010 Сообщений: 6	копирование ячейки с одного листа в другой здравствуйте форумчане............помогите плз допустим, в ячейке А1 Листа1 некоторые данные, нужно , чтобы данные с ячсейки А1 копировались в ячейку С1 Листа2 если не сложно, выручите...

02.08.2010, 14:40	#2
аналитика Форумчанин Регистрация: 14.05.2009 Сообщений: 311	Код: `sheets("Лист2").range("С1").value=sheets("Лист1").range("А1").value` как водится сочетание клавиш сделаешь для этого чудовищного макроса

02.08.2010, 19:57	#7
IgorGO Новичок СтарожилДжуниор Регистрация: 05.02.2008 Сообщений: 9,487	по закладке лист1 правой кнопкой, выбыраете "исходный текст", копируете туда этот Код: `Private Sub Worksheet_Change(ByVal Target As Range) If Intersect([A1], Target) Is Nothing Then Exit Sub [A1].Copy Destination:=Sheets("Лист2").[C3] End Sub` Обратите внимание, чтобы "Лист2" было написано как "Лист2", а не "Ëèñò2" Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете Последний раз редактировалось IgorGO; 02.08.2010 в 20:06.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Копирование данных с одного листа на другой по значению первого столбца	Lis000iq	Microsoft Office Excel	11	07.03.2010 13:34
Перенос данных из одного листа в другой	Светланка85	Microsoft Office Excel	2	07.09.2009 09:18
Перенос данных с одного листа на другой	knahrn	Microsoft Office Excel	4	12.08.2009 08:42
Перенос данных с одного листа в другой	Josser	Microsoft Office Excel	0	17.07.2009 10:45
Копирование информации из одного листа на другой	Юрийpirs2008	Microsoft Office Excel	6	24.03.2009 07:59

02.08.2010, 17:11	#4
аналитика Форумчанин Регистрация: 14.05.2009 Сообщений: 311	а может так пойдет - в ячейку C1 листа "Лист2" пишешь формулу: =Лист1!A1

02.08.2010, 20:37	#8
аналитика Форумчанин Регистрация: 14.05.2009 Сообщений: 311	мне кажется, формулу из A1 копировать в С1(3) не есть желаемый результат, а если там константа, то за исключением копирования формата данный код эквивалентен формуле "=Лист1!A1" мое мнение...