powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / не могу понять ошибку
17 сообщений из 17, страница 1 из 1
не могу понять ошибку
    #39138046
Алексей Москва
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
привет всем помогите понять ошибку и как правильно написать код.
есть кнопка Command4 и Combo3 в ней есть список из нескольких названий документов.
нужно что бы при нажатии на Command4 открывался именно тот документ который выбран в Combo3

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Sub Command4_Click()
If Combo3.Text = "ч.8_ст.26_Общий" Then
Dim word As Object
Set word = CreateObject("Word.Application")
word.Visible = True
word.Documents.Open ("C:\Users\пользователь\Desktop\База\ч.8_ст.26_Общий.docx")
End If
If Combo3.Text = "ч.8_ст.26_Общий_с_разъяснениями" Then
Dim word As Object
Set word = CreateObject("Word.Application")
word.Visible = True
word.Documents.Open ("C:\Users\пользователь\Desktop\База\ч.8_ст.26_Общий_с_разъяснениями.docx")
End If
End Sub



помогите пожалуйста....
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39138064
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мы тоже не можем понять ошибку, о которой ты не счел нужным сообщить.

Встречный вопрос, а почему ты думаешь, что пишешь на С++?
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39138078
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: vbnet
1.
Dim word As Object



2 раза объявлять не надо в одной процедуре
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39138092
Алексей Москва
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.Pro,
я пишу в Microsoft Visual Basic 6.0
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39138103
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей МоскваShocker.Pro,
я пишу в Microsoft Visual Basic 6.0это ошибка?
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39138187
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей МоскваShocker.Pro,
я пишу в Microsoft Visual Basic 6.0А зачем код на форуме оформляешь как С++? Причем уже не в первый раз
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39138209
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AntonariyАлексей МоскваShocker.Pro,
я пишу в Microsoft Visual Basic 6.0это ошибка?пожалуй, ошибка вот это:Алексей Москвая пишу
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39138500
Фотография alex77755
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
На коленке писоно . примерно так. Не проверял. Без проверки наличия файла...
Код: vbnet
1.
2.
3.
4.
5.
6.
        Dim pat
        Dim word As Object
        pat = "C:\Users\пользователь\Desktop\База\" & Combo3.Text & ".doc"
        Set word = CreateObject("Word.Application")
        word.Visible = True
        word.Documents.Open (pat)
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39139336
Алексей Москва
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.ProАлексей МоскваShocker.Pro,
я пишу в Microsoft Visual Basic 6.0А зачем код на форуме оформляешь как С++? Причем уже не в первый раз
простите а как должно ?
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39139349
Алексей Москва
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
alex77755,
вот какая ошибка
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39139350
Алексей Москва
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
alex77755,
вот какая ошибка.
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39139361
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей МоскваShocker.Proпропущено...
А зачем код на форуме оформляешь как С++? Причем уже не в первый раз
простите а как должно ?я дважды давал ссылку на правила форума и дважды давал ссылку на FAQ, и там и там это написано. Но если логика подсказывает, что когда пишешь на VB нужно оформлять код как для С++, я не знаю чем помочь. Программирование не для тебя.
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39139364
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей Москвавот какая ошибка
Это не ошибка. И даже не место ошибки. Это программный код в режиме отладки с указанием текущего оператора.
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39139373
Алексей Москва
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
alex77755,
все разобрался огромное спасибо.
а можешь подсказать еще как прописать так как на картинке
text15 - это номер слияния с excel
combo3 - это шаблоны в word, их несколько

вопрос как сделать так что бы при нажатии на предварительные просмотр открывался уже готовый документ со слиянием и при нажатии на печать печатался тоже готовый документ со слиянием.
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39139618
Фотография alex77755
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
На счёт слияния не подскажу.
Не пользуюсь ни слиянием ни ссылками на другие документы.
В своё время имел неосторожность переименовать файл.
С тех пор только формирую документ из шаблона путём вставки в закладки.
Для отправки на печать запиши макрос
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39140518
Алексей Москва
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
alex77755,
а как это сделать ?
...
Рейтинг: 0 / 0
не могу понять ошибку
    #39141169
Фотография alex77755
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вариант
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / не могу понять ошибку
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]