Я создаю таблицу с цитатами и заказами. Я тестировал VBA, чтобы упростить параметры для пользователя, однако мне трудно автоматически называть экспортируемые файлы CSV и PDF с номером заказа и именем клиента. У меня есть VBA для работы с PDF, но не CSV. Номер заказа находится в ячейке «O14», а имя клиента - в «N14».
Код, который я пробовал:
Sub CopyCells()
' export Macro
Range("G8:O60").Select
Selection.Copy
Workbooks.Add
ActiveWorkbook.SaveAs Filename:= _
"C:Users\Desktop\Invoices\Book2.csv" _
, FileFormat:=xlCSV, CreateBackup:=False
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True
'Create and assign variables
Dim saveLocation As String
saveLocation = "C:Users\Desktop\pdf\myPDFFile.pdf" _
'Save Active Sheet(s) as PDF
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=Range("N14").Value & "_" & Range("O14").Value