Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.07.2012, 22:14   #1
genom
Новичок
Джуниор
 
Регистрация: 31.07.2012
Сообщений: 4
Смущение Опять эти макросы =)

Пролистал Ваш форум нашел много всего интересного, но мне нужна помощь если конечно у вас есть время, не могу сообразить как организовать поиск в листе1 и листе2 одинаковые позиции по столбцу А и формированию новой таблице на 3 листе из них...
конечно очень помог топик, но все равно не пойму как сделать привязку к листам и новую сформировать на новом листе, и там заданное количество строк, а я не знаю количество строк ((( :confused
Вложения
Тип файла: rar Пример.rar (10.1 Кб, 7 просмотров)

Последний раз редактировалось genom; 31.07.2012 в 23:04.
genom вне форума Ответить с цитированием
Старый 31.07.2012, 22:15   #2
genom
Новичок
Джуниор
 
Регистрация: 31.07.2012
Сообщений: 4
По умолчанию

http://www.programmersforum.ru/showthread.php?t=32252

и если не сложно посоветуйте книжку с чего начать изучать Макросы в Екселе.

В основу своего макроса взял 5 пост =) но ума до конца разобраться с основным телом программы не хватило

For Each cell In ra.Cells
Err.Clear: cv = Trim(CStr(cell.Value))
coll.Add newrow, cv & "a"
Select Case Err.Number
Case 0 ' не было ещё такой строки
cell.EntireRow.Cells(1).Resize(1, 12).Copy Cells(newrow, 1)
newrow = newrow + 1
Case 457 ' есть уже такая строка (что такое case и почему он принимает значение 0 потом 457, походу это количество раз выполнения цикла ... но не допонял )

Последний раз редактировалось genom; 31.07.2012 в 22:20.
genom вне форума Ответить с цитированием
Старый 31.07.2012, 23:08   #3
Serge 007
Участник клуба
 
Аватар для Serge 007
 
Регистрация: 15.12.2009
Сообщений: 1,448
По умолчанию

Цитата:
Сообщение от genom Посмотреть сообщение
...посоветуйте книжку с чего начать изучать Макросы в Екселе....
В поисковике забить запрос не пробовали? Зря
Бесплатная помощь: www.excelworld.ru
Платная помощь: serge_007.planetaexcel@mail.ru
https://yoomoney.ru: 41001419691823
Serge 007 вне форума Ответить с цитированием
Старый 31.07.2012, 23:56   #4
R Dmitry
Форумчанин
 
Регистрация: 07.03.2010
Сообщений: 796
По умолчанию

можно так.....
Пример.zip
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
R Dmitry вне форума Ответить с цитированием
Старый 01.08.2012, 01:08   #5
genom
Новичок
Джуниор
 
Регистрация: 31.07.2012
Сообщений: 4
По умолчанию

Цитата:
Сообщение от Serge 007 Посмотреть сообщение
В поисковике забить запрос не пробовали? Зря
конечно пробовал, довольно большой выбор литературы, я скачал книги 4, не сказал бы что они написаны доступным языком, да и огромнющие, хотелось узнать может вы знаете какую хорошую литературу.
Посоветуйте какую из них прочитать чтобы освоить хотя бы азы

Последний раз редактировалось genom; 01.08.2012 в 01:29.
genom вне форума Ответить с цитированием
Старый 01.08.2012, 01:12   #6
genom
Новичок
Джуниор
 
Регистрация: 31.07.2012
Сообщений: 4
По умолчанию

Цитата:
Сообщение от R Dmitry Посмотреть сообщение
можно так.....
Вложение 52802
спасибо большое и дай бог вам счастья =)
теперь мне осталось разобраться в коде и узнать как отфильтровать одинаковые поля В есть кто подскажет ?)
то есть если в поле В два раза попадается значение то он мне его просто записал 1 раз, а не копировал таблицу.
Делать за меня необязательно дайте мысль как отфильтровать, какие функции использовать

Последний раз редактировалось genom; 01.08.2012 в 01:20.
genom вне форума Ответить с цитированием
Старый 01.08.2012, 23:47   #7
R Dmitry
Форумчанин
 
Регистрация: 07.03.2010
Сообщений: 796
По умолчанию

Лучше сразу покажите результат Ваших задумок (в файле xls), а логику мы сами поймем..... если она где то рядом..... ))
Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234
R Dmitry вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
опять я опять мемо nyasha2013 Помощь студентам 2 19.05.2011 21:09
Строки.. опять эти строки... Johny_Jumper Помощь студентам 12 26.04.2011 16:11
Ох уж эти прерывания evgenen Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 2 06.01.2011 01:10
И опять мэйлы.. Опять... Pusher PHP 6 28.06.2008 03:08