Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1
RSS
Копирование значение ячейки по нажатию кнопки.
 
#1
05.01.2012 11:56:13
Здравствуйте! Поделитесь пожалуйста опытом.  
Суть вопроса: имеются значения которые будут заполнятся вручную (лист1 во вложенном файле) и имеется таблица в которую эти данные по очереди должны добовлятся (лист2). Хочется сделать кнопочку (её я понял как делать) по нажатию которой данные с первого листа копировались в таблицу второго листа (нажал - скопировалась, ввел новые данные - нажал - скопировалось в следующую строчку). Обьясните, пожалуйста, как это можно сделать.
 
 
 
#2
05.01.2012 12:21:38
Простенький макрос.
 
 
 
#3
05.01.2012 12:24:43
Еще проще. Макрорекордер.
Я сам - дурнее всякого примера! ...
 
 
 
#4
05.01.2012 12:27:18
Я тоже сразу хотел транспонирование использовать... Если именно под такую последовательность данных - хорошо. Если вразнобой ячейки - автору легче будет разобраться.
 
 
 
#5
05.01.2012 12:40:57
Спасибо за ответы! Только я не понял как они работают :( Где можно почитать про создание макросов, или обьясните пожалуйста как это работает :)    
Будут еще строчки для ввода, будут еще доп. листы куда надо будет вставить данные (и в разнобой тоже). Я просто хотел на примере разобратся, а дальше надеюсь сам сделаю :)
 
 
 
#6
05.01.2012 12:57:31
Минимальное знание английского всё же нужно:  
 
Sheets - лист  
Cells - ячейка  
Row - ряд  
Count - счёт, количество  
End - конец  
Up - вверх  
xlUp - вверх по-экселевски :)  
With - с  
End With  - конец с по-программному  
As - как  
 
Далее можно уже всё прочитать:  
Cells(1, 4) - это ячейка первого ряда четвёртого столбца  
iLastRow - просто название переменной, совершенно не играет роли именно какое название выбрано (лишь бы не из зарезервированных служебных слов)  
Dim iLastRow As Long - объявление переменной типа Long  
Cells(Rows.Count, 1).End(xlUp).Row - ряд ячейки с данными, которая встретится первая при просмотре от последней ячейки в первом столбце по направлению вверх.
 
 
 
#7
05.01.2012 13:04:36
Спасибо большое!!! Вроде разобрался :)
 
 
 
#8
08.01.2012 12:50:49
а можно добавить что то типа функции "если" (если значение в одной ячейки <> 0, то копировать значение из другой ячейки; если = 0, то не копировать)
 
 
 
#9
09.01.2012 14:24:02
Добавил проверку если есть незаполненные ячейки, то ексель будет ругаться и переносить на Лист2 ничего не будет.  
Если правильно понял, что было нужно.
 
 
 
#10
09.01.2012 15:25:14
ShAM, спасибо за ответ, но имелось немного другое. Хотел вот что: если допустим строка "Фамилия, Имя, Отчество" не заполнена, то, например, "Место работы" не копировалось (даже если заполнена).
 
 
 
#11
09.01.2012 17:22:15
Так в приложенном файле (Вы его смотрели) условие еще сильнее. Если есть хоть какая-нибудь не заполненная ячейка, то вообще ничего никуда не переносится.  
Если так не устраивает, то напишите какие ячейки должны быть ОБЯЗАТЕЛЬНО заполнены, чтобы данные переносились.
 
 
 
#12
09.01.2012 17:28:20
Иначе Ваше: "Хотел вот что: если допустим строка "Фамилия, Имя, Отчество" не заполнена, то, например, "Место работы" не копировалось (даже если заполнена)  
" вызывает еще больше вопросов.  
Самый очевидный из них: Если строка "Фамилия, Имя, Отчество" не заполнена, то "Место работы" не копируем (даже если заполнена), а остальные ячейки копируем (даже если пустые)???  
и т.д.
 
 
 
#13
09.01.2012 21:06:33
Спасибо! Наверное сильно намудрил :(
 
 
 
#14
10.01.2012 13:46:48
Доброго времени суток  
Пардон  
Но нельзя ли добавить в макрос 1 проверочку на повторное заполнение таблицы на лист 2 идентичеными реквизитами. Например, если строка реквизитов вводится повторно, то эксел выкидает предупреждение о том что такаие реквизиты уже внесены и дает возможность продолжить внесение даных, либо отменить такое внесение.  
заранее благодаренза ответ
 
 
 
#15
10.01.2012 14:02:11
попробуйте так!
 
 
 
#16
10.01.2012 14:05:38
прошу прощенья, ошибочка. Вот др.файл.
 
 
 
#17
10.01.2012 14:24:38
{quote}{login=AKSENOV048}{date=10.01.2012 02:05}{thema=}{post}прошу прощенья, ошибочка. Вот др.файл.{/post}{/quote}  
посмотрите пжт файл, если вот так, ошибочное предупреждение.
 
 
 
#18
10.01.2012 23:49:12
а может быть такое что у одного человека может быть разные даты рождения?
 
 
 
#19
10.01.2012 23:59:01
Ещё как может! Яркий пример - Штрилиц.
 
 
 
#20
11.01.2012 12:15:14
{quote}{login=AKSENOV048}{date=10.01.2012 11:49}{thema=}{post}а может быть такое что у одного человека может быть разные даты рождения?{/post}{/quote}  
Доброго времени суток  
Может ва каких  то исключительных (в теоретических, фантастических) и в случаях, несвоевременной регистрации родившегося ребенка, иногда также бывает, но только не в даном. Поскольку в паспорт будет записана только одна дата рождения.
 
 
 
#21
12.01.2012 04:39:32
вот с полной проверкой.  
 
перемудрил я наверное в коде сильно) ...но работает.
 
 
 
#22
12.01.2012 04:48:07
прошу прощенья, вот правильный.
 
 
 
#23
12.01.2012 09:37:14
Без листа для ввода данных. При добавлении новых людей в БД методом ColumnDifferences фильтруем её и визуально проверяем дубликаты.  
P.S. Тихо сегодня у нас тут :(
 
 
 
#24
12.01.2012 12:47:48
{quote}{login=AKSENOV048}{date=12.01.2012 04:48}{thema=}{post}прошу прощенья, вот правильный.{/post}{/quote}  
Благодарю  
Именно тот компот, которого хотелось испить
 
 
 
Страницы: 1
Читают тему
Наверх