Как скопировать одн...
 
Уведомления
Очистить все

Как скопировать одну ячейку Excel в другую?

1 Записи
1 Пользователи
0 Likes
417 Просмотры
87-150 Okolokompa Форум
(@anatol)
Estimable Member
Присоединился: 4 года назад
Записи: 53
Создатель темы  

Если вы попытаетесь скопировать, вставить ячейку и поместить ее в содержимое другой в Microsoft Excel, вы не сможете.

Что вам нужно сделать, это F2, чтобы выбрать содержимое ячейки, выбрать все, а затем скопировать. Есть ли более простой способ?

ОТВЕТ:

Нет более легкого пути. Если вы хотите поместить содержимое A1 (например abc) в содержимое B1 (например 123456), чтобы в нем содержался B1 123abc456, вам придется использовать F2 (или дважды щелкнуть «Редактирование в ячейке»), чтобы выбрать и "захватить" / скопировать содержимое с А1.

Однако, если позиция содержимого вставки является статической (то есть не изменяется), вы можете выполнить макрос.

Например, если вы хотите поместить что-либо введенное вами в ячейку в столбце A в качестве новой строки (т.е. Абзаца) к содержимому ячейки в столбце B в той же строке, щелкните правой кнопкой мыши вкладку имени рабочего листа и выберите «Просмотреть код», затем вставьте это в таблицу кодов листа.

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Range("A:A"), Target) Is Nothing Then

On Error GoTo bye
Application.EnableEvents = False
Dim t As Range, b As String

For Each t In Intersect(Range("A:A"), Target)

b = vbNullString

If t.Offset(0, 1).Value <> vbNullString Then
b = t.Offset(0, 1).Text & Chr(10)
End If

If t.Value <> vbNullString Then
t.Offset(0, 1) = b & t.Text
End If

Next t

End If

bye:
Application.EnableEvents = True

End Sub

Все, что вы введете в столбец A, появится в конце содержимого столбца B в той же строке.

Другой способ - объединить содержимое с помощью формулы, добавляя или преобразовывая текст.

Другой способ - записать макрос для этих шагов и создать кнопку для записанного макроса.


   
Цитата
Поделиться: