Babilon
Blason ville si Ljubljana (Slovénie).svg Ta uporabnik živi v Ljubljani
sl Uporabnik govori slovenščino kot materni jezik.
en-4 This user speaks English at a near-native level.
de-1 Dieser Benutzer hat grundlegende Deutschkenntnisse.
hr-3 Ovaj suradnik vrlo dobro govori hrvatski jezik.
sr-3 Корисник доста добро говори српски језик.

Globalni števec urejanj
Podrobno o urejanju slovenske Wikipedije
Podatki o branosti člankov
Najrazličnejše statistike o slovenski Wikipediji

Koliko branj dnevno za posamezni članek?


PriznanjaUredi

Veteran 1.png
Za 1 leto dejavnega sodelovanja. Še na mnoga leta, M♦Zaplotnikprispevki 21:25, 7. maj 2013 (CEST)
Tournesol.png
WikiHvala za slike emonskih škofov iz ljubljanske stolnice. --Janezdrilc (pogovor) 12:43, 18. marec 2013 (CET)
Barnstar-Megaphone.png
Za prizadevanja za razširitev baze urejevalcev ti podeljujem priznanje glasnika Wikipedije. — Yerpo Ha? 15:55, 29. avgust 2013 (CEST)
1000 gold.jpg

Unikatno priznanje za delo pri WikiProjektu 1000 nujnih, ki (tudi) s tvojo pomočjo počasi, a vztrajno napreduje. — Yerpo Ha? 14:46, 21. november 2014 (CET)
Cqlosten prinos.png

Za sodelovanje pri akciji Wikimedia CEE Pomlad 2015. — Yerpo Ha? 11:52, 4. junij 2015 (CEST)
Veteran 5.png
Za 5 let dejavnega sodelovanja. Uspešno še naprej pri vseh projektih in prizadevanjih, da bi bila Wikipedija še boljša in koristnejša. --Janezdrilc (pogovor) 00:07, 10. januar 2017 (CET)
Veteran 10.png

Z nekaj zamude, za deset let in na še enkrat toliko :) — Yerpo Ha? 20:20, 3. januar 2023 (CET)

Izbrane in meni všečne slikeUredi


Izbrani in daljši člankiUredi

Word makroUredi

Če komu pride prav ob prevajanju, popravki presledkov, meseci, ...

Sub wiki()
'
' wiki Makro
'
'
   Selection.Find.ClearFormatting
   Selection.Find.Replacement.ClearFormatting
   With Selection.Find
       .Text = " ;"
       .Replacement.Text = ";"
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
   Selection.Find.Execute
   With Selection.Find
       .Text = " ."
       .Replacement.Text = "."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
   Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " )"
       .Replacement.Text = ")"
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
    Selection.Find.Execute
    Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " January "
       .Replacement.Text = ".1."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
   Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " February "
       .Replacement.Text = ".2."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " March "
       .Replacement.Text = ".3."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " April "
       .Replacement.Text = ".4."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " May "
       .Replacement.Text = ".5."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " June "
       .Replacement.Text = ".6."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " July "
       .Replacement.Text = ".7."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " August "
       .Replacement.Text = ".8."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " September "
       .Replacement.Text = ".9."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " October "
       .Replacement.Text = ".10."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " November "
       .Replacement.Text = ".11."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = True
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
       Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = " December "
       .Replacement.Text = ".12."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = True
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
   End With
        Selection.Find.Execute
   Selection.Find.Execute Replace:=wdReplaceAll
   With Selection.Find
       .Text = ".."
       .Replacement.Text = "."
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = True
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
            
       End With
 
End Sub