VBA.Mania

vbamania.pl

Dziś jest czwartek, 22 maja 2025 roku.

Ustaw jako stronę startową

Ulubione

Napisz

Powrót

Powrót do serwisu

Regulamin

RSS

	tytuł wątku:
Wątki dyskusji	zamiana wyrazów miejscami otwarty rozpoczął: usseross postów: 9

napisał: usseross postów: 7 umieszczony: 20 września 2007 13:13
	dziekuje wam bardzo, zaraz zabieram sie za testowanie kodu.

napisał: Trebor postów: 1209 umieszczony: 20 września 2007 07:04
	Pozamieniajmy kolory obydwu fragmentów Dim wiersz As Long Dim ile As Byte For wiersz = 1 To Cells(Rows.Count, 1).End(xlUp).Row ile = InStr(1, Cells(wiersz, 1), "-") If ile > 1 Then Cells(wiersz, 1).Characters(Start:=1, Length:=ile - 1).Font.ColorIndex = 3 Cells(wiersz, 1).Characters(Start:=ile + 1).Font.ColorIndex = 5 End If Next wiersz Pozdrawiam

napisał: usseross postów: 7 umieszczony: 20 września 2007 00:09 edytowany: 20 września 2007 00:56
	Twoj sposob jest dobry jesli wiesz co chcesz zamienic i znasz wyraz poczatkowy i ten na ktory chcesz go zamienic. Ale ja ich nie znam, bo to sa rozne wyrazy. Szybciej bedzie kopiuj wklej niz uzycie zamien. Ten sposob z excelem jest dobry. Teraz widze ze wystarczy mi w zupełnosc. Wiec bardzo dziekuje za niego. I jeszcze jedno ostatnie pytanko. czy istniej mozliwosc pokolorowania tekstu znajdujacego sie na lewo od - na jakis kolor np czerwony. Czyli: dobry (to jest na czerwono) - good (a to na czarno) mozna jakos zrobic zeby exce w komorkach obok zmienial kolor tylko tego na lewo od "-"?

napisał: Mintaj postów: 36 umieszczony: 19 września 2007 23:55
	Nie wiem jak ty to robisz ale ja setki wyrazów tak zamieniam tylko że to robię nie w wordzie ale w innych programach które poprawiam kod html i php. Ale zobacz kod kolegi on jest mistrzem vb i na pewno będzie ok

napisał: usseross postów: 7 umieszczony: 19 września 2007 23:09 edytowany: 19 września 2007 23:12
	ten sposob z ctrl + f sie raczej nie sprawdzi. A ten z excela zaraz wypróbuje. generalnie chodzi mi o to ze mam przetlumaczone slowka z angielskiego na polski i teraz chcialby to odwrocic i zeby byly z polskiego na angielski, zeby nie kopiowac ich na odwrot, czyli jak mialem: nice - miły good - dobry to zeby to potem wygladalo tak: miły - nice dobry - good Bo inaczej musze kopiowac i wklejac odwrotnie. A mam juz zapisane 4 kartki takich slowek. Czyli najproscie zeby to co bylo przed myslnikiem bylo za, a to co bylo za myslnikiem bylo przed.

napisał: Trebor postów: 1209 umieszczony: 19 września 2007 22:26
	W excelu można by formułą =PRAWY(A1;DŁ(A1)-ZNAJDŹ("-";A1)-1) & " - " & LEWY(A1;ZNAJDŹ("-";A1)-1) Pozdrawiam

napisał: Mintaj postów: 36 umieszczony: 19 września 2007 21:29
	Nie wiem czy o to ci chodzi ale najprościej bez vb bo na tym się nie znam zrobił bym tak: skrót Ctrl+F otwiera się małe okno "Znajdowanie i zamienianie" przechodzisz na zakładkę zmień wpisujesz w pole znajdź to co chcesz zamienić wpisujesz w pole zamień na co to ma wyjść po odszukaniu z pola wyżej no i na koniec opcja zmień wszystko albo zabawa i pojedyncze wyrazy. Można się też pobawić i skorzystać z zakładki znajdującej się po lewej stronie "więcej"

napisał: usseross postów: 7 umieszczony: 19 września 2007 20:52 edytowany: 19 września 2007 20:55
	Istniej mozliwosc zamiany wyrazow w wordzie, np. mam: nice - miły i chciałbym zeby word mi to zamienil czyli: miły - nice Jest jakas opcja w wordzie na to, albo moze ktos ma pomysl na kod w vba. Bylbym wdzieczny za odpowiedz. Pozdrawiam.

wstecz 1 dalej

wszystkich stron: 1