Hja, blond ravno nisem, se pa zgodi, da obidem glavno stvar...
Sub Irena()
'
' Irena Makro
' Makro posnel: BetkaS, dne: 23.8.2006
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "«"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "»"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
Makro uporabljam v wordu. Mislim, da so makri na drugem računalniku omogočeni (kje preverim?). Ne javi nič, ob kliku na makro je sicer videt, da nekaj čara, ampak narekovajev pa vseeno ne zamenja.
Hvala za odg.,
M.