Извините за повторяющуюся тему но просто очень нужна помощь странная ошибка не кто не может помоч а решить проблемму нада в кратчайшие стоки. Проблемма в следующем: есть макрос встроенный в документ ворд его делал тип до меня работал потом уволился а я на его место пришёл короче макрос на всех компах нормально работает а на 1 компе не запускался вообще вот что писал:

Первое: Cold not load some objects bekause they are not available on this machine.-Жму ОК

Второе: Cold not load an objects bekause it is not available on this machine. Жму ОК

Третье: Cold not load some objects bekause they are not available on this machine. Жму ОК

Четвёртое: Cold not load an objects bekause it is not available on this machine. Жму ОК

Потом появляется окно: Run-time error 424
Object required
Жму кнопку: Debug

Появляется следующий скрипт:
Private Sub OptionButton4_Click()
OptionButton4.Value = True
OptionButton5.Value = False
TextBox10.Text = ""
TextBox11.Text = ""
TextBox12.Text = ""
TextBox15.Text = ""
TextBox16.Text = ""
Label17.Caption = "Название"
Label18.Caption = "В Лице"
Label19.Caption = "Основание"
Label18.Font.Size = 12
Label19.Font.Size = 12
Label20.Caption = ""
Label21.Caption = ""
Label22.Caption = "Реквизиты"
DTPicker2.Visible = False-ВОТ ТУТ ПИШЕТ ОШИБКУ-когда я её коминтирую выдаёт
DTPicker3.Visible = False-вот тут. Когда её коминтирую выдаёт
TextBox16.Visible = False
Label30.Visible = False
ComboBox4.Visible = True
ComboBox4.Left = 108
ComboBox4.Top = 66
ComboBox4.Value = "Устав"
TextBox12.Left = 108
TextBox12.Width = 330
TextBox12.Top = 96
TextBox12.Visible = False
TextBox11.Top = 36
DTPicker3.Top = 96-тут
TextBox15.EnterKeyBehavior = True
TextBox15.Text = "Юридический адрес:" & vbCrLf & _
vbCrLf & "Физический адрес:" & vbCrLf & vbCrLf & "ИНН" & vbCrLf & "КПП" & vbCrLf & "ОГРН" & vbCrLf & "К/с" & _
vbCrLf & vbCrLf & "Р/с"

TextBox11.TabIndex = 2
TextBox12.TabIndex = 4

Потом когда эти строки закоментированны выдаёт следующий скрипт.

Private Sub OptionButton5_Click()
OptionButton5.Value = True
OptionButton4.Value = False
TextBox10.Text = ""
TextBox11.Text = ""
TextBox12.Text = ""
TextBox15.Text = ""
TextBox16.Text = ""
Label17.Caption = "Фамилия И.О."
Label18.Caption = "Дата рождения"
Label19.Caption = "Серия паспорта"
Label20.Caption = "№ паспорта"
Label18.Font.Size = 11
Label19.Font.Size = 11
Label21.Caption = "Дата выдачи"
Label22.Caption = "Прописка"
DTPicker2.Visible = True-тут
DTPicker3.Visible = True-тут
TextBox16.Visible = True
Label30.Visible = True
ComboBox4.Visible = False
ComboBox4.Left = 6
ComboBox4.Top = 228
TextBox11.Top = 96
DTPicker3.Top = 36-тут
TextBox12.Left = 108
TextBox12.Width = 330
TextBox12.Visible = True
TextBox12.Top = 66
DTPicker2.Visible = True-тут
TextBox15.EnterKeyBehavior = False

TextBox11.TabIndex = 4
TextBox12.TabIndex = 2

End Sub

После коментирования всех этих строк программа запускаются но работает не корректно не прописывает некоторые даты в документе а с недавних пор начала выдавать ошибку 5 и не сохраняет документ.

Дело в том что на остальных компьютерах макрос работает нормально все его запускают через ярлык на сетевой папке. А все новые компьютеры которые я устанавливал не хотели хавать этот макрос тоже выдавали ошибку 424.

Подскажите пожалусто что делать что за ерунда я уже не знаю что это может быть.

Сообщение отредактировал Greiv - Вторник, 03 Июня 2008, 15:44