Thema Datum  Von Nutzer Rating
Antwort
Rot VBA - Verzweiflung
 11.11.2015 11:30:10 Tobias
Solved
11.11.2015 11:31:14 Tobias
NotSolved
11.11.2015 15:44:09 Gast65239
NotSolved
11.11.2015 21:21:05 Tobias
NotSolved
13.11.2015 17:18:15 Gast76941
NotSolved
14.11.2015 13:15:00 Günther
NotSolved

Ansicht des Beitrags:
Von:
Tobias		 Datum:
11.11.2015 11:30:10		 Views:
1388		 Rating:
     
Antwort:
 Nein
Thema:
VBA - Verzweiflung

Guten Tag,

Ich habe eine Übungsaufgabe bei VBA an der ich verzweifel. Das Problem liegt in der Fehlerroutine, egal ob ich m oder w eintrage er gibt ständig raus bitte trage m oder w ein. Die Fehlerroutine soll zur Überprüfung von txtGeschlecht sein, es soll geprüft werden ob m oder w eingetragen ist.

Grüße

Tobias

Private Sub cmdEinfuegen_Click()
    'Deklaration
        Dim intY As Integer

    'WithEnd-Block mit Do Loop Schleife
        With ThisWorkbook.Worksheets("Personal")
            intY = 2
        Do Until .Cells(intY, 1) = ""
            intY = intY + 1
        Loop
        
        'Fehlerroutine
            If txtGeschlecht <> w Or m Then
                MsgBox ("Bitte verwenden Sie für das Geschlecht die Buchstaben m oder w!"), vbCritical
                Exit Sub
            End If
        
        'Einfügen der Formulareinträge in die Excel Tabelle
            .Cells(intY, 1) = Format(txtID, Standart)
            .Cells(intY, 2) = txtNachname
            .Cells(intY, 3) = txtVorname
            .Cells(intY, 4) = txtGeschlecht
            .Cells(intY, 5) = Format(txtAlter, Standart)
        End With
        
End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot VBA - Verzweiflung
 11.11.2015 11:30:10 Tobias
Solved
11.11.2015 11:31:14 Tobias
NotSolved
11.11.2015 15:44:09 Gast65239
NotSolved
11.11.2015 21:21:05 Tobias
NotSolved
13.11.2015 17:18:15 Gast76941
NotSolved
14.11.2015 13:15:00 Günther
NotSolved