When you create the code you not have to display the VBE
you can run code like this without opening the VBE

See also Chip's site
http://www.cpearson.com/excel/vbe.htm

Sub AddProcedure()
Dim VBCodeMod As CodeModule
Dim LineNum As Long

Set VBCodeMod = ThisWorkbook.VBProject.VBComponents("Sheet1").Code Module
With VBCodeMod
LineNum = .CountOfLines + 1
.InsertLines LineNum, _
"Sub MyNewProcedure()" & Chr(13) & _
" Msgbox ""Here is the new procedure"" " & Chr(13) & _
"End Sub"
End With
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl



"bobbo" wrote in message ups.com...

Thanks that works. Is there a way to keep the screen from hopping back
and forth from excel to vbe while the code is executing or will I just
have to live with that?