Примеры API функций на VBA

Формулировка задачи:

Уважаемые здравствуйте! Большая просьба прислать ссылки на разные примеры связанные с работой API в VBA. Например как работать MessageBoxA. Хочу потренироваться в гугле что-то не то выходит. Заранее спасибо!)

Решение задачи: «Примеры API функций на VBA»

textual
                            Листинг программы 
                        
                            Sub Main()
 
    fn$ = Application.GetOpenFilename("Текстовые файлы,*.txt", , "Открываем файл")
 
    If UCase$(fn$) <> "ЛОЖЬ" And UCase$(fn$) <> "FALSE" Then
     
       '::: Действия
 
    End If
 
End Sub