;)Need this code to run in 3 sheets:
name of sheets; "Main", "Data", "Update"
Thanks alot
Sub formula_auto()
Dim LR As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
Range("D2:H2").Value = Array("Where", "Fol", "K", "M", "G")
Range("D3:D" & LR).FormulaR1C1 = "Public"
Range("E3:E" &...