Jak zamienić wszystkie liczby w komórkach na X w programie Excel?
Jak pokazano na poniższym zrzucie ekranu, jak zamienić wszystkie liczby w komórkach na x w programie Excel? Metoda opisana w tym artykule pomoże ci rozwiązać problem.
Zastąp wszystkie liczby w komórkach znakami x z kodem VBA
Zastąp wszystkie liczby w komórkach znakami x z kodem VBA
Poniższy kod VBA może pomóc w zastąpieniu wszystkich liczb w wybranych komórkach znakami X w programie Excel. Wykonaj następujące czynności.
1. Wybierz komórki zawierające liczby, które chcesz zamienić na x, a następnie naciśnij inny + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.
2. w Microsoft Visual Basic for Applications okno, kliknij wstawka > Moduł. Następnie skopiuj poniższy kod VBA do okna Code.
Kod VBA: Zastąp wszystkie liczby w wybranym zakresie znakami x w programie Excel
Sub ReplaceNoX()
Dim cell As Object
Dim val As String
Dim i As Integer
Dim n As String
Application.ScreenUpdating = False
For Each cell In Selection
If IsNumeric(cell.Value) Then
val = cell.Text
For i = 1 To Len(val)
n = Mid(val, i, 1)
If "0" <= n And n <= "9" Then
Mid(val, i, 1) = "x"
End If
Next
cell.Formula = val
End If
Next
Application.ScreenUpdating = True
End Sub3. wciśnij F5 klucz do uruchomienia kodu. Następnie możesz zobaczyć, że wszystkie liczby w wybranych komórkach są zastępowane przez x, jak pokazano na zrzucie ekranu.
Podobne artykuły:
- Jak znaleźć i zamienić wszystkie puste komórki na określoną liczbę lub tekst w programie Excel?
- Jak zamienić przecinki na nowe linie (Alt + Enter) w komórkach w programie Excel?
- Jak zamienić podziały wierszy na br w programie Excel?
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!
