Czasami chcemy użyć jednego arkusza Excela jako formularza, który służy do pobierania danych wejściowych od użytkownika. dane wprowadzone przez użytkownika staramy się zapisać na niektórych innych arkuszach, które mogą być niedostępne dla użytkownika końcowego, oczywiście ze względu na bezpieczeństwo danych. W tym artykule dowiemy się, jak możemy zaktualizować dane z jednego arkusza do drugiego za pomocą VBA.
Więc bez zagłębiania się w moje nudne rozmowy, zagłębimy się w przykład, aby zrozumieć koncepcję.
Przykład: Aktualizuj dane w arkuszu 2 na podstawie wartości wprowadzonych w arkuszu 1
Chcemy napisać ten kod dla tych pracowników, którzy pracują w call center. Gdy klienci dzwonią do nich, pobierają podstawowe dane, takie jak nazwa_użytkownika, identyfikator_użytkownika, numer_telefonu i identyfikator problemu.
Teraz chcemy napisać makro, dla którego, gdy nadejdzie połączenie, zanotują wszystkie wyżej wymienione szczegóły w arkuszu Excela, a kiedy klikną aktualizację, dane powinny zostać zaktualizowane w innym arkuszu.
Aby zaktualizować dane z jednego arkusza do innego arkusza, wykonaj poniższe czynności:-
• Najpierw wstawimy przycisk polecenia w arkuszu.
• Przejdź do zakładki Deweloper, a następnie wstaw przycisk Polecenie z Activexcontrol.
• Przypisz poniżej wymienione makro:-
Private Sub CommandButton1_Click() Dim User_Name As String, User_ID As Integer, Phone_Number As Double, Problem_ID As Integer Worksheets("Arkusz1"). Wybierz User_Name = Range("B2") User_ID = Range("B3") Phone_Number = Range(" B4") Problem_ID = Range("B5") Worksheets("Sheet2").Select Worksheets("Sheet2").Range("A1").Select If Worksheets("Sheet2").Range("A1").Offset (1, 0) "" Then Worksheets("Sheet2").Range("A1").End(xlDown).Select End If ActiveCell.Offset(1, 0).Select ActiveCell.Value = User_Name ActiveCell.Offset(0 , 1).Select ActiveCell.Value = User_ID ActiveCell.Offset(0, 1).Select ActiveCell.Value = Phone_Number ActiveCell.Offset(0, 1).Select ActiveCell.Value = Problem_ID Worksheets("Arkusz1").Select Worksheets( "Arkusz1").Range("B2").Wybierz Koniec Sub
Wyjaśnienie kodu:- Najpierw zdefiniowaliśmy wszystkie zmienne. Następnie zdefiniowaliśmy zakres dla każdej zmiennej, a następnie opisaliśmy zakres dla wszystkich zmiennych. I zdefiniowaliśmy, gdzie iw jakim zakresie dane będą aktualizowane po kliknięciu przycisku Aktualizuj.
• Aby uruchomić kod naciśnij klawisz F5 na klawiaturze.
• Gdy wprowadzisz dane i klikniesz przycisk aktualizuj to dane zostaną zaktualizowane w innym arkuszu i będziemy mogli wprowadzić nowe dane w arkuszu.
W ten sposób możemy aktualizować dane z jednego arkusza do drugiego za pomocą VBA w programie Microsoft Excel. Mam nadzieję, że wystarczająco wyjaśniłem. Jeśli masz jakiekolwiek wątpliwości dotyczące tego artykułu lub jakiegokolwiek innego artykułu Excel VBA, możesz mnie zapytać w sekcji komentarzy poniżej.
Zmień wartość / zawartość kilku formantów UserForm za pomocą VBA w programie Excel | Aby zmienić zawartość kontrolek formularza użytkownika, użyj tego prostego fragmentu kodu VBA.
Zapobiegaj zamykaniu formularza użytkownika, gdy użytkownik kliknie przycisk x za pomocą VBA w programie Excel | Aby uniemożliwić zamknięcie formularza użytkownika, gdy użytkownik kliknie przycisk x formularza, używamy zdarzenia UserForm_QueryClose.
Popularne artykuły:
50 skrótów Excela, które zwiększą Twoją produktywność | Przyspiesz swoje zadanie. Te 50 skrótów przyspieszy pracę w programie Excel.
Funkcja WYSZUKAJ.PIONOWO w programie Excel | Jest to jedna z najczęściej używanych i popularnych funkcji programu Excel, która służy do wyszukiwania wartości z różnych zakresów i arkuszy.
LICZ.JEŻELI w Excelu 2016 | Policz wartości z warunkami za pomocą tej niesamowitej funkcji. Nie musisz filtrować danych, aby policzyć konkretną wartość. Funkcja Countif jest niezbędna do przygotowania deski rozdzielczej.
Jak korzystać z funkcji SUMIF w programie Excel? | To kolejna ważna funkcja deski rozdzielczej. Pomaga to zsumować wartości w określonych warunkach.