ShellExecute 0, "print", C:\Documents and Settings\.......\toto1.docx, "", "", SW_SHOWNORMAL
Application.Wait (Now + TimeValue("0:00:10"))
ShellExecute 0, "print", C:\Documents and Settings\.......\toto2.docx, "", "", SW_SHOWNORMAL
Application.Wait (Now + TimeValue("0:00:10"))