Форум программистов «Весельчак У»
Добро пожаловать,
Гость
. Пожалуйста,
войдите
или
зарегистрируйтесь
.
Вам не пришло
письмо с кодом активации?
1 час
1 день
1 неделя
1 месяц
Навсегда
Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
Начало
Наши сайты
Галерея
Весельчак У
Наша Вики
Хранилище
Проекты
Правила
Правила форума
Правила русского языка
Помощь
Поиск
Календарь
Почта
Войти
Регистрация
Форум программистов «Весельчак У»
>
Программирование
>
VisualBasic
(Модератор:
Naghual
) > Тема:
excel
Страниц: [
1
]
Вниз
« предыдущая тема
следующая тема »
Печать
Автор
Тема: excel (Прочитано 8241 раз)
0 Пользователей и 3 Гостей смотрят эту тему.
kirgudu
Гость
excel
«
:
12-11-2004 20:14 »
Подскажите пожалуйста кто знает. Как автоматически занести данные из определенной ячейки в ячейку определенного столбца, определенной строки. Причем номер строки зависит от выбранного значения в поле со списком? Желателен код.
Записан
PSD
Главный специалист
Offline
Пол:
excel
«
Ответ #1 :
15-11-2004 06:13 »
Извени нет под рукой машины с XL (переставляюсь)
Делается примерно так
sub Combo1_Click ()
cells(10,combo1.listindex)=cells(1,1)
end sub
Соотвественно перед cells можешь указать через всю иерархию объектов приложение.книга.лист
Записан
Да да нет нет все остальное от лукавого.
kirgudu
Гость
excel
«
Ответ #2 :
15-11-2004 18:40 »
Спасибо за ответ. Попробую уточнить что-же все таки мне необходимо.
Итак имеем книгу, в ней имеем два листа. На одном приходник, на другом база данных (фамилия, сумма) на 300 человек. На приходнике расположено поле со списком(не элемент Active. x) Необходимо, что бы при выборе фамилии из списка и заполнении ячейки «сумма платежа» это число заносилось в лист базы данных столбец «сумма», в строку той же фамилии.
Желательно сделать это только в Exce.
Записан
PSD
Главный специалист
Offline
Пол:
excel
«
Ответ #3 :
16-11-2004 13:45 »
Можно сделать по другому но я на вскидку не помню как ...
Сделал следующее на первом листе разместил комбо и кнопку, на втором список фамилий в первом столбце
При активации листа загружаем список фамилив в комбо (можно как-то привязаться к диапозону но я всегда делал ручками)
Private Sub Worksheet_Activate()
ComboBox1.Clear
For i = 1 To 3
ComboBox1.AddItem Ëèñò2.Cells(i, 1)
Next i
End Sub
если тебе нужно перемещать по клику в комбо пишем так
Private Sub ComboBox1_Click()
Лист2.Cells(ComboBox1.ListIndex + 1, 2) = Лист1.Cells(1, 1)
End Sub
если комбо информационный элемент и есть гдето гланая кнопка (ок например)
то пишеш под ней
Private Sub CommandButton1_Click()
Лист2.Cells(ComboBox1.ListIndex + 1, 2) = Лист1.Cells(1, 1)
End Sub
По нажатию на кнопку или по клику в комбо мсодержимое ячейки A1 первого листа копируется в ячейку напртив фамилии выбраной в комбо.
Записан
Да да нет нет все остальное от лукавого.
kirgudu
Гость
excel
«
Ответ #4 :
16-11-2004 17:05 »
Спасибо огромное за помощь. Сейчас буду разбираться.
Записан
Страниц: [
1
]
Вверх
Печать
« предыдущая тема
следующая тема »
Форум программистов «Весельчак У»
>
Программирование
>
VisualBasic
(Модератор:
Naghual
) > Тема:
excel
Загружается...