Sub banner1_FSCommand( ByVal command, ByVal args ) Call allbuttons_DoFSCommand( command, args ) End Sub Sub banner2_FSCommand( ByVal command, ByVal args ) Call allbuttons_DoFSCommand( command, args ) End Sub