|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
21.11.2019, 22:27 | #11 | |
Пользователь
Регистрация: 26.06.2017
Сообщений: 19
|
Цитата:
Если Вы не против давайте все-таки решим мою проблему. Я понял о чем Вы говорите я делаю так: Private Sub CommandButton1_Click() worksheets(1).cells(R,3) = TextBox2 End Sub вопросы: R -это строка, но я не знаю в какой строке у меня будет фигурировать тот или иной клиент, клиентов будет много в базе. Поэтому не знаю какую цифру поставить вместо буквы R. Помогите N -именно номер листа или все-таки его название? |
|
21.11.2019, 23:04 | #12 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
))
к листу в коллекции WorkSheets можно обращаться по его номеру и по его имени, как вам удобнее или по обстоятельствам имя клиента знаете? оно у вас, кажется, в 1-м текстбоксе вы можете найти это имя в известном вам листе глазами? можете??? можете найти глазами, точно так же cможете найти макросом. найдете ячейку с искомым именем свойство .Row этой ячейки - это и есть требуемый вам № строки так и пишите Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
Последний раз редактировалось IgorGO; 21.11.2019 в 23:09. |
22.11.2019, 09:47 | #13 |
Пользователь
Регистрация: 26.06.2017
Сообщений: 19
|
Стало не проще, в итоге как мне совместить два кода, вот так:
Private Sub CommandButton1_Click() worksheets(1).cells(R,3) = TextBox2 set rg=worksheets(1).columns(Х\З в какой колонке на листе Клиенты).find(Textbox1,,xlValues,xl Whole) if rg is nothing then R= worksheets(1).cells(rows.count,1).e nd(xlup).row+1 else R = rg.row End Sub |
22.11.2019, 14:51 | #14 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
как совместить написано в #2
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вытащить данные из Microsoft Access в Visual Basic | Moooo | Помощь студентам | 5 | 12.08.2017 16:59 |
Вывести данные из ячейки листа на форму | Aleksey63 | Microsoft Office Excel | 1 | 31.10.2016 18:59 |
Как в Microsoft Visual Basic 6.0 открыть Exel файл, считать с него данные(числа) и дальше работать с ними | Dimon88 | Microsoft Office Excel | 7 | 20.10.2007 13:30 |