wyfinger

// ==UserScript==
// @name         facebooker
// @namespace    facebook.com
// @version      0.3
// @description  try to take over the world!
// @author       You
// @match        https://www.facebook.com*
// @match        http://www.facebook.com*
// @include      https://www.facebook.com*
// @include      http://www.facebook.com*

wyfinger

Все прочитанные статьи и публикации, или то, что я только собираюсь прочитать отправляю себе
на почту с помощью uKeeper (www.ukeeper.com). Суть сервиса в том, что Вы можете отправить на
адрес drops@ukeeper.com email с адресом интересующей Вас страницы, в ответ на это прийдет
письмо с содержимым этой страницы в удобном виде (используется Readability). Так проще искать и,
кроме того, если статью удалят или ресурс будет в дауне Вы сможете прочитать статью.

Чтобы не паритсья с отправкой запросов можно зарегитсрироваться и получить id код.

Я пользуюсь Vivaldi и добавляю в него кнопочку для uKeeper'a. Делаю это следующим образом:

ulvham

Function DativeCase(sSurname$, Optional sName$, Optional sPatronymic$) As String
    ' Функция формирует дательный падеж из ФИО
    ' Параметры: sSurname - фамилия, sName - имя, sPatronymic - отчество

    Application.Volatile True    ' автопересчёт формулы на листе
    sSurname$ = Replace(sSurname$, " - ", "-"): sSurname$ = Replace(Replace(sSurname$, " -", "-"), "- ", "-")

    On Error Resume Next
    If sName$ = "" And sPatronymic$ = "" Then
        arr = Split(Application.Trim(sSurname$))