TwojePC.pl © 2001 - 2024
|
|
A R C H I W A L N A W I A D O M O Ś Ć |
|
|
|
Chyba OT ;]]] ja pozbyc sie ogonkow ;]] , Wasabi 8/05/03 14:22 mianowicie
czy jest sposob zeby zastapic w calym tekscie jakos szybko i automatycznie litery z ogonkami na litery bez ogonkow ??
nie jest to standartowa funkcja to pewne ;] wiec moze jakies macro w wordzie czy cus ???
ktos cos moze doradzic ???Nothing to see here - mozna zrobic , bajbusek 8/05/03 14:25
znajdz i zamien, np z "ą" na "a" - wszystkie... ale macra nie umiem stworzyc- tak to ja wlasnie teraz robie ;] , Wasabi 8/05/03 14:33
ale w tekscie sa wszytskie ;]
ąęśćżź a do tego dochodza jeszcze duze litery ;]
wiec roboty kupa ;] to takie chodzenie na piechote ;]
ale moze ktos mi da bilet na autobus ;]]Nothing to see here - nie podobają ci się ogonki , Agnes 8/05/03 14:36
to teraz cierp!Metafizyka: - Poznaj, proszę, to jest
Fizyk, a to jego Meta... - hehe moj ogonek , Wasabi 8/05/03 14:39
mi sie podoba ;] to inne ogonki mnie sie nie podobaja a na nie nie mam wplywu ;]]]
pozatym Agnes temt ogonkow to chyba nie to forum ;]]]Nothing to see here
- przykladowe makro , metacom 8/05/03 14:36
Sub ogonki()
'
' ogonki Makro
'
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "ą"
.Replacement.Text = "a"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = "ę"
.Replacement.Text = "e"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
With Selection.Find
.Text = "ś"
.Replacement.Text = "s"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End SubNajwiększą sztuczką Szatana jest to,
że ludzie w niego nie wierzą. - lol ;]]]] , Wasabi 8/05/03 14:40
ale co JA mam z TYM zrobic ???
ja jestem ciemny jak tabaka w rogu w temacie makr do officowych aplikacji ;]Nothing to see here - otworz worda (albo inny dokument office'a) , metacom 8/05/03 14:47
narzedzia -> makro -> makra
wpisz nazwe dla makra, nacisnij UTWORZ i wklej zawartosc...
oczywiscie linijki SUB 'nazwa makra' i END SUB nie moga sie powtarzac...
reszte makra musisz sobie sam skompletowac, bo po pierwsze wychodze do domu, a po drugie nie chce mi sie pisac calego makra dla wszystkich literek alfabetu...Największą sztuczką Szatana jest to,
że ludzie w niego nie wierzą. - to dziala ;]]]] , Wasabi 8/05/03 15:10
wielkie dzieki ;]]]]]
teraz tylko dopisze dla duzych liter i szafa gra ;]]]]
jeszcze raz THX ;]]]]]]]]Nothing to see here - ja rowniez dziekuje - przydatna rzecz. , tytan 8/05/03 16:54
.,.--
"Wciąż w pogoni za lepszej jakości
życiem..."
- A może program Ogonki 97 ? , JE Jacaw 8/05/03 14:40
wprawdzie program jest niby do HTML'ów, ale od biedy może być:
ftp://ftp.pik-net.pl/pub/win95/Html/ogn97-13.exeSocjalizm to ustrój, który
bohatersko walczy z problemami
nieznanymi w innych ustrojach |
|
|
|
|
All rights reserved ® Copyright and Design 2001-2024, TwojePC.PL |
|
|
|
|