Hello Sergio
This is possible using VBA.
Here is a sample code to achieve this :
With Worksheets("Sheet1")'***
For i = 1 to .Range("A65536").End(xlup).row '***
Thisworkbook.SaveAs .Cells(i,1) '***
Next i
End With

(***please amend accordingly)
HTH
Cordially
Pascal