Una famiglia di software per fogli di calcolo Microsoft con strumenti per l'analisi, la creazione di grafici e la comunicazione dei dati.
Buonasera Byge,
sono un consulente indipendente e sono qui per aiutarti. Hai dimestichezza con le macro? Di seguito ti riporto un esempio di codice che copia la prima riga del foglio excel attivo su una nuova cartella di lavoro (alla riga 1), per poi salvarla.
Va, ovviamente, adeguata al tuo caso.
Cordialmente.
*********
Option Explicit
Sub OpenAndSaveNewBook()
Dim MyBook As Workbook, newBook As Workbook
Dim FileNm As String
Set MyBook = ThisWorkbook
FileNm = ThisWorkbook.Path & "\" & "TEST-BOOK.xls"
Set newBook = Workbooks.Add
With newBook
MyBook.Sheets("Sheet1").Rows("1:1").Copy .Sheets("Sheet1").Rows("1")
'Save new wb with XLS extension
.SaveAs Filename:=FileNm, FileFormat:=xlNormal, CreateBackup:=False
.Close Savechanges:=False
End With
End Sub
*********