Office: VBA Code soll erst ausgeführt werden, wenn mehrere Felder NICHT leer sind

Helfe beim Thema VBA Code soll erst ausgeführt werden, wenn mehrere Felder NICHT leer sind in Sonstiges um das Problem gemeinsam zu lösen; Hallo zusammen, ich möchte, dass mein VBA Code nicht nur (wie in meinem Code) die Zelle B4 prüft, ob diese ausgefüllt ist, er soll auch noch vier... Dieses Thema im Forum "Sonstiges" wurde erstellt von Steffi H, 2. Juni 2023.

  1. VBA Code soll erst ausgeführt werden, wenn mehrere Felder NICHT leer sind


    Hallo zusammen,

    ich möchte, dass mein VBA Code nicht nur (wie in meinem Code) die Zelle B4 prüft, ob diese ausgefüllt ist, er soll auch noch vier weitere Zellen überprüfen.

    Sub NeueAbrechnung()

    If Range("B4").Value <> "" Then
    Range("S6").Value = Range("S6").Value + 1
    Range("B4,B5,K1:O1,K2:O2,O4:O5,N6:O6,N7,O7,A10:M40,O46").Select
    Range("O46").Activate
    ActiveWindow.SmallScroll Down:=-15
    Range("B4,B5,K1:O1,K2:O2,O4:O5,N6:O6,N7,A10:M40,O46,P10:P40").Select
    Range("P10").Activate
    Selection.ClearContents
    Else
    MsgBox "Bitte Abrechnung erst ausfüllen"

    End If

    End Sub

    Wie gesagt, für die eine Zelle funktioniert es, ich bekomme es nur leider nicht hin, dass er die anderen Zellen auch noch prüft. Kann mir hier jemand einen kleinen Tipp geben?

    Vielen Dank im Voraus!

    Viele Grüße
     
    Steffi H, 2. Juni 2023
    #1
  2. Doming
    Doming hat Ahnung
    Moin Steffi

    Code:
    Sub NeueAbrechnung()
    
        If Range("B4") <> "" And Range("B5") <> "" And Range("B6") <> "" And Range("B7") <> "" Then
            Range("S6") = Range("S6") + 1
            Range("B4,B5,K1:O1,K2:O2,O4:O5,N6:O6,N7,A10:M40,O46,P10:P40").Select
            Range("P10").Activate
            Selection.ClearContents
        Else
            MsgBox "Bitte Abrechnung erst ausfüllen"
        End If
    End Sub
    Ich habe Deinen Code mal etwas eingekürzt, wobei ich denke da geht noch mehr.
    Wenn Du die Zellen in der IF-Zeile anpasst, müsste der Code funktionieren.

    Gruß
    Doming
    (übrigens dürfte Deine Frage im Excel-Forum schneller zu Antworten geführt haben)
     
    Doming, 5. Juni 2023
    #2
    1 Person gefällt das.
  3. Moin Doming,

    super vielen lieben Dank! Funktioniert perfekt! :-) Auch danke für den Tipp, wo meine Frage schneller zu Antworten geführt hätte. :-)

    Einen guten Start in die neue Woche.

    VG
    Steffi
     
    Steffi H, 5. Juni 2023
    #3
Thema:

VBA Code soll erst ausgeführt werden, wenn mehrere Felder NICHT leer sind

Die Seite wird geladen...
  1. VBA Code soll erst ausgeführt werden, wenn mehrere Felder NICHT leer sind - Similar Threads - VBA Code ausgeführt

  2. Datentabelle per VBA Makro durch Kopieren und Einfügen einer Kopfzeile aufteilen

    in Microsoft Excel Hilfe
    Datentabelle per VBA Makro durch Kopieren und Einfügen einer Kopfzeile aufteilen: Hallo Zusammen, mein erster Beitrag hier, also schon mal Sorry im Voraus, wenn unvollständig beschrieben *:)* Ich habe das Forum schon nach einem brauchbaren Lösungsansatz durchsucht, bin aber...
  3. UserForm zum bearbeiten von Tabellen und speichern

    in Microsoft Excel Hilfe
    UserForm zum bearbeiten von Tabellen und speichern: Guten Tag Ich habe leider ein Problem, das mich zur Verzweiflung bringt. Vielleicht findet hier jemand einen Lösung für mein Problem. Ich bekommen leider einen Laufzeitfehler '1004'. Zur...
  4. VBA Code Tabellenblatt kopieren und UserForm

    in Microsoft Excel Hilfe
    VBA Code Tabellenblatt kopieren und UserForm: Hallo, ich hoffe mir kann jemand helfen. Schon mal vielen Dank für die Unterstützung. Folgende Thematik: In dem Blatt 1 ist ein ComandButton. Mit Klick soll über VBA folgendes abgefragt...
  5. VBA Code anpassen mit variablem Tabellen Ende

    in Microsoft Excel Hilfe
    VBA Code anpassen mit variablem Tabellen Ende: Hallo, im folgenden Code möchte ich gerne statt eines fest vorgegebenen Tabellen Ende ein variables einsetzen. Sub Verkettung() Dim i As Long For i = 2 To 15000 'Hier soll kein festes Ende...
  6. VBA-Code in kopierter Mappe wird in Originalmappe ausgeführt

    in Microsoft Excel Hilfe
    VBA-Code in kopierter Mappe wird in Originalmappe ausgeführt: Hallo Ich erstelle mir einen Jahreskalender, indem ich die Originaldatei kopiere, alle Einträge in der Kopie lösche und den Kalender incl. Feiertage neu erstelle. Das passiert komplett mittels...
  7. VBA Code nicht vollständig ausgeführt

    in Microsoft Excel Hilfe
    VBA Code nicht vollständig ausgeführt: Hallo Zusammen Ich habe einen Code erstellt der eine Liste in Excel importiert und dann alle Zeilen löscht, welche in der Spalte C entweder "Ersatz" oder "Unfall" enthalten. Wenn ich den Code...
  8. VBA Code wird nicht ausgeführt

    in Microsoft Excel Hilfe
    VBA Code wird nicht ausgeführt: Ciao zusammen, ich habe da ein Problem mit einem Code der nicht ausgeführt wird. Das komische jedoch dabei ist, dass der Code für alle Ligen gleich aufgebaut ist und sich nur der Name des Blattes...
  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