Sub BetutipusValtas()
'
' betutipusvaltas Makró
' Rögzítés: 2010.07.03., készítő: eNeL
'
    Selection.WholeStory
    Selection.Font.Name = "Gentium Book Basic"
End Sub