Можно ли задать критерий поиска по форуму в строке адреса web-страницы?

[Gustav]

Ну, и чтобы всё это не выглядело отвязанной семантической эквилибристикой, покажу, для чего это нужно было мне.
Итак, пошаговая иллюстрация:

1. Создадим новую рабочую книгу Excel.
2. В книге создадим новый модуль кода VBA и поместим туда ранее рассмотренную функцию myNewEncodeURIComponent.
3. Добавим в модуль еще одну функцию:

Function GetSearchURL(ByVal SearchCriteriaString As String) As String
 
    GetSearchURL = "http://axforum.info/forums/search.php?do=process&showposts=0&quicksearch=1&s=&query=" & _
                      myNewEncodeURIComponent(SearchCriteriaString)
End Function

4. Не забудем включить ссылку на Microsoft Script Control 1.0.
5. В ячейку A1 рабочего листа введем строку: быстрый excel
6. В ячейку B1 введем формулу: =ГИПЕРССЫЛКА( GetSearchURL(A1); "Поиск на AxForum по критерию: " & A1 )
(приведено для: Excel - русский, разделитель списка - точка с запятой).
7. Щелкнем по ячейке B1 - выполняется поиск, результаты предстают в новом окне Интернет-браузера.

Таким образом, появляется возможность сохранять свои критерии выполненных поисков в маленьком эксельном дневничке, расцвечивая его при желании всевозможной доп.информацией, например, датами, комментариями и т.п.

[gl00mie]

Цитата:

Сообщение от Gustav

Итак, пошаговая иллюстрация:
1. Создадим новую рабочую книгу Excel.
2. В книге создадим новый модуль кода VBA и поместим туда ранее рассмотренную функцию myNewEncodeURIComponent.
...
5. В ячейку A1 рабочего листа введем строку: быстрый excel
6. В ячейку B1 введем формулу: =ГИПЕРССЫЛКА( GetSearchURL(A1); "Поиск на AxForum по критерию: " & A1 )
(приведено для: Excel - русский, разделитель списка - точка с запятой).
7. Щелкнем по ячейке B1 - выполняется поиск, результаты предстают в новом окне Интернет-браузера.

Напомнило статью в блоге Palle Agermark под названием Is there anything Excel isn't a good tool for?

[Gustav]

Цитата:

Сообщение от gl00mie

Напомнило статью в блоге Palle Agermark под названием Is there anything Excel isn't a good tool for?

Хе-хе, не совсем понял, чем именно напомнило... если только названием как девизом - это да, всецело поддерживаю зарубежного товарища! А ссылочка любопытная, спасибо