From: Likavcan, Alexander (Alexander.Likavcan@volkswagen.sk)
Date: 24. 02. 2003, 17:10 CET
Zdar a silu Mirex, dna 24.02.2003 si napisal(a): > word. makra. > > myslite, ze by sa dalo vyrobit makro, ktore by kontrolovalo > pocet slov vo vete? Napriklad ak by veta mala viac ako 20 > slov, zmenila by farbu. To iste na pocet pismen v slove. > Ak by malo slovo viac ako trebars 6 pismen, zmenilo by farbu. > > Mirex. > neviem ci si na mna nezanevrel :-(( ked to dame2date nefachci tak ako si chcel :-((( --------cut--------------- Sub pokus() For Each veta In ActiveDocument.Sentences 'tu treba povedat kolko slov je hranica If veta.Words.Count > 20 Then 'ak bude mat veta 20 slov pismenka su cervene veta.Font.Color = wdColorRed End If For Each slovo In veta.Words 'tu treba povedat kolko pismen je hranica If Len(slovo) > 6 Then 'ak ma slovo 6 pismen je modre slovo.Font.Color = wdColorBlue End If Next slovo Next veta End Sub s pozdravom AleXXX -- Remember: there are no strangers in the world, only friends who have not yet met.
This archive was generated by hypermail 2.1.6 : 24. 02. 2003, 17:10 CET