Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Прошу еще помочь немного... / 11 сообщений из 11, страница 1 из 1
13.09.2003, 11:57
    #32264269
The¤Lexx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Здраствуйте..

Есть форма, в ней n-ное количество чекбоксов (45 :) ) нужно проверить если чекбокс отмечен чтобы данные заносились в переменную, и чтобы потом можно было вставить их в ворде (форма в экселе загружается).
Расскажу подробнее, если чекбокс выбран он в документе Екселя ищет ячейку которая содержит какой-то текст и заносит в переменную.
Так вот проверка чекбоксов:
If CheckBox1.Checked = True Then
Set cb1 = Cells.Find(What:="01 -", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False)
End If
Нехочет так работать! :(
Накупил себе книг всего, там очень мало про формы сказано, парни помогите разобраться очень признателен буду!
...
Рейтинг: 0 / 0
13.09.2003, 14:25
    #32264285
Hibernate
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
а где ты у CheckBox нашел свойство checked? Или это какой-то нестандартный контрол? В стандартном виндовом чекбоксе есть свойство Value:
Код: plaintext
1.
The settings for value are: 
CheckBox control —  0  is Unchecked (default),  1  is Checked, and  2  is Grayed (dimmed).
...
Рейтинг: 0 / 0
15.09.2003, 13:09
    #32265016
The¤Lexx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Спасибо, намудрил я чего-то.. Щас исправил все.. Все вроди ОК.
Вот только еще один вопрос назрел, если я задаю переменную такую:

Код: plaintext
1.
2.
Set cb8 = Cells.Find(What:= "01  -", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
    :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
    False, SearchFormat:=False)


То как потом вставить в ворде это (всмысле содержимое этой ячейки)? Неподскажите? Методом Paste, только как это описать, немогу нигде найти это. Спасибо заранее.
...
Рейтинг: 0 / 0
15.09.2003, 14:52
    #32265162
Hibernate
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
создаешь объект Word.Application (или что-то очень похожее влом искать точный синтаксис), там по идее должен быть объект Document, а в нем ищешь свойства/методы, работающие с текстом документа.
а из ячейки значение вытягивается хотя-бы по тому-же свойтсву Value.
Елси ты об этом.
...
Рейтинг: 0 / 0
15.09.2003, 15:29
    #32265222
The¤Lexx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Нет, я имею ввиду как мне вставить именно переменную, как открыть ворд из екселя я знаю, вот как конкретно если задал переменную вставить её позже в ворде текстом?
что-то типа cb6.Paste вот синтаксис правильный узнать немогу...
...
Рейтинг: 0 / 0
15.09.2003, 15:42
    #32265245
The¤Lexx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Или может подругому не через переменную можно это как-то сделать.. Подскажите пожалуйста кто знает! Буду очень благодарен...
...
Рейтинг: 0 / 0
16.09.2003, 11:30
    #32266133
Hibernate
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
чего-то я не пойму твоей проблемы....
хорошо, программно вставить в ворд текст "Здравствуй мир" можешь?
если да, то вместо сдравствуй мир напиши свою переменную.
если нет, то разбирайся с объектной моделью ворда - она простая.
...
Рейтинг: 0 / 0
17.09.2003, 09:51
    #32267248
The¤Lexx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Ну так я поэтому и спросил, потому что сам немогу разобраться с добавлением этого текста.. А время поджимает очень сильно.. :(
...
Рейтинг: 0 / 0
17.09.2003, 10:11
    #32267281
The¤Lexx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Да, сорри нашел, только вот неполучается добавить содержимое переменной:

Код: plaintext
ActiveDocument.Range.Words( 1 ).InsertAfter "" & cb6


:(
...
Рейтинг: 0 / 0
17.09.2003, 13:54
    #32267760
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Если cb6 - одиночная ячейка, то:
Код: plaintext
1.
ActiveDocument.Range.Words( 1 ).InsertAfter "" & cb6.Text
...
Рейтинг: 0 / 0
17.09.2003, 22:10
    #32268482
The¤Lexx
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прошу еще помочь немного...
Нет, cb6 это переменная в которой текст ячейки находится..
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Прошу еще помочь немного... / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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