Office: (Office 2010) Excel VBA Click Ereignis verketten

Helfe beim Thema Excel VBA Click Ereignis verketten in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hallo, ich bin dabei mich in vba einzuarbeiten. Einiges habe ich auch bereits erfolgreich hinbekommen... Aber ich verzweifel an einem vermutlich... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von U2Nod2Fyeg, 2. November 2015.

  1. U2Nod2Fyeg Neuer User

    Excel VBA Click Ereignis verketten


    Hallo,

    ich bin dabei mich in vba einzuarbeiten. Einiges habe ich auch bereits erfolgreich hinbekommen...

    Aber ich verzweifel an einem vermutlich einfachen Problem und mir will die Lösung einfach nicht gelingen:

    Ich habe eine Userform mit mehreren Textboxen und ein paar CommandButtons.

    Zwei Textboxen, die eine heißt "Kundennummer", die andere heißt "Betrag". Bei klick auf einen Command Button ("Nächster Eintrag") sollen die eingegebenen Werte in das aktuell geöffnete Tabellenblatt übertragen werden und zwar für Kundennummer beginnend in Zelle A5 und dann die jeweils nächste freie Zelle in Spalte A. Ähnlich für "Betrag", nur das der erste Betrag in Zelle E5 eingetragen werden soll.

    Leider klappt bei mir eines von beiden, ich bekomm die beiden Ereignisse einfach nicht verbunden.

    Hier der Code bisher für den Button "nächster Eintrag":

    Code:
    Private Sub NächsterEintrag_Click()
        Sheets("01.10.2015").Range("B5").Value = CDbl(Kundennummer.Value)
        Cells(Cells(Rows.Count, "B").End(xlUp).Row + 1, "B").Value = CDbl(Kundennummer.Value)
        
        Sheets("01.10.2015").Range("E5").Value = CCur(Betrag.Value)
        Cells(Cells(Rows.Count, "E").End(xlUp).Row + 1, "E").Value = CCur(Betrag.Value)
    End Sub
    
    Ich hoffe mir kann hier jemand helfen.

    Sollte ich mich unklar ausgedrückt haben, oder sollten irgendwelche Fragen sein: Ich versuche alles so gut ich kann zu erläutern.
     
    U2Nod2Fyeg, 2. November 2015
    #1
  2. Exl121150 Erfahrener User
    Hallo,

    du sprichst zwar in deinem Posting von Zelle A5, im Code hast du aber Zelle B5 stehen - daher bin ich bei Zelle B5 geblieben.

    Mein Code geht - abweichend von dir - von der Annahme aus, dass du beides (Kundennummer+Betrag) jeweils in der gleichen Zeile stehen haben möchtest. Aus diesem Grund habe ich nur 1 Variable "NächsteZeileNr" angelegt. Falls dies bei dir wider Erwarten anders sein sollte, müsstest du für Spalte E eine 2. Variable anlegen und analog zu Spalte B dann vorgehen.

    Code:
    Private Sub NächsterEintrag_Click()
      Dim NächsteZeileNr As Long
      
      With Sheets("01.10.2015")
      
        NächsteZeileNr = .Cells(.Rows.Count, "B").End(xlUp).Row + 1
        If NächsteZeileNr < 5 Then NächsteZeileNr = 5
        
        .Cells(NächsteZeileNr, "B").Value = CDbl(Kundennummer.Value)
        .Cells(NächsteZeileNr, "E").Value = CCur(Betrag.Value)
        
      End With
    End Sub
    
     
    Exl121150, 3. November 2015
    #2
  3. U2Nod2Fyeg Neuer User
    Hallo,

    ups, ja ich meinte natürlich Zelle B5. Formel war richtig, Posting falsch. Richtig verstanden.

    Dein Code funktioniert übrigens und ist genau das was ich gesucht habe. Vielen Dank erstmal!
    Ich bastel weiter an der Datei und baue diese weiter aus!

    Super, dass mir so schnell geholfen wurde, wobei ich sagen muss, ich verstehe zwar was der Code macht, aber ich bin noch nicht sicher ob ich diesen selber schreiben könnte, also so richtig verstanden habe ich den noch nicht. Ich werde aber ein wenig daran rumschreiben und experimentieren und das dann sicher auch bald verstehen ;)

    Vielen Dank!
     
    U2Nod2Fyeg, 3. November 2015
    #3
Thema:

Excel VBA Click Ereignis verketten

Die Seite wird geladen...
  1. Excel VBA Click Ereignis verketten - Similar Threads - Excel VBA Click

  2. VBA Makro - PDF erstellen und speichern auf lokalem Netzwerk

    in Microsoft Excel Hilfe
    VBA Makro - PDF erstellen und speichern auf lokalem Netzwerk: Hallo zusammen, ich bin gerade dabei eine Excel Tabelle mit einem Makro zu erstellen, die von mehreren Personen genutzt wird. Jetzt stehe ich vor dem Problem, dass der angegebene Pfad nur auf...
  3. Screenshot von Excel in Sharepoint einfügen

    in Microsoft Excel Hilfe
    Screenshot von Excel in Sharepoint einfügen: Hallo Zusammen, bei mir in der Firma werden Daten in einer Excel per Screenshot archiviert und in einem lokalen Verzeichnis abgespeichert. Funktioniert soweit alles ganz gut. Nun sollte das...
  4. Excel automatisch per VBA schliessen ?

    in Microsoft Access Hilfe
    Excel automatisch per VBA schliessen ?: Hallo liebes Team, ich habe folgende Code geschrieben, wo ich auf Knopfdruck eine Excel Auswertung machen kann. Private Sub Befehl114_Click() On Error GoTo Err_Meldung Dim DocName As String...
  5. Suchfunktion in Listbox

    in Microsoft Excel Hilfe
    Suchfunktion in Listbox: Hallo zusammen, bin ein Neuling was VBA angeht und habe folgendes Problem. Über Double Click öffnet sich eine neue Userform und die Daten der Zeile füllen Textboxen aus. Das funktioniert alles....
  6. MsgBox in Excel anzeigen lassen per Word VBA

    in Microsoft Word Hilfe
    MsgBox in Excel anzeigen lassen per Word VBA: Hallo zusammen, ich bin neu hier und versuche aktuell aus Word heraus eine Exceldatei zu öffnen. Das klappt auch alles schon wunderbar. Jetzt möchte ich gerne, wenn die Excel Datei geöffnet ist,...
  7. Excel Blatt als PDF speichern mit VBA

    in Microsoft Excel Hilfe
    Excel Blatt als PDF speichern mit VBA: Hallo Leute wie könnte ein VBA Code aussehen wenn ich ein Excel Blatt als PDF mit Datum und einem bestimmten Namen speichern möchte. Speicherort soll ein Ort sein in der nur die PDF's gespeichert...
  8. Word Text Inhaltssteuerelement mit Excel VBA füllen

    in Microsoft Excel Hilfe
    Word Text Inhaltssteuerelement mit Excel VBA füllen: Hallo zusammen, ich möchte gerne in Word Inhaltsteuerelemente mit Excel VBA füllen. Leider erhalte ich immer die Fehlermeldung: Laufzeitfehler '5941' Das angeforderte Element ist nicht in der...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden