Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
896to900
896to900
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehlermeldung Next ohne For

Forumthread: Fehlermeldung Next ohne For

Fehlermeldung Next ohne For
13.08.2007 11:15:08
Harald
Hallo,
in einer Userform hat der Benutzer die Auswahl, ob alle Spiele (optbt1.value=false) oder nur bestimmte Spiele (optbt1.value=true) ausgedruckt werden sollen. Dazu wird in einem Arbeitsblatt überprüft, ob Spalte B und C leer sind.
1) optbtn1.value = false: Befehle immer ausführen.
2) optbtn1.value = true: Wenn eine der Spalten leer ist, soll die nächste Zeile überprüft werden, andernfalls sollen die Befehle ausgeführt werden.
Leider bekomme ich bei meinem Code immer die Fehlermeldung "Next ohne For" bei "Then Next iSchleife"
Hier nun mein Code - was mache ich falsch?
For iSchleife = intVon To intBis
If optbtn1.Value = True Then ' es sollen nur komplette Spiele ausgedruckt werden
If Worksheets(strBlattname).Cells(iSchleife, 2).Value = "" Or _
Worksheets(strBlattname).Cells(iSchleife, 3).Value = "" Then Next iSchleife ' nur ein Team im Spiel
End If
' Befehle
Next iSchleife

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehlermeldung Next ohne For
13.08.2007 11:22:33
Beverly
Hi Harald,
versuche es mal so

For iSchleife = intVon To intBis
If optbtn1.Value = True Then ' es sollen nur komplette Spiele ausgedruckt werden
If Worksheets(strBlattname).Cells(iSchleife, 2).Value  "" Or _
Worksheets(strBlattname).Cells(iSchleife, 3).Value  "" Then
' Befehle
End If
End If
Next iSchleife


________________________________________

Anzeige
AW: Fehlermeldung Next ohne For
13.08.2007 11:25:00
Harry
Hallo,
m.E. müsste 3. Zeile lauten

If Worksheets(strBlattname).Cells(iSchleife, 2).Value  "" And _


Gruß
Harry

AW: Fehlermeldung Next ohne For
13.08.2007 11:34:00
Harald
Hallo Harry,
stimmt - ich hatte ursprünglich = statt . Aber das Problem ist damit noch nicht gelöst.
m.f.g.
Harald

Anzeige
AW: Fehlermeldung Next ohne For
13.08.2007 11:39:00
Harry
deine Logik "wenn optbtn=true und mind. einer von beiden Zellwerten="" then nichts machen, sonst immer deine Befehle abarbeiten", dann probier mal

For iSchleife = intVon To intBis
If ((optbtn1.Value) And (Worksheets(strBlattname).Cells(iSchleife, 2).Value = "" Or _
Worksheets(strBlattname).Cells(iSchleife, 3).Value = "")) = False Then
'hier deine Befehle eintragen
End If
Next


Anzeige
AW: Fehlermeldung Next ohne For
13.08.2007 12:00:00
Harald
Hallo Harry,
vielen Dank für deine Hilfe - so funktioniert es genau wie beabsichtigt!!!
m.f.g.
Harald

AW: Fehlermeldung Next ohne For
13.08.2007 11:31:29
Harald
Hallo Karin,
vielen Dank für den Tip, aber dann müsste ich die Befehle - das sind eine Menge - doppelt eingeben, da sie ja bei optbtn1 =false auf jeden Fall durchgeführt werden müssen.
m.f.g.
Harald

Anzeige
AW: Fehlermeldung Next ohne For
13.08.2007 12:11:43
Beverly
Hi Harald,
nein, das ist nicht unbedingt notwendig, denn das kann man z.B. mit einer Variablen lösen (oder man kann die Befehle in ein Modul auslagern und dieses einfach nur mit Namen aufrufen)

Dim boAction As Boolean
For iSchleife = intVon To intBis
If optbtn1.Value = True Then ' es sollen nur komplette Spiele ausgedruckt werden
If Worksheets(strBlattname).Cells(iSchleife, 2).Value  "" Or _
Worksheets(strBlattname).Cells(iSchleife, 3).Value  "" Then
boAction = True
Else
boAction = False
End If
Else
boAction = True
End If
If boAction = True Then
' Befehle
End If
Next iSchleife


Bis später,
Karin

Anzeige
AW: Fehlermeldung Next ohne For
13.08.2007 12:30:14
Harald
Hallo Karin,
von Harry habe ich schon eine Version bekommen, der die beiden if-Abfragen zusammenfasst.
Trotzdem vielen Dank für deine Mühe!
m.f.g.
Harald
;

Forumthreads zu verwandten Themen

VBA - Berechnung ohne Formeleintrag
kasi

Hallo liebe Excelprofis,
im Grunde bin ich jemand der lieber allein etwas herausfindet als jemanden um Hilfe zu bitten, aber ich weiß jetzt einfach nicht weiter :-(
Nach 6 Tagen rumforschen in allen möglichen Foren geb ich mich geschlagen und will nun doch hier fragend mein Glück versuc...
18.02.2009 02:59:00
Thread-ID: 1051668
4 Beiträge
DDE formel 'abschalten' ohne VBA
Melanie

Hallo,
ich moechte durch zelle A1 eine DDE formel in A2
z.B. =Server|wert!id4049?abfrage
'abschalten' oder 'auskommentieren', sodass die DDE schnittstelle erst dann aktiv wird, wenn A2 = WAHR ist.
Schoen waere es, wenn das ohne VBA geht.
Wer hat eine Idee ?
Gruss...
23.03.2009 17:20:37
Thread-ID: 1062983
7 Beiträge
Versand Tabellenblatt ohne Formel OHNE VBA
Stef@n

Hallo
auf Basis der Antworten des Threads
https://www.herber.de/forum/messages/1117576.html
habe ich folgenden Code, der auch einwandfrei funktioniert ! (Mail wird erst versandt, wenn in
der Zelle O10 der Text "VERKAUF" steht.
Nur eine Nachfrage:
Es wird das Blatt kop...
16.11.2009 15:07:38
Thread-ID: 1117637
9 Beiträge
VBA_For-Next Schleife ist fehlerhaft
Dirk

Hallo allerseits,
habe da noch ein Problem mit einer Schleife.
Nachstehender CODE soll im TB Eingaben Zeile 1 nach einem Wert aus TB Ausgabe A1 suchen.
Macht er auch, nur zeigt er mir immer erst die msgBox an (nichts gefunden) und wenn ich die dann x-mal bestätige, kommt dann auch i...
06.05.2010 17:41:15
Thread-ID: 1155887
5 Beiträge
Anzeige
VBA-Array "durcheinander" berechnen (ohne For..Nex
Alex

Hallo zusammen,
ich möchte gerne eine (eigentlich gut funktionierende) Excel/VBA-Routine in ein VBA-Array portieren. Das hat den einfachen Grund, dass die Excelroutine mit Sverweisen arbeitet und mittlerweile knapp 10.000 "Kenner" mit rund 90.000 Ausgabezellen zu versorgen sind. Ein VBA-Arr...
01.09.2010 14:08:01
Thread-ID: 1175226
5 Beiträge
Anzeige
Addition per VBA ohne Formel
MikeS

Hallo Leute,wer kann mir bei meinen bescheidenen VBA-Anfängen helfen?Mit nachfolgendem Code möchte ich in jedem Tabellenblatt die Zellen A1:A3 summieren.Nach dem Durchlauf aller Blätter soll die Gesamtsumme in Tabelle1-Zelle B1 reingeschrieben werden.Was stimmt hier nicht?Vielen Dank
MikeS
05.06.2002 21:02:45
Thread-ID: 126298
3 Beiträge
Anzeige
direkte Zellformatierung ohne VBA
WalterDa

Kennt jemand eine Möglichkeit, ohne VBA, sondern direkt über Eingabe von Formeln, in Zellen Formatierungen durchzuführen?
Ich möchte z.B. die aktive Zelle farbig markieren, wenn die aktive Zelle einen Wert und die Zelle daneben keinen Wert enthält.Gruß Walter
10.06.2002 07:39:47
Thread-ID: 127374
4 Beiträge
Anzeige
Sheet mit Formatierung ohne VBA copy
Mike

Hallo,
ich habe ein "Mastersheet" mit dem Namen Daten_1 und möchte dieses gerne mehrfach kopieren
anzahl = InputBox("Wieviel Jahre sollen eingefügt werden?")
anzahl=anzahl*12 'für die Monate
ergeben sollte es dann sowas in 3 Monatsabständen.
Daten_3
Daten_6
Daten_9<...
07.03.2012 10:33:31
Thread-ID: 1253991
4 Beiträge
For Schleife mit If/Else im Userform
Black-Mage

Hallo ihr lieben, ich habe folgendes Problem:
Ich habe ein Userform das durch klick auf eine Schaltfläsche ein 2tes Userform öffnet, in dem einige Werte eingetragen werden sollen.
Wenn ich nun im UF2 auf ok klicke Prüfe ich mit einer For schleife, ob alle Textboxen auch ausgefüllt wurd...
01.11.2012 19:45:30
Thread-ID: 1284895
7 Beiträge
VBA Code If Schleife
Dirk

Hallo Forum,
ich habe in einem Makro die Anweisung stehen ein Dateifenster zu öffnen:
"Application.Dialogs(xlDialogOpen).Show"
Jetzt möchte ich eine If-Schleife beschreiben, die eintreten soll, wenn jemand den Button "Abbrechen" in diesem Dialog drückt. Wie muss der Code für den Fal...
08.02.2013 13:53:23
Thread-ID: 1298353
4 Beiträge
VBA: Mehrere If-Abfragen über Schleife?
Jana

Hi zusammen!
Ich habe (mal wieder) ein Problem und hoffe, dass ihr mir weiterhelfen könnt.
Ich habe zwei Tabellen:
Die obere Tabelle zeigt die verfügbaren Kapazitäten von vier Lagern, in die Produkte eingelagert werden können.
In der unteren Tabelle sind Liefermengen von Produk...
02.05.2013 13:03:18
Thread-ID: 1311355
9 Beiträge
2 For Schleifen mit if
dandan

Hallo,
es geht um zwei Arbeitsmappen.
Im Prinzip findet ein Vergleich von zwei Tabellen statt.
1. Tabelle unter Sheet 'Stücklisten'. https://www.herber.de/bbs/user/85919.xlsm
2. Tabelle in Arbeitsmappe Komponentenuebersicht und Sheet 'Komponentenübersicht'. https://www.herber.d...
20.06.2013 10:18:01
Thread-ID: 1318671
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige