Jak szybko znaleźć i zamienić znak na indeks górny w programie Excel?
Znajdź i zamień indeksem górnym za pomocą funkcji Znajdź i zamień
Znajdź i zamień na indeks górny według VBA
Znajdź i zamień indeksem górnym za pomocą funkcji Znajdź i zamień
W rzeczywistości możesz użyć funkcji Znajdź i zamień, aby znaleźć tekst, a następnie zastąpić go formatem indeksu górnego.
1. Wybierz zakres, dla którego chcesz znaleźć i zamienić pracę, i naciśnij Ctrl + H otworzyć Znajdowanie i zamienianie dialog.
2. w Znajdowanie i zamienianie dialog, kliknij zastąpić a następnie wprowadź tekst, który chcesz znaleźć, do pliku Znajdź co pole tekstowe. Zobacz zrzut ekranu:
3. Następnie idź do Zastąp pole tekstowe, wprowadź tekst, którym chcesz zastąpić, zwróć uwagę, przytrzymaj inny Klawisz, a następnie naciśnij 0179 klucze na Tablica numeryczna wprowadzić numer 3 w indeksie górnym. Zobacz zrzut ekranu:
4. kliknij Zamień wszystko. Pojawi się okno dialogowe przypominające o liczbie dokonanych wymian. Zobacz zrzut ekranu:
Wskazówka: Ale dzięki tej metodzie indeks górny numer 2 można uzyskać, naciskając 0178 i 3 przez 0179.
Znajdź i zamień na indeks górny według VBA
Dzięki funkcji Znajdź i zamień tylko można zamienić liczbę na indeks górny. Jeśli chcesz zastąpić literę indeksem górnym, jak pokazano na poniższym zrzucie ekranu, możesz zastosować kod VBA, aby go rozwiązać.
1. naciśnij Alt + F11 klucze do otwarcia Microsoft Visual Basic for Applications okno.
2. kliknij wstawka > Modułi wklej poniższy kod VBA do skryptu.
VBA: znajdź i zamień na format indeksu górnego
Sub DoConvert()
'UpdatebyExtendoffice20160705
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Select a range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xCell.Value = "YL3" Then
xCell.Characters(1, 1).Font.Superscript = True
End If
Next
End Sub
3. naciśnij F5 , aby uruchomić kod, i pojawi się okno dialogowe przypominające o wyborze zakresu. Zobacz zrzut ekranu:
4. kliknij OK, określony znak w określonym ciągu został przekonwertowany na format indeksu górnego w zaznaczeniu. Zobacz zrzut ekranu:
Wskazówka: w kodzie, „YL3”To ciąg, na podstawie którego chcesz znaleźć, i (1, 1) wskazuje na konwersję pierwszego 1 znaku ciągu, jeśli chcesz przekonwertować pierwsze dwa znaki, możesz zmienić to na (1, 2), jeśli chcesz przekonwertować 1 znak z drugiego znaku ciągu, możesz zmienić go jako ( 2, 1).
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!