Online Trick: Google

Showing posts with label Google. Show all posts

Sunday, September 20, 2015

Search Google Definition for Words in an Excel-File Using VBA

I have a glossary of words held in an excel-workbook. For getting instant definitions from Google I wrote a small macro which does this for me with one click.

This is how it is done:

1. Insert a command-button from the control toolbox (view / toolbars / control toolbox)
2. Double cllick the command button & within the Visual Basic editor insert the below code.

'Info: Macro that searches Google for a definition
'for the word in the active cell.

'Usage: With mouse select cell with word to be
'defined/searched, then hit the button.

Private Sub CommandButton1_Click()

    Dim mystr As String

    mystring = ActiveCell.Value

    mylink = "http://www.google.at/search?q=define%3A+" & mystring

    ThisWorkbook.FollowHyperlink (mylink)

End Sub

3. In design mode add captation, re-size, place, format your button, etc.
4. Exit design mode.
5. Your finished..

ps: you could also do this using the xls-function Hyperlink() but as you may have noticed, saving xls-files containing this function causes some trouble (warning messages, large storage..)

Example Code for a Customized RSS-Feed

A short code snippet for the customized RSS-Feed on this Google-Blogger site. I simply added the below code to a gadget to yield a tailored RSS-Feed in the sidebar. Most of the code was grabbed from the Google Code Playground.










    
 

Loading...