макрос создания копии выбранной в проводнике книги .csv в формат .xls

Я пишу макрос на vba, который открывает проводник. В нем я хочу выбрать файлс .csv, а после создать новую книгу-копию выбранного файла уже в формате .xls Вот та часть кода, на которой я остановился:

```Sub ShowGetOpenDialod()
    ```Dim avFiles
    ```avFiles = Application.GetOpenFilename _
                ("Excel files(*.csv*),*.csv*", 1, "??????? Excel ?????", , False)
   ``` If VarType(avFiles) = vbBoolean Then
       ``` Exit Sub
    ```End If
    ```MsgBox "Выбран файл: '" & avFiles & "'", vbInformation, "PosNo"
```End Sub

Ответы (0 шт):