Automation Macro for updating formula when changing cell value
Hi,
Try this
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$M$2" Then
If Target.Value < "" Then
ActiveSheet.Name = Target.Value
End If
End If
End Sub
Right click the sheet tab, view code and paste this in
Mike
"Danny" wrote:
I have the following macro:
Sub Rename_Sheet()
ActiveSheet.Name = ActiveSheet.Range("M2")
End Sub
This macro will change the name of the sheet into what has been filled in
the cell reference.
Does anyone know how this can be done / run automatic when the Cell is
changed / filled in?
Thanks
|