Вид для печати
Требуется решить такую задачу:
Есть поля-Имена есть значение этих полей в виде цифр.
Например
Лист1.
A B C D E
Лариса 1 2 3 4
Тамара 5 6 7 8
Света 1 7 3 4
Во втором листе требуется ввести наименование и получить значения ячеек из первого листа перемноженных на заданное число(яч.F)
Лист2.
A B C D F
Лариса Л1.B1*Л2.F1 Л1.С1*Л2.F1 Л1.D1*Л2.F1
После ввода наименования требуется чтоб значения выставились автоматически.Изначально лист2 пустой.
Помогите если это возможно!!!!Пожалуйста :-)))
Новичек, боюсь (если это не подвох), что в ЭТОЙ теме форума можно получить неадекватный ответ.
1) Вставляем на Лист2 или в любое удобное место элемент управления ComboBox (Меню\Вид\Панели инструментов\Элементы управления - вставляем в режиме конструктора - треугольник).
2) Теперт делаем ссылку на наш список девушек :) - свойства объекта Combobox ListFillRange - записываем там ссылку вида 'Лист1!А1:А100
3) Делаем два щелчка мышью на нашем ComboBoxe - автоматически создается процедура, обрабатывающая наш выбор. Доступ к выбранной девушке - через индекс ComboBox.ListIndex например
CurrentGirl=ComboBox.ListIndex
4) По этому индексу читаем данные на листе Лист1 и переносим на лист Лист2:
Row=ComboBox.ListIndex
Sheets("Лист2").Cells(1, 1)=Sheets("Лист1").Cells(Row, 2)*Sheets("Лист2").Cells(1, 6) и т.д. и т.п.
Записи конечно можно упростить, завести какие-нибудь циклы и т.п. Должно работать!
Пример работы со списком в VBA Excele.
Новичок! Ты попал не туда со своим вопросом. Сейчас я тебе помогу, как только используешь мою формулу - черкни здесь. Я тогда это дело отсюда уберу.
Итак, именуем диапазон со списком на первом листе ( в твоём примере это А1:Е3 или там, А2:Е4) каким нибудь именем, например, "База".
Далее в первом столбце листа 2 вводим нужные имена, а в ячейки В - Е соответствующих строк пишем форулу:
=ВПР(RC1;База;(СТОЛБЕЦ()))*R1C6 или =ВПР($A2;База;(СТОЛБЕЦ()))*$F$1 - здесь первый вариант лучше, для адресации типа R1C1, а второй - для A1, но я написал пример для второй строки. Первый вариант не зависит от строки, он будет работать везде. Авторой вариант нужно написать во второй строке (или вместо $A2 писать, например, $A1 или $A3) и копировать в остальные ячейки (например, А2:Е4).
P.S. Пример КрэйзиБуха интересный, но это из пушки по воробьям - VBA-процедуры для простейшей задачки.
Раз уж ты новичок, я решил пояснить ещё, как работает формула.
Здесь внутри вложена функция СТОЛБЕЦ() - без аргументов она возвратит номер текущего столбца (в котором записана формула) - для А - 1, для В - 2, для С - 3 и т.д.
Функция ВПР (вертикальный просмотр) имеет (здесь) 3 аргумента:
1) RC1 или $A1 - искомое значение. Это смешанная ссылка: здесь указан абсолютно стобец (первый) и относительно строка (текущая). Т.е., поскольку в первом столбце написаны имена, то они и будут искомым значением (например, Лариса).
2) диапазон поиска. В нашем случае - диапазон с именем "База".
3) номер столбца, из которого нужно взять в диапазоне значение, стоящее в той строке, в которой найдено в Базе искомое значение.
А потом это возвращённое значение просто умножаем на значение, находящееся в ячейке F1 (пишем её абсолютный адрес, чтобы формулу можно было ввести один раз, а затем растянуть на нужный диапазон (скопировать).
Во как!
Э-э-э-э??Э-э-э... А не перекинете в "Программирование для клерков?"
По просьбе трудящихся клерков :) Модификация программы пример списка.xls - из элемента управления Combobox можно перейти на заданные страницы в книге. Список необходимых страниц, попадающих в Combobox, обновляется автоматически.
офтопик...
CrazyBuh, сто лет, сто зим... Рад видеть :)
Как я по всему по этому соскучился, ей Бо!
Вспоминаю вас частенько добрым словом.
Кто тут модерирует, уберите, коль захочется - не против.
Миха.
MMM, а уж как мы соскучились :)
Да тут нет офтопика, что вы!!!
Пусть люди учатся!!
Здравствуйте!
У меня проблемка точно такая же как и у Новичка. Но мне необходмы конкретные уточнения,т.к. я совсем еще зеленая в Excel'е.
Задача:
Есть база данных. Фамилии и суммы.
А В
Иванов 12
петров 15
Сидоров 16
Мне необходимо, чтобы функция искала нужную фамилию на нескольких листах, указанных мною и при нахождении суммировала цифры из столбца, опять же указанного мною. Как я понимаю мне тоже необходима функция ВПР? И еще. у меня Office английский, читая лит-ру по Excel не могу понять о какой функции идет речь, может подскажите ссылочку, где есть рассшифровка русских на английский функций.
Буду ужасно благодарна[QUOTE]
katiunchik, боюсь, что такую задачу функцией не решить. Надобно макрос писать, который, используя исходные данные (нужные вам листы ему зададите) будет их шерстить и искать совпадение фамилии - тоже зададите. При нахождении складывать то-то и то-то.... что-нибудь этого типа.
Хотя, можно попробовать через сводные таблицы. Только там надо выполнять определенные ограничения. Т.е. таблицы должны быть одного вида/структуры и данные (фио сотров, допустим) должны быть в одинаковой последовательности. В сводной для необходимого поля задаем функцию суммирования и, вуаля, получим сумму со всех таблиц. Также в результирующей сводной таблице есть функция выбора - т.е. будет возможность выбрав сотра из списка, отобразить данные только на него. Consolidation, так сказать, ее! :О)
А чутка поподробнее :) Таблица на самом деле одной структуры, а вот фио идут не в одной последовательности.:( тут-то все и начинается :o может все-таки без макроса можно, просто есть же функция ПОИСК, вот и пусть она ищет заданную мною фамилию. Вот только вопрос КАКАЯ функция? И если можно Вы мне функции на англ. пишите, а то я долго буду искать ее. :)
Сдается мне без макроса никак, а в макросах, я полный чайник. :(
если порядок сотров в таблицах разный - то без макроса, ИМХО, не обойтись. Функция "поиск" в данном случае не поможет, потому как не будет "знать" что искать и сколько раз (т.е. это ей должен будет пользователь задать), а в этом случае теряется весь смысл - ведь задача стоит переложить эти манипуляции на машину.
Могу предложить выход - сделать-таки таблицы единообразно и через консолидирующую таблицу выводить нужный отчет. Пример консолидирующей таблицы прилагается.
Вот сижу и парюсь...такая задача, даны два столбца (сколько сло неважно, например по 10) - столбец с русскими словами, столбец с их переводом....(при этом они должны быть отсортированы - а ведь можно сортировать только один, иначе порядок нарушится)...надо тремя способами написать переводчика в ОБЕ стороны, т.е. вводится слово, как русское, так и английское (ну, естественно, проходит через обработчик ошибок на предмет пребывания в списке), и переведится...вот сижу ломаю голову, у меня категорически не хочет переводиться в обе стороны - только rus-eng...
Способы:
1. - с помощью функции ПРОСМОТР
2. - ВПР
3. С помощь двух функций: ИНДЕКС(ПОИСКПОЗ())...
вот так
ИМХО, через индекс. Чтобы один и тот же индекс был ключевым полем для двух слов РУС и АНГЛ. Потом, в зависимости от того в какую сторону надо перевести - используем индекс слова заданного для перевода и ищем такой же индекс в списке слов переведенных. А что за изврат - переводчик в Excel? База данных была бы удобнее - например в Access.
понятно, что удобнее, я б лучше программульку написала бы)) гораздо проще и рациональнее....но это было просто задание на знание Excel'я...я, кстати, еще помучалась и всеми тремя способами решила...если интересно - расскажу как....хотя вряд ли кому-то такая галимотья интересна))))
Интересно, интересно!!!
Еще как иинтресно
Здравствуйте! Никак не могу понять почему не работает функция ЕОШИБКА(НАЙТИ())? У меня разделитель точка, но это функция никак не желает искать точку! А при замене запятая, конечно же выдает ноль. Вообще мне не совсем понятна функция ЕОШИБКА, может кто объяснит неучу как она пработает? Читать читала, но понять все равно не поняла.:(
Функция ЕОШИБКА проверяет, является ли значение ее аргумента ошибкой.
Если да - то истина, нет - ложь.
Ошибка обозначается системными сообщениями, например #REF! или #N/A
В вашем случае, насколько я понял, функция найти ищет символ "." И в случае, если не найден этот символ ошибку не выдает. И, соответственно, функция ЕОшибка не работает.
Здраствуйте, ради бога простите за беспокойство, но мне срочно нужна помощь, в решении простенькой задачи)
Задача решаеться в Excel на Visual Basic
"создайте таблицу с фамилиями сотрудников. Реализуйте добавление нового сотрудника в таблицу с соблюдением алфавитного поряда. Отследите попытку ввода одного и того же сотрудника"
надеюсь что мне кто-нибудь сможет хоть как-то помочь)
заранее благодарю)
Может кто мне может помочь?
Проблема вот какая.
Есть список фамилий и второй столбец с цифрами. Мне нужно, что бы отдельно, на это же или другом листе, не важно, печатались оба столбца отобранные с условием, что во втором столбце число больше 0. Т.е. Нужен список фамилий, у которых во втором столбце стояло число больше 0.
У самой у меня не получается... Заранее спасибо.
А просто автофильтр данных не подходит? Второй столб >0Цитата:
Сообщение от Annchen
Или нужно чтобы оно постоянноработало, в динамике?
Напишите макрос, поерзайте с текстом, подключите на кнопочку...
Лучше всего конечно чтобы оно все время работало, а с авто фильтром получается что нужно после кажого изменения делать все заново.
А самой написать макрос....вы очень хорошего мнения о моих знаниях в этой облости. :o Я еще почти ничего не могу. Я думала может как без этого можно... Я бы с удовольствием научилась это делать сама но пока как-то не очень. Пойду еще подумаю.
Annchen, зачем заново? Просто включаете когда надо автофильтр и выключаете когда он не нужен.
затем что список все время меняется и каждый раз после ввода фамий нужно было лезть в авто фильтр, так как сам он не обнавлялся. Но я ужу сделала как мне надо было. Вам, кстати, спасибо, навели на дельную мыслю как сделать то что мне нужно силами того что я умею :)
Написать макрос совсем просто: продумали последовательность движения мышкой.Нажали кнопку- "записать макрос", в окошке = дали имя внятное, лучше - латиницей. Поехали! Проделали всю последовательность работы с данными.Нажали кнопочку- выключить запись.Цитата:
Сообщение от Annchen
В "параметрах" добавили строку меню "элементы управления", нашли кнопочку ("CommandButton"), перетащили на лист(двойным кликом) , нажали правую глазку у мыши, в edit -назвали ПУСК, в Свойствах - сменили цвет, вставили картинку... В "Исходном тексте" между
Private Sub CommandButton1_Click() и End Sub
пишем Call Module1. Название модуля видно в верхнем окне(VBAProject) Как только после названия модуля ставим точку, VBA выдает список макросов в этом модуле.
Не забываем отключить режим конструктора (зеленый треугольник) на активном листе.
