Miten Wordissa voisi makrolla etsiä kaikki tietyt fontilla kirjoitetut tekstit (esim Ariel) ja muutta ne pieniksi kirjaimiksi?
Homma toimii ok kun teen käsipelillä eli etsi ko fontti, pois etsinnästä ja menusta format/change case ja taas sama etsi jne. Mutta kun dokumentti on iso ja noita muutettavia on satoja!
Yritin nauhoittaa makron mutta se ei toimi!
Ja saisiko tuon makron viellä käynnistymään aina automaattisesti kun tulostan ko. dokumentin (tai avaan dokumentin)?
Fontin etsintä makrolla
Tomppaa-69
2
204
Vastaukset
- luuliluu
Eikös tuo mene ihan Etsi ja korvaa toiminnolla? Katso Wordin ohjetta kohdasta Tietyn muotoilun etsiminen ja korvaaminen.
- tomppa-699
ei mene etsikorvaa. ei voi korvata tekstiä pieniksikirjaimiksi. eli tarvii makron eli toimii oheisella:
Sub Macro4()
Do Until ActiveDocument.Bookmarks("\Sel") = _
ActiveDocument.Bookmarks("\EndOfDoc")
Selection.Find.ClearFormatting
With Selection.Find
.Text = ""
.Forward = True
.Wrap = wdFindStop
.Format = False
.Font.Name = "EanBwrP36Tt"
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute
If Selection.Find.Found = True Then
Selection.Range.Case = wdLowerCase
Else
Exit Do
End If
Loop
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1011497
Välillä käy mielessä
olisiko sittenkin ollut parempi, että emme koskaan olisi edes tavanneet. Olisi säästynyt monilta kyyneleiltä.781154- 841064
- 139976
Uskoontulo julistetun evankeliumin kautta
Ja kun oli paljon väitelty, nousi Pietari ja sanoi heille: "Miehet, veljet, te tiedätte, että Jumala jo kauan aikaa sitt573942Mika Muranen juttu tänään
Jäi puuttumaan tarkennus syystä teolle. Useat naapurit olivat tehneet rikosilmoituksia tästä kaverista. Kaikki oli Muras1877Hanna Kinnunen sai mieheltään tiukkaa noottia Tähdet, tähdet -kotikatsomosta: "Hän ei kestä, jos..."
Hanna Kinnunen on mukana Tähdet, tähdet -kisassa. Ja upeasti Salkkarit-tähti ja radiojuontaja onkin vetänyt. Popedan Lih8872- 19822
Oho! Farmi-tippuja Wallu Valpio ei säästele sanojaan Farmi-oloista "Se oli niin luotaantyöntävää..."
Wallu oikein listaa epämiellyttävät asiat… Monessa realityssä ollut Wallu Valpio ei todellakaan säästele sanojaan tippum9654Helvetin hyvä, että "hullut" tappavat toisensa
On tämä merkillistä, että yritetään pitää hengissä noita paskaperseitä, joilla ei ole muuta tarkoitusta, kuin olla riida8630