#vba #file-rename
#vba #файл-переименовать
Вопрос:
У меня есть приложение Access.
Desktops Files
File1.xlsx
File2.xlsx
File3.xlsx
Form1 содержит несвязанное listbox с именем lstNewFiles и командную кнопку cmdRenameFiles. Я копирую имена файлов с открытого листа Excel и вставляю эти имена в lstNewFiles. Примером может быть:
Test1.xlsx
Test2.xlsx
Test3.xlsx
Я хотел бы щелкнуть cmdRenameFiles и переименовать файлы рабочего стола, чтобы отобразить вставленные значения lstNewFiles. Я это не идеально, но это текущий рабочий процесс вручную, и мне нужно его воспроизвести. Заранее спасибо.
Комментарии:
1. Возможно, вам захочется заглянуть в FileSystemObject , в частности в свойство Name файлового объекта . Вы можете получить доступ к файловому объекту, используя метод GetFile .
2. Добавьте ссылку ( Tools -> References … ) на библиотеку Microsoft Scripting Runtime library.
3. спасибо Zev за ваш быстрый ответ, но у меня не возникает проблем с переименованием файла со значением textbox. Проблема в том, как переименовать несколько файлов из значения listbox, когда listbox несвязан и нет источника управления. Я буквально копирую значения ячеек A2, A3, A4 с открытого листа Excel и вставляю в listbox.
4. Я предполагаю, что вы вставляете несколько строк в listbox? Вы имеете в виду текстовое поле? Как вы вставляете значения в listbox?
5. Да, вставляя несколько строк в listbox. Это может быть до 50 строк. Я ввожу ctl-c из Excel и ctr-v непосредственно в listbox. После нажатия на файлы с именем командира потребуется переименовать файлы рабочего стола в имена файлов listbox, которые были вставлены. Я мог бы изменить текстовое поле, если это поможет, но текстовое поле все равно было бы несвязанным.