Вопрос асам по VBA

Записал с помощью макрос-рекордера макрос для экспорта файла в JPEG.
Параметры экспорта фиксированные. Но получается также фиксированное и имя файла.
Если заменяю FullFileName на FileName, открывается окно настроек экспорта с последними использованными параметрами экспорта.
Как сделать, чтобы экспорт делался с фиксированными параметрами экспорта, но имя сохраняемого файла было бы то же, что и имя открытого файла, с которого делается конвертация?

принцип такой:
получаем имя кореловского файла функцией FullFileName
находим и отсекаем расширение, используя поиск ".cdr" с конца строки функцией InStrRev
экспортируем именем файла плюс добавленное расширение ".jpg"

Принцип понятен.
Но если в деталях, то сложновато.
Однако, всё равно спасибо за отзывчивость.