Jak przekonwertować powrót karetki na przecinek w programie Excel?
Może masz wiele komórek, które mają wartości oddzielone znakami powrotu karetki, a teraz musisz znaleźć wszystkie powroty karetki i zastąpić je przecinkami lub innymi znakami, jak pokazano na zrzucie ekranu. Jak można szybko i łatwo przekonwertować wszystkie powroty karetki na przecinki lub inne znaki w arkuszu?
Konwertuj powroty karetki na przecinki za pomocą formuły
Konwertuj powroty karetki na przecinki za pomocą funkcji Znajdź i zamień
Konwertuj powroty karetki na przecinki z kodem VBA
Konwertuj powroty karetki na przecinki za pomocą formuły
Poniższa prosta formuła może pomóc w łatwej zamianie powrotu karetki na przecinki lub inne znaki.
1. Wpisz tę formułę w pustej komórce poza danymi: = PODSTAW (A1; ZNAK (10); „,”) (A1 wskazuje komórkę, którą chcesz zastąpić powrót karetki, a przecinek między cudzysłowami to znak, którego chcesz użyć, możesz je zmienić w razie potrzeby.), zobacz zrzut ekranu:
2. Następnie przeciągnij uchwyt wypełniania do zakresu, w którym chcesz zastosować tę formułę, a otrzymasz następujący wynik, w którym powrót karetki zostanie zastąpiony przecinkami.
Konwertuj powroty karetki na przecinki za pomocą funkcji Znajdź i zamień
Funkcja Znajdź i zamień może również pomóc w natychmiastowej konwersji znaków powrotu karetki na przecinki. Wykonaj następujące czynności:
1. Wybierz zakres danych, dla którego chcesz przekonwertować powroty karetki.
2. Kliknij Strona główna > Znajdź i wybierz > zastąpić lub użyj skrótów Ctrl + H klawisze, aby otworzyć Znajdowanie i zamienianie okno dialogowe, zobacz zrzut ekranu:
3. W Znajdowanie i zamienianie okno dialogowe w Znajdź co proszę nacisnąć Ctrl + J klucze i w Zastąp wpisz żądane znaki, w tym przypadku wpiszę przecinek (,), patrz zrzut ekranu:
4. Następnie kliknij Zamień wszystko i pojawi się okienko z przypomnieniem o liczbie dokonanych wymian. Zobacz zrzut ekranu:
5. A następnie kliknij OK i zamknij Znajdowanie i zamienianie wszystkie powroty karetki zostały zastąpione przecinkami.
Konwertuj powroty karetki na przecinki z kodem VBA
Jeśli interesuje Cię kod VBA, mogę przedstawić kod do rozwiązania tego zadania.
1. Przytrzymaj ALT + F11 klucze i otwiera plik Okno Microsoft Visual Basic for Applications.
2. Kliknij wstawka > Modułi wklej następujący kod w oknie modułu.
Kod VBA: Konwertuj powrót karetki na przecinki
Sub ReplaceCarriage()
'Update 20141023
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = Replace(Rng.Value, Chr(10), ",")
Next
End Sub
3. Następnie naciśnij F5 aby uruchomić ten kod, i pojawi się okno zachęty przypominające o wyborze zakresu danych, którego chcesz użyć. Zobacz zrzut ekranu:
4. Następnie kliknij OK, a powrót karetki został natychmiast zamieniony na przecinki.
Note:
W powyższym kodzie możesz zmienić przecinek „,"w ramach Rng.Value = Zastąp (Rng.Value, Chr (10), ",") skrypt do innych postaci, jak chcesz.
Podobne artykuły:
Jak szybko usunąć podziały wierszy w programie Excel?
Jak podzielić komórki na wiele kolumn lub wierszy za pomocą powrotu karetki?
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!