Макрос импорта данных
 

Добрый день.
Помогите сделать макрос:
Есть два файла excel, к которым нужен макрос из двух частей, реализованных в одном из файлов:

Первая часть:
Спрашивается файл excel, с которого будут браться данные некоторых ячеек (адреса ячеек статичны)
Эти определенные ячейки копируются в другой файл екселя, но в ту строку, где находиться курсор или строка должна выбраться на совпадении данных в определенном столбце с ячейкой из указываемого файла.
Вторая часть
С текущей строчки excel определенные ячейки копируются в определенные ячейки указанного ранее файла.

Для меня задача является не тривиальной. Пока углублюсь в тему макросов - пройдет много времени.
Спасибо.

Мой пост тоже по поводу макросов. Только для ворда.

В старых офисах (до 2003) без проблем выставлял на панельки пиктограммы макросов. В 2007 никак не получается! Они сделали это невозможным (типа как использование графики в QBаsicе на висте и 7-й винде) или это всё же можно (безумно сложно) сделать?

Ещё просьба, знакомая попросила написать несколько маленьких забавных зрелищных макросов для демонстрации ученикам. Типа таких:

'Удаляет текст на красном фоне
Sub delred()
With ActiveDocument.Content.Find
.Highlight = True
.Format = True
Do While .Execute = True
If .Parent.HighlightColorIndex = wdRed Then
.Parent.Delete
End If
Loop
End With
End Sub

Sub перевертыш()
Dim strStroka As String
Dim strPer As String
strStroka = Selection.Text
strPer = StrReverse(strStroka)
Selection.Text = Replace(strStroka, strStroka, strPer)
End Sub

Sub delTextBetweenBrackets()
'заменяем текст в скобках на пробел в скобках
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Text = "\(*\)"
.Replacement.Text = "( )"
.Forward = True
.Wrap = wdFindContinue
.MatchWildcards = True
.Execute Replace:=wdReplaceAll
End With
End Sub

Может быть знаете откуда можно скачать подобные маленькие макросы? Был бы благодарен за ссылку на страничку! Или (и) может быть несколько коротких макросов в эту тему запостите?

aazelinski, каких именно? От макроса должна быть какая-то реальная польза, а не только «зрелищность».

Любых. Польза не нужна. Просто надо продемонстрировать что макросы пишутся на бейсике и вот как круто такие коротенькие всякие зрелищные эфекты выдают и потому нафиг паскаль - будем бейсик изучать, потому что знание ворда полюбому пригодится а в ворде макросы, а макросы на бейсике и дальше сказка пробелого бычка. Чиста нужна зрелищность и чем тупее - тем лучше. Но чтобы макросы короткими были.

Мда… После таких заявлений не приходится удивляться, отчего это у нас уровень образования всё ниже и ниже.

aazelinski, в моём понимании вот такое, например: HTA: нанесение (расстановка) OMR-меток в файле MS Word (Страница 1) — Windows Script Host, HTA (VBScript, JScript) — Серый форум — реальная польза, а от такого задания:
и решения — при столь любимой Вами зрелищности — толку ровно ноль.

Относительно моего поста - я давно углубился и решил все свои вопросы (и не только эти).