Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Автокопирование значения ячейки в соседний столбец Гугл Докс - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Google Docs » Автокопирование значения ячейки в соседний столбец Гугл Докс (Формулы/Formulas)
Автокопирование значения ячейки в соседний столбец Гугл Докс
evgenij_vl Дата: Вторник, 25.04.2017, 06:49 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте!

Подскажите, как реализовать в Google Docs

При редактировании ячейки в первом столбце нужно, чтобы значение ячейки копировалось автоматически в соседний столбец в той же строке.


Сообщение отредактировал evgenij_vl - Вторник, 25.04.2017, 19:04
 
Ответить
СообщениеЗдравствуйте!

Подскажите, как реализовать в Google Docs

При редактировании ячейки в первом столбце нужно, чтобы значение ячейки копировалось автоматически в соседний столбец в той же строке.

Автор - evgenij_vl
Дата добавления - 25.04.2017 в 06:49
китин Дата: Вторник, 25.04.2017, 07:47 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4436
Репутация: 701 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dat&
dat = Cells(Rows.Count, 1).End(xlUp).Row
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("A1:A" & dat)) Is Nothing Then
    
     Target.Offset(0, 1) = Target
    End If
End Sub
[/vba]
упс не заметил, что это гугл докс. может не работать


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538


Сообщение отредактировал китин - Вторник, 25.04.2017, 07:48
 
Ответить
Сообщение[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
Dim dat&
dat = Cells(Rows.Count, 1).End(xlUp).Row
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("A1:A" & dat)) Is Nothing Then
    
     Target.Offset(0, 1) = Target
    End If
End Sub
[/vba]
упс не заметил, что это гугл докс. может не работать

Автор - китин
Дата добавления - 25.04.2017 в 07:47
evgenij_vl Дата: Вторник, 25.04.2017, 19:06 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 7
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Моя вина. Название темы поправил.

может не работать

Точно не работает.

Может, кто ещё подскажет.
 
Ответить
СообщениеМоя вина. Название темы поправил.

может не работать

Точно не работает.

Может, кто ещё подскажет.

Автор - evgenij_vl
Дата добавления - 25.04.2017 в 19:06
Gustav Дата: Вторник, 25.04.2017, 19:57 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1472
Репутация: 559 ±
Замечаний: 0% ±

начинал с Excel 4.0...
Как-то так:
[vba]
Код
function onEdit(e) {
   
var sheet = e.range.getSheet();
if ((sheet.getName() == "Лист1" || sheet.getName() == "Лист3") &&
     e.range.getNumColumns() == 1 &&
     e.range.getColumn() == 1) {
   
  e.range.offset(0, 1).setValues(e.range.getValues())
}
}
[/vba]
Работает для первой колонки некоторых листов (Лист1 и Лист3). При одновременном изменении диапазона из нескольких ячеек (несколько строк x 1 колонка), например, копированием - значения прописываются справа для всех ячеек.


Мой tip box - яд 41001663842605
 
Ответить
СообщениеКак-то так:
[vba]
Код
function onEdit(e) {
   
var sheet = e.range.getSheet();
if ((sheet.getName() == "Лист1" || sheet.getName() == "Лист3") &&
     e.range.getNumColumns() == 1 &&
     e.range.getColumn() == 1) {
   
  e.range.offset(0, 1).setValues(e.range.getValues())
}
}
[/vba]
Работает для первой колонки некоторых листов (Лист1 и Лист3). При одновременном изменении диапазона из нескольких ячеек (несколько строк x 1 колонка), например, копированием - значения прописываются справа для всех ячеек.

Автор - Gustav
Дата добавления - 25.04.2017 в 19:57
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Google Docs » Автокопирование значения ячейки в соседний столбец Гугл Докс (Формулы/Formulas)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2017 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!