got it,

Private Sub CommandButton1_Click()

ActiveWorkbook.Save 'save sheet
ActiveWorkbook.Route 'send to next recipient on route list
ActiveWorkbook.Save 'save again, to sto annoying dialogue
ActiveWorkbook.Close 'close workbook

End Sub


neil

"Neil" wrote in message
...
Hi there, im looking for some code which i can attach to a button on my
spreadsheet,

basicaly, i want eht button to do this, in this order,

save the spreadsheet
send to the next recipient on the routing list
then close the app


Any help is greatly apreciated,

thanks,
neil