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

Вход

Регистрация

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

 

= Мир MS Excel/поменять код написаный для Эксель под Гугл Таблицу - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, китин  
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Google Docs » поменять код написаный для Эксель под Гугл Таблицу (Иное/Other)
поменять код написаный для Эксель под Гугл Таблицу
alexstreetmailxyz Дата: Понедельник, 27.06.2022, 12:53 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация: 0 ±
Замечаний: 20% ±

Добрый день. Есть код, который работает в Экселе. Помогите, пожалуйста переделать его под Гугл таблицу, и вкратце написать как его туда "вставить" Благодарю!

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("a1")) Is Nothing Then
a = Target.Value
If a <> "" Then
u = Cells(Rows.Count, "a").End(xlUp).Row + 1
Range("a" & u) = a
Range("a1").ClearContents
Range("a1").Select
End If
End If
End Sub
[/vba]

Изначально стояла такая задача: "Данные должны вводиться только в ячейку А1. После нажатия ENTER значение должно переместиться в ячейку А2, а А1 стать пустой. Далее повторяется А3 - А1 пустая. И каждый раз, чтобы значение переносилось в конец стоблца."


Сообщение отредактировал alexstreetmailxyz - Понедельник, 27.06.2022, 14:47
 
Ответить
СообщениеДобрый день. Есть код, который работает в Экселе. Помогите, пожалуйста переделать его под Гугл таблицу, и вкратце написать как его туда "вставить" Благодарю!

[vba]
Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("a1")) Is Nothing Then
a = Target.Value
If a <> "" Then
u = Cells(Rows.Count, "a").End(xlUp).Row + 1
Range("a" & u) = a
Range("a1").ClearContents
Range("a1").Select
End If
End If
End Sub
[/vba]

Изначально стояла такая задача: "Данные должны вводиться только в ячейку А1. После нажатия ENTER значение должно переместиться в ячейку А2, а А1 стать пустой. Далее повторяется А3 - А1 пустая. И каждый раз, чтобы значение переносилось в конец стоблца."

Автор - alexstreetmailxyz
Дата добавления - 27.06.2022 в 12:53
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Google Docs » поменять код написаный для Эксель под Гугл Таблицу (Иное/Other)
  • Страница 1 из 1
  • 1
Поиск:

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