Try the below code to see if this works


Sub Add_Formulabar()

Application.DisplayFormulaBar = True

End Sub



--
VBA Noob
------------------------------------------------------------------------
VBA Noob's Profile: http://www.excelforum.com/member.php...o&userid=33833
View this thread: http://www.excelforum.com/showthread...hreadid=537877