Объединил три дневника в один

У меня было три дневника.

Первый я вел в Outlook по всем событиям своей жизни с 18 июля 2008 по 5 ноября 2009 года.

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

Первый - с 1 декабря 2007 года по 8 июля 2008 года, второй - с 14 июля 2008 года по 23 октября 2008 года.

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

Создал даже макрос для быстрого отбора событий дневника по части имени:

Sub Макрос1()
    ActiveSheet.Range("$A$1:$H$5252").AutoFilter Field:=5, Criteria1:="=*" & Range("$E$1").Value & "*", _
        Operator:=xlAnd
End Sub

Все, теперь написание книги про кисок будет продвигаться быстрее.

Планирую в будущем загрузить события дневника в PIM.