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

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

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

Восстановить пароль

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 26.06.2008, 01:02   #1
london735
Пользователь
 
Регистрация: 20.06.2008
Сообщений: 45
По умолчанию Joining Two Macros

Hi!

I need your help in combining two macros. Both of them are fully-functional and complete – except for the fact that each of them is performing only a half of the full intended procedure. Let me briefly describe the macros:

Workbook: STATS.xls
MACRO: PrepareXY

The macro basically takes each pair of X,Y values from the N,O columns, pastes them into the controlling cells K3,L3 and then copies the resultant statistics to a separate tab DataXY for each pair of X,Y

Workbook: Mining_Data2.xls
Macro: Extract_Data

This macro extracts records from the A to E columns at the Raw tab based on a condition that the value of the Output is greater than 970 – and then pastes these records to a separate tab EXTRACT.

Now I need to combine these macros in such a way that the resultant macro works on the third workbook, REF2.xls (which has very similar structure). The resultant macro would work as follows:

The PrepareXY part of this macro would take the letter pairs from the M,N column on the results tab and paste them into the controlling cells I2,J2. After each letter-pair paste operation the Extract_Data part of this macro would scan the Rank column to select only records bigger than 0 and then would copy all corresponding rows of records from D to J columns for each such row to output tab.

I hope I am not asking too much))
Вложения
Тип файла: zip COMBINE.zip (84.3 Кб, 17 просмотров)
london735 вне форума
Старый 26.06.2008, 06:30   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

See this embedding (if I understand you right). Launch macro "Main".
Вложения
Тип файла: rar REF2_2.rar (20.2 Кб, 15 просмотров)
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 26.06.2008, 08:34   #3
dsapa
Пользователь
 
Регистрация: 22.05.2008
Сообщений: 82
По умолчанию

Чевой?
Стесняюсь спросить: что это было?
Типа объясните по-русски.
dsapa вне форума
Старый 26.06.2008, 11:55   #4
slan
Форумчанин
 
Аватар для slan
 
Регистрация: 30.01.2008
Сообщений: 314
По умолчанию а зачем?

вы же потом и ответ попросите перевести
slan вне форума
Старый 26.06.2008, 15:20   #5
london735
Пользователь
 
Регистрация: 20.06.2008
Сообщений: 45
По умолчанию

Hi SAS888!

Thanks a lot for your awesome help! Your macro works great. But I have a couple of additional requests if you don’t mind.)) Can you please describe to me what each line of the code is doing - if you could add a short text line describing the process after each line in the macro that would be marvelous. That will help me to understand you macro better so that I can use it in the future on other projects. Second – do you think you can add a progress indicator that will show how much time is left? Or does that require a prior knowledge of all the number of the cycles the macro will run through – which we cannot have without running the macro? Last request is a product of my first request – I have a triple-letter combination sheet and I need your macro to be adapted to it. This sheet is the exact copy of the sheet you sent to me but only the number of combinations is greater. Please take a look!

PS: I have to note that this place is by far the BEST place in terms of speed and accuracy from among the top excel forums of the world that I have been able to visit. Thanks again!
Вложения
Тип файла: zip REF33.zip (74.7 Кб, 15 просмотров)
london735 вне форума
Старый 26.06.2008, 15:23   #6
london735
Пользователь
 
Регистрация: 20.06.2008
Сообщений: 45
По умолчанию

the progress indicator might be something which will simply show the percentage of the letter combinations that have already been cycled through to the total number of combinations. for example, if there are 20 combinations as is in my last sheet and 5 letter combinations have already been cycled through - the counter would give 5/20= 25%
thanks!!!
london735 вне форума
Старый 26.06.2008, 18:19   #7
dsapa
Пользователь
 
Регистрация: 22.05.2008
Сообщений: 82
По умолчанию

Ну я так не играю!!!
Хоть вкратце объясните, в чем тут фенька.
В конце концов, из конца в конец, это русскоязычный форум.
Типа "имею право знать". Не сидеть же с корявым автопереводчиком, который наверно слово "Excel" не сможет перевести. (Гы).
dsapa вне форума
Старый 26.06.2008, 21:25   #8
valerij
Старожил
 
Аватар для valerij
 
Регистрация: 12.05.2007
Сообщений: 2,339
По умолчанию

Цитата:
Сообщение от dsapa Посмотреть сообщение
Ну я так не играю!!!
с корявым автопереводчиком.
Чем не перевод?
№5
Привет SAS888!
Благодарит много за вашу благоговейную помощь! Ваша макрокоманда работает большим. Но я имею пару дополнительных запросов если вас не затруднит.)) Можете вы удовлетворить опишите мне, что каждая линия кода делает - если вы могли добавить короткую text строку, описывающую процесс после каждой линии в макрокоманде, которая была бы изумительна. Это поможет мне, чтобы понимать, что вы macro улучшаете таким образом, что я могу использовать это в будущем на других проектах. Во-вторых – вы думаете, что вы можете добавить индикатор хода работы, который покажет, сколько

№6
индикатор хода работы, возможно, был бы чем-нибудь, который просто покажет процент комбинаций письма, через которые уже пройдено цикл развития к полному числу комбинаций. например, если есть 20 комбинаций, поскольку находится в моем последнем листе и через 5 комбинаций письма уже пройдено цикл развития - прилавок дал бы 5/20= 25% спасибо!!!
valerij вне форума
Старый 27.06.2008, 08:40   #9
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Commentaries in the macro code are added. Launch macro "Start". The progress is displayed in the "Progress Bar" from now on.
Вложения
Тип файла: rar REF33_2.rar (61.7 Кб, 29 просмотров)
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 27.06.2008 в 09:03.
SAS888 вне форума
Старый 27.06.2008, 15:01   #10
london735
Пользователь
 
Регистрация: 20.06.2008
Сообщений: 45
По умолчанию

wow...you are a master programmer!)) it works like charm!!! my only question how do i see the actual code of the macro which does the copying....when I click Macro-Edit it only shows the UserForm controls....I need to see your descriptions of the macro...thanks again!!!
london735 вне форума
Закрытая тема


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