Crawler for scraping and approving friend requests in Facebook
VBAs selenium bindings are not as rich in functionality as other language bindings, but I would improve the following:


use the "by id" locators whenever possible:

.FindElementById("email").SendKeys ("someEmail") --Fill in the email
.FindElementById("pass").SendKeys ("password") --Fill in the password
.FindElementById("loginbutton").Click

if tempting to use XPaths, give CSS selectors a chance:

Set posts = driver.FindElementsByCss(".friendBrowserNameTitle &gt; a")

avoid "magic" numbers in the code, like that value 50 - the number of scroll actions - configure it as a constant
I also don't particularly like the .Wait calls - this is typically a red flag when it comes to browser automation with selenium, but I am not sure VB bindings provide an Explicit Wait with a pre-defined condition