Tack för ditt svar! Det är egentligen inga konstiga saker. Jag har bara spelat in ett makro och får då fram kod:
Range("F4").Select
ActiveCell.FormulaR1C1 = _
"=RC[-1]*'[Namnetpåexcelatthämtavärde.xlsx]Blad1'!R4C12"
Range("F5").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
ChDir "\\mindator\mapp\test"
ActiveWorkbook.SaveAs Filename:= _
"\\mindator\mapp\testexcel.xlsx" _
, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
Men som sagt jag vill få den att automatiskt spara ned PDF:en med namnet "Revision1" och Excelen men samma namn.