Рейтинг «почему я…»

Обнаружена великолепная тема — просто таки барометр рефлексирующего рунета. Вслед за пользователями, Google Suggest предлагает следующие варианты продолжения вопроса «почему я…» — это просто великолепно. Еще интересней то, что данные меняются со временем:

Вот что мы искали по состоянию на 30 апреля 2008:

А вот апдейт (4 мая)

Итоги пока такие: Рассела больше не ищут, рефлексирующие дуры плодятся быстрее чем осознающие себя долбоёбы.

Автоматизация производства

Находка-кандидат номер один на забывание, почему-то столь полезные вещи мой мозг забывает моментально. Итак, микрософт визио довольно удобная программка, обладающая уникальным функционалом, а, главное, великолепно автоматизируемая.

Public Sub Add_Connector()

Set vsoShape = Application.ActiveWindow.Selection.Item(1)
vsoShape.AddRow visSectionConnectionPts, 7, visCnnctX
vsoShape.CellsSRC(visSectionConnectionPts, 7, visCnnctY).FormulaU = “Height*0″
vsoShape.CellsSRC(visSectionConnectionPts, 7, visCnnctX).FormulaU = “Width*0.5″

vsoShape.AddRow visSectionConnectionPts, 8, visCnnctX
vsoShape.CellsSRC(visSectionConnectionPts, 8, visCnnctY).FormulaU = “Height*1″
vsoShape.CellsSRC(visSectionConnectionPts, 8, visCnnctX).FormulaU = “Width*0.5″

End Sub

Этот милый кусочек кода добавляет коннекторы вверху и внизу посередине у шестигранника, почему-то лишенного столь полезных элементов.