Sub AutoOpen()
'Dim mmm, nnn As String '''кстати когда глючило,
то не хотело работать без объявления
этих переменных, хотя галочка
об обязательном объявлении
в настройках была снята.
On Error Resume Next
CommandBars("PDFMaker 6.0").Visible = False
CommandBars("Control Toolbox").Visible = False
CommandBars("Exit Design Mode").Visible = False
mmm = ActiveDocument.Path 'эти переменные оказывались пустыми
nnn = ActiveDocument.Name
If InStr(ActiveDocument.Name, "водная") Then
If InStr(ActiveDocument.Path, "olaris") Then Call SelAndCopy
End If
If InStr(ActiveDocument.Path, "olaris") Then Call GetDocName
End Sub
Почему не видится путь файла?
Вроде все время работало, но тот как-то заглючило на работе. Дома поставил Висту и сначала тоже не срабатывало.
Открываю любой ворд-документ и проверяю:
Но теперь работает. А вдруг опять перестанет видеться? В чем может быть причина?
Открываю любой ворд-документ и проверяю:
Код:
Но теперь работает. А вдруг опять перестанет видеться? В чем может быть причина?
Надо видеть сбойный код полностью.
Цитата: SkyMаn
Надо видеть сбойный код полностью.
Полностью не получится. Там большущая цепочка вызываемых друг из под друга процедур.
Но даже если просто такую процедуру пошагово пускать, то (во время сбоя) в переменных mmm и nnn было пусто. Причем условия if в этом случае обрабатывались. Т.е. VBA как бы "не реагировал"... ни на что.