Hi dcheulkar, welcome to the forum. Try this:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ws As Worksheet
Dim V As Variant
Dim NM As String
If Target.Address = "$A$4" Then
NM = Me.Name
V = Target.Value
For Each ws In Worksheets
With ws
If .Name <> NM Then
.Range("A4,C11,F9").Value = V
End If
End With
Next
End If
End Sub
In Excel, right-click on the Sheet 1 Tab and select View code. Paste the above code in the window that appears. Then press ALT+F11 to return to Excel.
Please click the Add Reputation star below any helpful posts, and if you have your answer, mark your thread as SOLVED (Thread Tools up top). Thanks!-Lee
Bookmarks