автоматизированный поиск
rvisk
Дата: Вторник, 13.03.2012, 15:22 |
Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация:
0
±
Замечаний:
0% ±
возможно ли сделать так, чтобы при нажатии на ячейку с числом на первом листе , автоматически находилось это число во втором листе?
возможно ли сделать так, чтобы при нажатии на ячейку с числом на первом листе , автоматически находилось это число во втором листе? rvisk
Ответить
Сообщение возможно ли сделать так, чтобы при нажатии на ячейку с числом на первом листе , автоматически находилось это число во втором листе? Автор - rvisk Дата добавления - 13.03.2012 в 15:22
Serge_007
Дата: Вторник, 13.03.2012, 15:31 |
Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Что значит "нажатие" и в каком виде должен быть результат поиска?
Что значит "нажатие" и в каком виде должен быть результат поиска? Serge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Что значит "нажатие" и в каком виде должен быть результат поиска? Автор - Serge_007 Дата добавления - 13.03.2012 в 15:31
rvisk
Дата: Вторник, 13.03.2012, 16:04 |
Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация:
0
±
Замечаний:
0% ±
в ячейку вводится число допустим 2012 (код продажи), потом при нажатии(или выделении) на эту ячейку с числом 2012, это число находилось во втором листе(база) в определенной графе
в ячейку вводится число допустим 2012 (код продажи), потом при нажатии(или выделении) на эту ячейку с числом 2012, это число находилось во втором листе(база) в определенной графе rvisk
Ответить
Сообщение в ячейку вводится число допустим 2012 (код продажи), потом при нажатии(или выделении) на эту ячейку с числом 2012, это число находилось во втором листе(база) в определенной графе Автор - rvisk Дата добавления - 13.03.2012 в 16:04
Serge_007
Дата: Вторник, 13.03.2012, 16:11 |
Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Quote (Serge_007 )
в каком виде должен быть результат поиска?
Quote (Serge_007 )
в каком виде должен быть результат поиска?
Serge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Quote (Serge_007 )
в каком виде должен быть результат поиска?
Автор - Serge_007 Дата добавления - 13.03.2012 в 16:11
rvisk
Дата: Вторник, 13.03.2012, 16:30 |
Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация:
0
±
Замечаний:
0% ±
как при использовании функции НАЙТИ, только обойти ручной ввод
как при использовании функции НАЙТИ, только обойти ручной ввод rvisk
К сообщению приложен файл:
kkkk.xlsx
(8.1 Kb)
Ответить
Сообщение как при использовании функции НАЙТИ, только обойти ручной ввод Автор - rvisk Дата добавления - 13.03.2012 в 16:30
rvisk
Дата: Вторник, 13.03.2012, 16:31 |
Сообщение № 6
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация:
0
±
Замечаний:
0% ±
Quote (rvisk )
в каком виде должен быть результат поиска?
должен открываться второй лист с выделением этого числа
Quote (rvisk )
в каком виде должен быть результат поиска?
должен открываться второй лист с выделением этого числаrvisk
Ответить
Сообщение Quote (rvisk )
в каком виде должен быть результат поиска?
должен открываться второй лист с выделением этого числаАвтор - rvisk Дата добавления - 13.03.2012 в 16:31
Serge_007
Дата: Вторник, 13.03.2012, 16:35 |
Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Quote (rvisk )
должен открываться второй лист с выделением этого числа
Это только макросом
Quote (rvisk )
должен открываться второй лист с выделением этого числа
Это только макросомSerge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Quote (rvisk )
должен открываться второй лист с выделением этого числа
Это только макросомАвтор - Serge_007 Дата добавления - 13.03.2012 в 16:35
rvisk
Дата: Вторник, 13.03.2012, 16:40 |
Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация:
0
±
Замечаний:
0% ±
это сложно? где можно прочитать как это делается?
это сложно? где можно прочитать как это делается? rvisk
Ответить
Сообщение это сложно? где можно прочитать как это делается? Автор - rvisk Дата добавления - 13.03.2012 в 16:40
Serge_007
Дата: Вторник, 13.03.2012, 17:07 |
Сообщение № 9
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Ну, совсем простенький макрос вообще можно записать макрорекордером... Во вложении файл. На листе Код в А1 вводите число и жмёте кнопку.
Ну, совсем простенький макрос вообще можно записать макрорекордером... Во вложении файл. На листе Код в А1 вводите число и жмёте кнопку. Serge_007
К сообщению приложен файл:
rvisk.xls
(35.5 Kb)
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Ну, совсем простенький макрос вообще можно записать макрорекордером... Во вложении файл. На листе Код в А1 вводите число и жмёте кнопку. Автор - Serge_007 Дата добавления - 13.03.2012 в 17:07
rvisk
Дата: Вторник, 13.03.2012, 17:24 |
Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация:
0
±
Замечаний:
0% ±
спасибо,это макрос для одной ячейки, а как сделать для ячеек во всей графе?
спасибо,это макрос для одной ячейки, а как сделать для ячеек во всей графе? rvisk
Ответить
Сообщение спасибо,это макрос для одной ячейки, а как сделать для ячеек во всей графе? Автор - rvisk Дата добавления - 13.03.2012 в 17:24
Serge_007
Дата: Вторник, 13.03.2012, 17:33 |
Сообщение № 11
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Quote (rvisk )
как сделать для ячеек во всей графе?
Это уже не ко мне, я в программировании не разбираюсь. Пишу же: Quote (Serge_007 )
совсем простенький макрос вообще можно записать макрорекордером
Что я и сделал ЗЫ Ждите макрописателей
Quote (rvisk )
как сделать для ячеек во всей графе?
Это уже не ко мне, я в программировании не разбираюсь. Пишу же: Quote (Serge_007 )
совсем простенький макрос вообще можно записать макрорекордером
Что я и сделал ЗЫ Ждите макрописателейSerge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Quote (rvisk )
как сделать для ячеек во всей графе?
Это уже не ко мне, я в программировании не разбираюсь. Пишу же: Quote (Serge_007 )
совсем простенький макрос вообще можно записать макрорекордером
Что я и сделал ЗЫ Ждите макрописателейАвтор - Serge_007 Дата добавления - 13.03.2012 в 17:33
rvisk
Дата: Вторник, 13.03.2012, 17:38 |
Сообщение № 12
Группа: Пользователи
Ранг: Новичок
Сообщений: 26
Репутация:
0
±
Замечаний:
0% ±
спасибо, буду искать макрописателей
спасибо, буду искать макрописателей rvisk
Ответить
Сообщение спасибо, буду искать макрописателей Автор - rvisk Дата добавления - 13.03.2012 в 17:38
Serge_007
Дата: Вторник, 13.03.2012, 17:48 |
Сообщение № 13
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Quote (rvisk )
буду искать макрописателей
Чего их искать?! Они здесь. Надо только подождать пока они зайдут в Вашу тему и ответят
Quote (rvisk )
буду искать макрописателей
Чего их искать?! Они здесь. Надо только подождать пока они зайдут в Вашу тему и ответятSerge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Quote (rvisk )
буду искать макрописателей
Чего их искать?! Они здесь. Надо только подождать пока они зайдут в Вашу тему и ответятАвтор - Serge_007 Дата добавления - 13.03.2012 в 17:48
Jhonson
Дата: Вторник, 13.03.2012, 21:17 |
Сообщение № 14
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
В модуль листа: [vba]Code
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 2 And Target.Value <> "" Then poisk (Target.Value) End If End Sub
[/vba] В Module1: [vba]Code
Sub poisk(fin As String) On Error GoTo Errors1 Sheets("Лист2").Select Cells.Find(What:=fin, LookAt:=xlWhole).Select Exit Sub Errors1: MsgBox ("Не найдено!") End Sub
[/vba]
В модуль листа: [vba]Code
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 2 And Target.Value <> "" Then poisk (Target.Value) End If End Sub
[/vba] В Module1: [vba]Code
Sub poisk(fin As String) On Error GoTo Errors1 Sheets("Лист2").Select Cells.Find(What:=fin, LookAt:=xlWhole).Select Exit Sub Errors1: MsgBox ("Не найдено!") End Sub
[/vba] Jhonson
"Ничто не приносит людям столько неприятностей, как разум."
Сообщение отредактировал Jhonson - Среда, 14.03.2012, 09:02
Ответить
Сообщение В модуль листа: [vba]Code
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 2 And Target.Value <> "" Then poisk (Target.Value) End If End Sub
[/vba] В Module1: [vba]Code
Sub poisk(fin As String) On Error GoTo Errors1 Sheets("Лист2").Select Cells.Find(What:=fin, LookAt:=xlWhole).Select Exit Sub Errors1: MsgBox ("Не найдено!") End Sub
[/vba] Автор - Jhonson Дата добавления - 13.03.2012 в 21:17
Артём
Дата: Вторник, 13.03.2012, 23:10 |
Сообщение № 15
Группа: Пользователи
Ранг: Новичок
Сообщений: 32
Репутация:
0
±
Замечаний:
0% ±
Надеюсь автор темы и модераторы позволят чуток изменить формулировку. У меня тоже типичная задача, но в пределах одного листа. Имеем таблицу с кучей наименований, часто повторяющиеся. как сделать так, чтобы напр.когда курсор находится в ячейке "фанера" при нажатии определенной комбинации клавиш (напр.Alt F) курсор автоматически переместился бы др.ячейку с этим же именем в данном листе.
Надеюсь автор темы и модераторы позволят чуток изменить формулировку. У меня тоже типичная задача, но в пределах одного листа. Имеем таблицу с кучей наименований, часто повторяющиеся. как сделать так, чтобы напр.когда курсор находится в ячейке "фанера" при нажатии определенной комбинации клавиш (напр.Alt F) курсор автоматически переместился бы др.ячейку с этим же именем в данном листе. Артём
Все будет хорошо!
Ответить
Сообщение Надеюсь автор темы и модераторы позволят чуток изменить формулировку. У меня тоже типичная задача, но в пределах одного листа. Имеем таблицу с кучей наименований, часто повторяющиеся. как сделать так, чтобы напр.когда курсор находится в ячейке "фанера" при нажатии определенной комбинации клавиш (напр.Alt F) курсор автоматически переместился бы др.ячейку с этим же именем в данном листе. Автор - Артём Дата добавления - 13.03.2012 в 23:10
Jhonson
Дата: Среда, 14.03.2012, 08:41 |
Сообщение № 16
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Ну это совсем просто: [vba]Code
Sub perem() Cells.Find(What:=ActiveCell.Value, After:=ActiveCell, LookAt:=xlWhole).Activate End Sub
[/vba] Комбинация клавиш - ctrl+f (в английской раскладке!)
Ну это совсем просто: [vba]Code
Sub perem() Cells.Find(What:=ActiveCell.Value, After:=ActiveCell, LookAt:=xlWhole).Activate End Sub
[/vba] Комбинация клавиш - ctrl+f (в английской раскладке!) Jhonson
"Ничто не приносит людям столько неприятностей, как разум."
Ответить
Сообщение Ну это совсем просто: [vba]Code
Sub perem() Cells.Find(What:=ActiveCell.Value, After:=ActiveCell, LookAt:=xlWhole).Activate End Sub
[/vba] Комбинация клавиш - ctrl+f (в английской раскладке!) Автор - Jhonson Дата добавления - 14.03.2012 в 08:41
Артём
Дата: Среда, 14.03.2012, 10:11 |
Сообщение № 17
Группа: Пользователи
Ранг: Новичок
Сообщений: 32
Репутация:
0
±
Замечаний:
0% ±
Спасибо! Просто класс! Quote (Jhonson )
Комбинация клавиш - ctrl+f (в английской раскладке!)
Извините за упрямство, а можно через Alt+F?
Спасибо! Просто класс! Quote (Jhonson )
Комбинация клавиш - ctrl+f (в английской раскладке!)
Извините за упрямство, а можно через Alt+F? Артём
Все будет хорошо!
Ответить
Сообщение Спасибо! Просто класс! Quote (Jhonson )
Комбинация клавиш - ctrl+f (в английской раскладке!)
Извините за упрямство, а можно через Alt+F? Автор - Артём Дата добавления - 14.03.2012 в 10:11
Serge_007
Дата: Среда, 14.03.2012, 10:16 |
Сообщение № 18
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Quote (Артём )
можно через Alt+F?
Насколько я знаю - нет
Quote (Артём )
можно через Alt+F?
Насколько я знаю - нетSerge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Quote (Артём )
можно через Alt+F?
Насколько я знаю - нетАвтор - Serge_007 Дата добавления - 14.03.2012 в 10:16
Артём
Дата: Среда, 14.03.2012, 10:48 |
Сообщение № 19
Группа: Пользователи
Ранг: Новичок
Сообщений: 32
Репутация:
0
±
Замечаний:
0% ±
почему? с чем это связано? версие Excel? у меня 2010
почему? с чем это связано? версие Excel? у меня 2010 Артём
Все будет хорошо!
Ответить
Сообщение почему? с чем это связано? версие Excel? у меня 2010 Автор - Артём Дата добавления - 14.03.2012 в 10:48
Serge_007
Дата: Среда, 14.03.2012, 11:01 |
Сообщение № 20
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация:
2749
±
Замечаний:
±
Excel 2016
Quote (Артём )
с чем это связано?
Думаю что с вот этим: В принципе, сочетание клавиш Alt+... в Excel 2007/2010 назначить можно, но вот как назначить именно Alt+F ?.. Не уверен что это возможно. Вот Alt+ОК или Alt+ОЖ - пожалуйста. См. на скрине: Alt+ОЖ - транспонирует матрицы, а Alt+ОК отображает скрытые листы...
Quote (Артём )
с чем это связано?
Думаю что с вот этим: В принципе, сочетание клавиш Alt+... в Excel 2007/2010 назначить можно, но вот как назначить именно Alt+F ?.. Не уверен что это возможно. Вот Alt+ОК или Alt+ОЖ - пожалуйста. См. на скрине: Alt+ОЖ - транспонирует матрицы, а Alt+ОК отображает скрытые листы...Serge_007
ЮMoney :41001419691823 | WMR :126292472390
Ответить
Сообщение Quote (Артём )
с чем это связано?
Думаю что с вот этим: В принципе, сочетание клавиш Alt+... в Excel 2007/2010 назначить можно, но вот как назначить именно Alt+F ?.. Не уверен что это возможно. Вот Alt+ОК или Alt+ОЖ - пожалуйста. См. на скрине: Alt+ОЖ - транспонирует матрицы, а Alt+ОК отображает скрытые листы...Автор - Serge_007 Дата добавления - 14.03.2012 в 11:01