2014-12-15 2 views
0

Я пытаюсь скопировать лист TDadosRecTransf из ModStatRec.xlsm в новый файл, который я хочу сохранить как TDadosRecTransf.xlsx. Я хочу, чтобы путь для сохранения файла TDadosRecTransf.xlsx был текстовым значением в ячейке A9 листа «Instrucoes» в ModStatRec.xlsm в замене «C: \ Transfer \ Receitas», который у меня есть сейчас.VBA macro для сохранения файла excel с использованием пути из ячейки в другой книге

У меня есть следующий код

Sheets("TDadosRecTransf").Select 
Sheets("TDadosRecTransf").Copy 
ActiveWorkbook.SaveAs Filename:="C:\Transfer\Receitas\TDadosRecTransf.txt", _ 
    FileFormat:=xlText, CreateBackup:=False 

Я пытался настроить переменную в верхней части кода, как этот

Dim Filepath As String 
Filepath = Workbooks("ModStatRec.xlsm").Worksheets("Instrucoes").Range("A29").Value 

и линии

ActiveWorkbook.SaveAs Filename:="Filepath" & "\TDadosRecTransf.txt", FileFormat:=xlText, CreateBackup:=False 

Но это Безразлично» т работы.

Что я делаю неправильно? Как я могу это сделать? Пожалуйста, помогите ...

ответ

0

Отбросьте двойные кавычки

ActiveWorkbook.SaveAs Filename:=Filepath & "\TDadosRecTransf.txt", FileFormat:=xlText, CreateBackup:=False 
+0

Я уже сделал это, и не работает ... :-( – LMatias