Funkcja przycinania Excel VBA
Funkcja Excel VBA Trim służy do usuwania dodatkowych spacji z dowolnej komórki lub tekstu i daje nam wynik, który ma standard pod względem wymaganych spacji. Funkcja przycinania VBA działa dokładnie tak samo, jak funkcja przycinania programu Excel, a funkcja przycinania usuwa również dodatkowe spacje na 3 sposoby;
- Odstępy od początku tekstu.
- Odstępy od końca tekstu.
- Odstępy od środka tekstu, jeśli widać więcej niż 1 dodatkowe miejsce.
Dzieje się tak głównie wtedy, gdy pobieramy dane z jakiegoś serwera, hurtowni danych lub podczas nieprawidłowego wstawiania dodatkowych spacji ręcznie. Mimo że możemy łatwo zobaczyć spacje na środku tekstu, spacje na początku i na końcu tekstu nie są łatwo widoczne, dopóki nie przejdziemy do trybu edycji tej konkretnej komórki. Może to zrobić VBA Marco.
Jak korzystać z funkcji przycinania Excel VBA?
Omówimy sposób korzystania z funkcji przycinania VBA na kilku przykładach.
Możesz pobrać ten szablon Excel funkcji przycinania VBA tutaj - Szablon Excel funkcji przycinania VBAFunkcja przycinania VBA - przykład nr 1
Tutaj mamy 3 komórki na poniższym zrzucie ekranu.
I z każdą komórką związane są pewne spacje. Komórka A1 ma spacje na końcu.
Komórka A2 ma spacje na początku tekstu.
A komórka A3 ma spację między tekstem, który jest podświetlony na poniższym zrzucie ekranu.
Do przycięcia tych komórek użyjemy Excel VBA. W tym celu naciśnij klawisze Alt + F11 razem lub na karcie Deweloper kliknij Visual Basic, jak pokazano poniżej.
Spowoduje to przejście do okna kodowania Visual Basic. Teraz przejdź do menu Wstaw z okna VBA i wybierz Moduł, jak pokazano poniżej.
Spowoduje to utworzenie nowego modułu, w którym napiszemy kod do przycinania. Poniżej znajdują się kroki tworzenia i pisania kodu przycinania:
- Najpierw wybierz zmienną i zdefiniuj zakres. Tutaj wybraliśmy zmienną „A”. Ta zmienna może być dowolna.
- Ponieważ nasz zestaw danych zawiera już tekst lub obiekt, musimy ustawić jego zakres. I do tego użyjemy „ Selekcji ”. Automatycznie wybierze dane z obecnego arkusza.
Kod:
Sub Trim_Data () Dim A As Range Set A = Selection End Sub
- Aby wybrać każdą wypełnioną komórkę arkusza, „For Each” jest funkcją I funkcja Value służy do wyboru wartości za pomocą opcji Przytnij (komórka) .
Kod:
Sub Trim_Data () Dim A As Range Set A = Wybór dla każdej komórki w cell.Value = WorksheetFunction.Trim (cell) Next End Sub
W ten sposób kończymy prace nad kodowaniem tworzenia makr za pomocą VBA Trim. Teraz zastosujmy utworzony kod do jakiejś zakładki. W tym celu przejdź do menu Wstaw i pod ilustracjami wybierz Kształty .
Z tej opcji Kształty utwórz dowolny kształt za pomocą formatów i stylów kształtów.
Tutaj utworzyliśmy prostokątne pudełko i nazwaliśmy je TRIM, jak pokazano poniżej.
Teraz kliknij Tryb projektowania w menu Deweloper i kliknij prawym przyciskiem myszy utworzone pole lub kształt. Z menu po kliknięciu prawym przyciskiem myszy wybierz polecenie Przypisz makro, aby połączyć nasz utworzony kod, jak pokazano poniżej.
Otrzymamy okno Assign Marco, stamtąd wybierz już utworzony kod makra, tutaj mamy Trim_Data, a następnie kliknij OK .
Teraz wybierz dane i kliknij przycisk TRIM . Wybrane elementy zostaną przycięte, a spacje, które nie były wymagane, zostaną teraz usunięte, jak pokazano poniżej.
Funkcja przycinania VBA - przykład 2
Kodowanie VBA pokazane powyżej można zapisać na jeszcze jeden sposób. W powyższym przykładzie przycięliśmy tylko wybrane dane. W tym wstawimy funkcję do okna komunikatu, a także pokaże po przycięciu danych.
W tym celu użyjemy tych samych danych, które wykorzystaliśmy w przykładzie 1. Wykonaj te same kroki, przejdź do zakładki Develope r i kliknij Visual Basic .
Gdy to zrobimy, otrzymamy okno Visual Basic. Teraz otwórz nowy moduł i zacznij kodować na tej stronie.
Rozważmy teraz ten sam kod, który napisaliśmy w przykładzie 1. Ale tutaj, aby wydrukować okno komunikatu z tekstem, wstawimy trochę tekstu.
Kod:
Sub Trim_Data2 () Dim A As Range Set A = Wybór dla każdej komórki w cell.Value = WorksheetFunction.Trim (cell) Dim B As String B = Trim ("Trimming Done") MsgBox B Next End Sub
Po zakończeniu pisania kodu zamknij okna Visual Basic.
Teraz ponownie przejdź do karty Deweloper i kliknij menu Wstaw, jak pokazano poniżej. Otrzymamy rozwijane menu różnych kształtów przycisków, jak pokazano poniżej.
Teraz wybierz dowolny kształt przycisku i narysuj go w dowolnym miejscu skoroszytu. Z listy utworzonych makr wybierz wymaganą opcję. Tutaj wybraliśmy Trim_Data2, które stworzyliśmy dla tego przykładu, a następnie kliknij OK.
Następnie otrzymamy przycisk utworzony na ekranie.
Możemy nazwać przycisk zgodnie z funkcją, którą będziemy wykonywać. Nazwijmy go TRIM zgodnie z funkcją. Teraz kliknij prawym przyciskiem myszy utworzony przycisk PRZYCINANIE i wybierz Przypisz Marco. Gdy to zrobimy, pojawi się okno Assign Marco, jak pokazano poniżej. Teraz wybierz wymagane makro i kliknij OK.
Dzięki temu nasze kodowanie przycinania zostanie przypisane do przycisku TRIM. Teraz do testowania najpierw wybierz dane, a następnie kliknij przycisk PRZYCINANIA.
Jak widać powyżej, tutaj nasze dane zostały przycięte i możemy również zobaczyć komunikat „ Trimming Gotowe ”.
Zalety funkcji przycinania Excel VBA
- Możemy przyciąć ogromne zestawy danych w jednym ujęciu bez sprawdzania liczby dodatkowych spacji w komórkach.
- Kodowanie funkcji przycinania jest również dość małe.
- Istnieje bardzo mała lub żadna szansa na zaoszczędzenie dodatkowej przestrzeni.
Rzeczy do zapamiętania
- Zawsze zapisuj plik jako arkusz roboczy z włączoną obsługą makr. W ten sposób możemy wielokrotnie używać przypisanego makra.
- Skompiluj kod przed przypisaniem go do dowolnego przycisku.
- Istnieją 2 różne sposoby tworzenia przycisku i oba mogą być używane według indywidualnych potrzeb lub życzeń.
- Rozważ napisanie kodu VBA, jak pokazano w przykładzie 2, który również da wiadomość.
Polecane artykuły
To był przewodnik po Excel VBA Trim. Tutaj omówiliśmy, jak używać funkcji przycinania VBA do usuwania spacji w programie Excel, a także kilka praktycznych przykładów i szablonu programu Excel do pobrania. Możesz także przejrzeć nasze inne sugerowane artykuły -
- Funkcja VBA w programie Excel
- Funkcja VBA VLOOKUP
- Przewodnik po karcie programisty Excel
- Jak utworzyć przycisk polecenia drukowania w programie Excel?