{quote}{login=Юрий М}{date=31.01.2010 10:33}{thema=Re: }{post}  
И что неправильного тут? А КАК нужно "правильно"{/post}{/quote}  
 
Если бы  знала как правильно, я бы не тратила ваше время :)  
 
Учту на будущее (потому что мне нужен еще один макрос :) ), что строчка ThisWorkbook.Close может быть только последней.  
 
А вот кстати, для макроса, записанного в личную книгу макросов, ThisWorkbook - книга из которой его вызвали или personal.xls?

{quote}{login=The_Prist}{date=31.01.2010 09:51}{thema=Re: } Если закрыть этот файл, то проект с макросом из этого файла будет недоступен(за исключением случаев с вызовом макроса методом Run).{/post}{/quote}  
 
Вот про метод Run поподробнее пожалуйста!  
 
Провела простой эксперимент - строчку ThisWorkbook.Close False поставила раньше строки вывода сообщения об успешном завершении работы макроса - и сообщение не появилось, то бишь все-таки закрытие книги, которая содержит модуль с макросом, влечет за собой прекращение выполнения макроса.    
 
Как сделать так чтобы книга с макросом закрылась, а сам макрос доработал до конца?  
 
Юрий М, меня смущает что макрос в таком виде как он у меня есть, завершает работу не по штатному End sub, а вследствие закрытия книги, что неправильно. То есть так оно конечно работает, но это нехорошо.  
 
Dophin, очередное большое спасибо!

{quote}{login=Dophin}{date=31.01.2010 08:15}{thema=}{post}в примере книга с макросом закрывается - не закрывается книга с импортом данных, чтобы закрыть и ее добавьте в код Workbooks(DestFileName).Close False  
 
Добавьте в начало макроса Application.ScreenUpdating = False  
 
Добавьте обработчик ошибки когда пользователь отказывается от перезаписи файла.{/post}{/quote}  
 
Книга с импортом пусть остается, так и задумано. С итоговым файлом пользователь может делать что хочет.  
 
Я просто не могу понять логику работы программы - я закрываю внутри макроса книгу, частью которой является макрос, и маркос при этом продолжает выполняться?  
 
Про обработчик ошибок я думала, но пока не знаю как его сделать :) Есть примеры кода?

Извините, предыдущий пост мой, не подписалась случайно.

Итак я наконец осилила свой первый макрос!    
Три дня проведенные за компом в воскуривании FAQ, плюс пройденные когда-то два семестра паскаля не прошли даром, продукт почти готов. Отдельное спасибо Dophin за помощь!  
 
Работает просто - есть исходный файл xxxx.mml, из него некоторые данные экспортируются в удобную пользователям табличку, с помощью файла export.xls и чудо-кнопки в нем.  
 
Мне хочется, чтобы макрос после выполнения сам закрывал рабочий файл export.xls и оставлял пользователя в конечном файле с экспортированными данными.  
 
Сейчас у меня для этой цели служит строчка    
 
' Закрываем файл  
ThisWorkbook.Close False  
 
End Sub  
 
Но я так понимаю что при таком раскладе  макрос завершает свою работу не по End Sub, а при закрытии самого файла строчкой ThisWorkbook.Close, что не есть правильно.  Может я ошибаюсь? Макрос лежит в Module1 этого самого файла.  
 
Как сделать чтобы было кошерно? Предполагается что этой бирюлькой будут пользоваться и другие люди, так что в личную книгу макросов его не загонишь.  
 
А если кто найдет еще какие ошибки, ткните меня пожалуйста носом в них.

Ух ты, здорово! :)  
Можно я вас поцелую?  
 
.Range("c2:c" & ilastrow3) = .Range("c2:c" & ilastrow3).Value  
 
Особенно приятно, я-то это делала копированием только значений на другой лист.

Dophin, спасибо большое!    
 
Работает как надо. Без вас я бы пару недель в книжках по бейсику ковырялась в поисках заветной строчки.

Уважаемые, нужна ваша помощь!    
Увы, VBA вижу первый раз в жизни, и макрос делаю тоже первый раз. И хотя я нашла здесь разные примеры с меняющимся количеством строк, но не смогла разобраться как можно их применить к моему случаю. Извините меня, пожалуйста, за серость, и сильно ногами не бейте.  
 
Есть исходный текстовый файл, который представляет собой экспорт таблицы маршрутизации телефонных кодов.  
В файле меня интересуют строки двух типов:  
#1 соответствие направления (setname="Canada") и маршрута (dw1="rtl-tata")  
numan-add:resulttable:custgrpid="rou1",name="1",resulttype="ROUTE", dw1="rtl-tata", setname="Canada"  
#2 Соответствие кода (digitstring="1204") и направления (setname="Canada")  
numan-add:bdigtree:custgrpid="rou1",callside="originating",digitstring="1204",setname="Canada"  
 
Задача - сделать соответствие между кодом, направлением и маршрутом. Руками получается легко. Макрорекордером макрос получается и работает, но - количество строк как типа 1, так и типа 2, меняется от файла к файлу, а рекордер записывает так:  
 
   ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],Лист2!C:C[1],2,0)"
   Selection.AutoFill Destination:=Range("C2:C63")  
 
Как заставить макрос применять формулу на нужное количество ячеек?  
Или есть более изящный способ?  
 
Подскажите, пожалуйста :)