Я использую макрос excel для переименования файлов в определенной папке . Как исправить синтаксическую ошибку в Excel vba

#excel #vba

Вопрос:

‘Этот метод переименовывает все имена файлов в папке, переименовывает все имена файлов в заполнитель() Dim intRowCount Как Целое число Dim intCtr Как Целое число Dim Strfilenameсуществующее как Строка Dim strFileNameNew Как Строка Dim strFolder Как Строка

 'Set the folder path
strFolder = "C:Usersrchandramohan"
 
With Sheet1
    'Find the total rows count in the sheet
    'This will be the last non-blank cell in column A...
    intRowCount = .Cells(.Rows.Count, "A").End(xlUp).Row
     
    'Loop through from the 2nd row (1st row is Heading)
    'till the total rows in the sheet
    For intCtr = 2 To intRowCount
        'Get the existing filename from the cell
        strFileNameExisting = .Range("A" amp; intCtr)

        'Get the new filename from the cell
        strFileNameNew = .Range("B" amp; intCtr)
         
        'Rename the file
      ** Name strFolder amp; strFileNameExisting As strFolder amp; strFileNameNew **
    Next intCtr
End With
 
'Display an appropriate message, once complete
MsgBox "All files renamed successfully!", _
                    vbInformation, "All files renamed"

Конец Суб

Привет, мне нужна помощь, я использую приведенный выше код для переименования файлов в папке, я получаю синтаксическую ошибку в строке, где я отметил ** до и после определенной строки, Имя strFolder amp; strfilenameсуществующий как strFolder amp; strFileNameNew

Я новичок в этом макросе и не смог понять, в чем ошибка. Пожалуйста, ищите решение.

введите описание изображения здесь

1. Поставьте точку останова в строке, запустите функцию и проверьте значения strFolder,strFileNameExisting, strFolder и strFileNameNew.

2. Какую синтаксическую ошибку вы получаете? Для меня код компилируется без каких-либо ошибок sytnax. У вас есть загруженная библиотека, которая переопределяет Name ?

3. Я получаю окно с ошибкой, в котором говорится, что файл не найден с помощью кнопок отладки и других кнопок. Когда я нажимаю на кнопку «Отладка», она показывает эту конкретную строку желтым цветом. У меня нет библиотек, которые переопределяют

4. Какое именно сообщение об ошибке вы получаете? Является strFileNameNew ли допустимым имя файла Windows?

5. Он говорит: «Файл не найден», и да, strFileNameNew-допустимое имя файла

Ответ №1:

Код отлично работает для меня в Windows. Если вы используете Mac, это может быть причиной, по которой он выдает эту ошибку.