Przejdź do głównej zawartości

Jak podsumować wartości z pól tekstowych?

Przypuśćmy, że masz trzy pola tekstowe, które chcesz zsumować wartości w Textbox1 i Textbox2 i obliczyć wynik automatycznie w Textbox3, jak pokazano na poniższym zrzucie ekranu. Jak mógłbyś sobie poradzić z tą pracą w Excelu?

wartości sum pola tekstowego doc 1

Zsumuj wartości z pól tekstowych za pomocą kodu VBA


strzałka niebieski prawy bąbelek Zsumuj wartości z pól tekstowych za pomocą kodu VBA

Aby podsumować wartości z dwóch pól tekstowych i przenieść wynik do trzeciego pola tekstowego, może Ci pomóc poniższy kod VBA.

1. Najpierw wstaw trzy pola tekstowe, kliknij Deweloper > wstawka > Pole tekstowe (formant ActiveX), a następnie narysuj pole tekstowe i zrób dwie kopie, zobacz zrzut ekranu:

wartości sum pola tekstowego doc 2

2. Po wstawieniu pól tekstowych kliknij prawym przyciskiem myszy kartę arkusza zawierającą pola tekstowe, których chcesz użyć, i kliknij Wyświetl kod z menu kontekstowego, aby otworzyć plik Microsoft Visual Basic for Applications okno, a następnie skopiuj i wklej następujący kod VBA do pustego modułu:

Kod VBA: Zsumuj wartości z pól tekstowych:

Private Sub Sum_Click()
    TextBox3.Text = Val(TextBox2.Text) + Val(TextBox1.Text)
End Sub

wartości sum pola tekstowego doc 3

3. Następnie wpisz wartości w Textbox1 i Textbox2, a następnie naciśnij F5 klucz lub run przycisk do wykonania kodu, obliczony wynik jest natychmiast wyświetlany w Textbox3, patrz zrzut ekranu:

wartości sum pola tekstowego doc 4

Najlepsze narzędzia biurowe

🤖 Pomocnik AI Kutools: Zrewolucjonizuj analizę danych w oparciu o: Inteligentne wykonanie   |  Wygeneruj kod  |  Twórz niestandardowe formuły  |  Analizuj dane i generuj wykresy  |  Wywołaj funkcje Kutools...
Popularne funkcje: Znajdź, wyróżnij lub zidentyfikuj duplikaty   |  Usuń puste wiersze   |  Łącz kolumny lub komórki bez utraty danych   |   Okrągły bez wzoru ...
Super wyszukiwanie: Wiele kryteriów VLookup    Wiele wartości VLookup  |   Przeglądanie pionowe na wielu arkuszach   |   Wyszukiwanie rozmyte ....
Zaawansowana lista rozwijana: Szybko twórz listę rozwijaną   |  Zależna lista rozwijana   |  Lista rozwijana wielokrotnego wyboru ....
Menedżer kolumn: Dodaj określoną liczbę kolumn  |  Przesuń kolumny  |  Przełącz stan widoczności ukrytych kolumn  |  Porównaj zakresy i kolumny ...
Polecane funkcje: Fokus siatki   |  Widok projektu   |   Duży pasek formuły    Menedżer skoroszytów i arkuszy   |  Biblioteka zasobów (Automatyczny tekst)   |  Selektor dat   |  Połącz arkusze   |  Szyfruj/odszyfruj komórki    Wysyłaj e-maile według listy   |  Super filtr   |   Specjalny filtr (filtruj pogrubienie/kursywa/przekreślenie...) ...
15 najlepszych zestawów narzędzi12 Tekst Tools (Dodaj tekst, Usuń znaki, ...)   |   50 + Wykres rodzaje (Wykres Gantta, ...)   |   40+ Praktyczne Wzory (Oblicz wiek na podstawie urodzin, ...)   |   19 Wprowadzenie Tools (Wstaw kod QR, Wstaw obraz ze ścieżki, ...)   |   12 Konwersja Tools (Liczby na słowa, Przeliczanie walut, ...)   |   7 Połącz i podziel Tools (Zaawansowane wiersze łączenia, Podział komórki, ...)   |   ... i więcej

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...

Opis


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!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
What do you mean with automatically? No press run button?
This comment was minimized by the moderator on the site
Can you make this run automatically?
This comment was minimized by the moderator on the site
Yes, you can select on change on each of the textbox and put the addition code there
This comment was minimized by the moderator on the site
Thanks a ton!
This comment was minimized by the moderator on the site
Thanks a ton!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations