Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
676to680
676to680
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

berechnung nach textbox eingabe durchführen

Forumthread: berechnung nach textbox eingabe durchführen

berechnung nach textbox eingabe durchführen
09.10.2005 19:21:37
tini
hallo
hab 2 aufgaben
1) habe drei textbox-eingabfelder und möcht mittels tabulator taste nach der eingabe in das nächste eingabefeld(textbox) springen
2) nach jeder eingabe sollen automatisch alle berechnungen durchgeführt werden
für die die werte in den eigabefeldern notwendig sind
vielen dank im voraus
lg
tini
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: berechnung nach textbox eingabe durchführen
09.10.2005 19:54:44
Nepumuk
Hi,
zu 1.
Das geht nur so:
' **********************************************************************
' Modul: Tabelle1 Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _
        ByVal Shift As Integer)
    If KeyCode = 9 Or KeyCode = 13 Then If Shift = 1 Then _
        TextBox3.Activate Else TextBox2.Activate
End Sub

Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _
        ByVal Shift As Integer)
    If KeyCode = 9 Or KeyCode = 13 Then If Shift = 1 Then _
        TextBox1.Activate Else TextBox3.Activate
End Sub

Private Sub TextBox3_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _
        ByVal Shift As Integer)
    If KeyCode = 9 Or KeyCode = 13 Then If Shift = 1 Then _
        TextBox2.Activate Else TextBox1.Activate
End Sub
Zu 2. Was Berechnen?
Gruß
Nepumuk
Anzeige

Forumthreads zu verwandten Themen

TextBox1.Value = TextBox2.Value + TextBox3.Value
Michaela

Guten Mittag
Stehe ich aufm schlauch?
ich versuche in TextBox1. die Summe aus TextBox 2 und 3 anzuzeigen. das geht aber nicht mit:
TextBox1.Value = TextBox2.Value + TextBox3.Value
was mache ich falsch?
Danke für die Hilfe
Michaela
18.08.2008 15:45:00
Thread-ID: 1002572
8 Beiträge
ComboBox 1 = ComboBox 2
mtremer

Hallo Excel-Freunde,
wie kann man die 2. ComboBox so programmieren, dass sie anfangs die gleichen Auswal wie die 1. Combobox anzeigt?
Wenn also die 1. "a" zeigt, soll die 2. auch "a" zeigen.
Die 2. soll aber auch weiterhin einstellbar sein. Man soll auch in der 2. "b" auswählen kön...
09.10.2008 16:33:00
Thread-ID: 1015355
4 Beiträge
Anzeige
combobox füllen durch textbox
kirsche

hallo leute,
ich stehe mal wieder vor einem problem und hoffe auf eure hilfe.
ich habe eine tabelle(artikelstamm) mit ca. 2000 einträgen. in spalte L steht die PLU, welche bei einigen artikeln gleich ist. außerdem habe ich eine userform mit einer textbox und combobox.
in die textb...
17.11.2008 14:46:00
Thread-ID: 1025207
5 Beiträge
Anzeige
checkboxen durchzählen: Syntax?
Jörg

Guten Abend oder guten Morgen...
simples Problem - ich weiß nur nicht, wie man das schreibt...
man kann doch alles mögliche durchzählen - Beispiel:
for i = 2 to 5
if irgendwas then range("Zelle" & i).irgendwas
wie geht denn das bei Checkboxen?
wenn ich z.B. schreibe...
18.03.2009 01:58:30
Thread-ID: 1061245
4 Beiträge
Checkboxen durchzählen
Jörg

Guten Abend, Gemeinde
mein Problem von vor einigen Tagen ist noch ungelöst - hab die Beispieldatei noch etwas modifiziert
https://www.herber.de/bbs/user/60530.xls
Es geht "ganz einfach" um die Frage, wie ich für eine For-next-Schleife, an der mehrere Checkboxen beteiligt sind, den...
20.03.2009 23:12:51
Thread-ID: 1062387
8 Beiträge
Wert aus Zelle x in Zelle y, wenn Zelle Y =1
Wolfgang

Liebe Profis
In folgender Prozedur
Private Sub CommandButton1_Click() Range("A23:A37").Select Selection.TextToColumns Destination:=Range("A23"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=Fal...
08.05.2009 13:11:52
Thread-ID: 1073830
2 Beiträge
Werte von Zelle x übernehmen, wenn Zellwert=1
Zelle

Liebe Profis
In folgender Prozedur
Private Sub CommandButton1_Click() Range("A23:A37").Select Selection.TextToColumns Destination:=Range("A23"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=Fal...
11.05.2009 17:53:03
Thread-ID: 1074391
3 Beiträge
Excel Formel durch eigene Ergänzen ?
Hafner

Hallo
Ist es möglich, bei dem fixen Formeln unter Mathematikformeln eine eigene Formel zu speichern
es geht um diese Formel =@Ganzzahl(20*........+0.5)/20
ich benötige diese immer wieder und es ist Mühsam, diese jedesmal neu zu schreiben
23.05.2009 15:56:13
Thread-ID: 1076845
12 Beiträge
Anzeige
.find -> Suche erst nach x Durchläufen erfogreich
Suppenhuhn

Hallo Gemeinde !
Angehängte Makro-Routinen habe ich geschrieben um aus einer sehr, sehr langen Excel-Tapete die Zeilenpaare in ein neues Blatt auszusortieren, die in Spalte 13 bzw. 14 den gleichen Eintrag haben und deren Summe der Beträge in Spalte 17 gleich NULL sind.
Das Problem ist,...
24.05.2009 11:14:17
Thread-ID: 1076910
12 Beiträge
range("A1")= strText
Michael

Option Explicit
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public Sub URL_Load() Dim myIE_App As Object, strText As String Set myIE_App = CreateObject("InternetExplorer.Application") myIE_App.Navigate "http://www.kicker.de" Do Sleep 10 Loop Until myIE_App.B...
05.09.2009 18:16:24
Thread-ID: 1100785
1 Beitrag
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum