G
Guest
Hi,
I have tried to use explaination from the community, but till know this did
not work.
Can someone advise me on the following?
I want to save a workbook with a refference in a cell, at the moment i use:
Private Sub Workbook_Save()
Dim rng As Range
Set rng = ActiveSheet.Range("M2")
ActiveWorkbook.SaveAs _
Filename:=rng.Value & ".xls", _
FileFormat:=xlWorkbookNormal
End Sub
This is working if i run it manually, but what do i need to do to activate
this when i click on the save buton?
Thanks
I have tried to use explaination from the community, but till know this did
not work.
Can someone advise me on the following?
I want to save a workbook with a refference in a cell, at the moment i use:
Private Sub Workbook_Save()
Dim rng As Range
Set rng = ActiveSheet.Range("M2")
ActiveWorkbook.SaveAs _
Filename:=rng.Value & ".xls", _
FileFormat:=xlWorkbookNormal
End Sub
This is working if i run it manually, but what do i need to do to activate
this when i click on the save buton?
Thanks