Assigning Value

It's a best way to Assign Multiple values to Range By Array


Sub AssignValues()
Range("A1:D1").Value = Array("Sr.No", "Name", "Contact", "Address")
End Sub