UDF do wyodrębniania tylko liczby z komórki za pomocą VBA w programie Microsoft Excel
W tym artykule dowiemy się, jak używać kodu VBA do wyodrębniania liczby tylko z komórki z funkcją zdefiniowaną przez użytkownika.
Pytanie): Potrzebuję makra, aby pobrać numer tylko z komórki zawierającej dane alfanumeryczne.
Poniżej znajduje się migawka danych, w których kolumna A zawiera dane alfanumeryczne, a oczekiwane liczby znajdują się w kolumnie B
Aby uzyskać tylko liczby z kolumny A; musimy wykonać poniższe kroki, aby uruchomić edytor VB
- Kliknij kartę Deweloper
- Z grupy Kod wybierz Visual Basic
Skopiuj poniższy kod w module Standard
Funkcja NumericOnly (mystr jako wariant)
Dim myOutput As String, i As Integer
Dla i = 1 Do Len(mystr)
If IsNumeric(Mid(mystr, i, 1)) Wtedy _
mojeWyjście = mojeWyjście i Środek(mystr, i, 1)
Następny
Tylko numeryczne = mojeWyjście * 1
Koniec funkcji
- Aby uzyskać wynik w komórce B2, formuła to
- =Tylko numeryczne(A2)
W ten sposób możemy pobierać liczby tylko z komórki zawierającej tekst i liczby, używając kodu VBA.
Pobierz - UDF, aby wyodrębnić tylko numer z komórki za pomocą VBA - xlsm
