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
268to272
268to272
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Do Until ActiveCell.Value = ""

Forumthread: Do Until ActiveCell.Value = ""

Do Until ActiveCell.Value = ""
17.06.2003 15:24:39
Martin
Hallo,

ich komme bei folgendem Problem einfach nicht weiter.
Mittels CheckBox klicke ich in einer UserForm eine von zwei Boxen an. Das Ergebnis wird in eine Zelle geschrieben (rngErgebnis). In dieser Zelle steht i.E. immer entweder eine 0 oder eine 1.

Mit einer Do - Until - Schleife die die Datensätze durchsucht, möchte ich diejenigen Zeilen verstecken, deren Wert 0 ist, wenn in rngErgebnis eine 1 steht.
Steht in der Zelle eine 0, soll nichts passieren.

Kann mir jemand hierbei helfen bitte?
Gruss,
Martin




Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Do Until ActiveCell.Value = ""
17.06.2003 15:29:12
Mike E.

Hallo,
deren Wert "0" oder "" ist?
Muss nur eine Zelle die 0 oder "" enthalten oder soll die ganze Zeile mit Nullen oder nichts gefült sein?
Gruß
Mike

Re: Do Until ActiveCell.Value = ""
17.06.2003 15:36:36
Martin

Mike,

in F4 abwärts stehen Zahlen. Wenn die Zahl 0 ist und der Wert in rngErgebnis eine 1 ist, dann soll die gesamte Zeile versteckt werden und die nächste Zeile geprüft werden.

Gruss,
Martin

Anzeige
Re: Do Until ActiveCell.Value = ""
17.06.2003 16:09:58
Mike E.

Hallo Martin,

probiere es mit einer For/Next-Schleife (den Bereich in der If-Schleife musst du noch anpassen):

Gruß
Mike

Re: Do Until ActiveCell.Value = ""
17.06.2003 16:20:47
Martin

Nike,

das ist problematisch, da der Bereich, der durchsucht werden muss nicht statisch ist. Da kommen regelmäßig Daten hinzu.
Ich dachte an etwa folgendes (funktioniert aber nicht, ist auch nicht bis ins Letzte logisch)

Gruss,
Martin


Anzeige
Re: Do Until ActiveCell.Value = ""
17.06.2003 16:52:07
Mike E.

Hallo Martin,

die dynamik fängst du ab, bzw. fügst du hinzu, wenn du die For/next-Schleife z.B. so gestaltest:

For i = 14 to Cells.SpecialCells(xlLastCell).Row


Gruß
Mike

Re: Do Until ActiveCell.Value = ""
17.06.2003 16:55:18
Martin

Ja, das scheint zu klappen. Danke!

Gruss,
Martin

;

Forumthreads zu verwandten Themen

ActiveCell.Offset(0, 1).Value
Franz

Hallo Leute,
vermutlich eine blöde Frage, aber ich komme nicht auf die Lösung.
Wie kann ich den Inhalt von ActiveCell.Offset(0, 1).Value ---- es ist ein Datum ---- um 1 Tag bzw.
1 Monat erhöhen. Rechne ich + 1, so erhöht sich das Jahr.
Grummel, grummel....
Danke für die Hilf...
20.06.2009 17:19:12
Thread-ID: 1083105
3 Beiträge
Sverweis / ActiveCell.Value - Laufzeitfehler
Thorben

Moinsen Kameraden,
ich brauch mal Licht ans Fahrrad.
Die ActiveCell.Value bzw. ActiveCell.Address ist immer in Spalte A (falls wichtig)
Mein Code:
Sub malnurgucken() Dim Suchbegriff As Variant Suchbegriff = ActiveCell.Value For i = 1 To 35000 With ActiveSheet If Workbooks("Daten...
25.04.2014 13:39:23
Thread-ID: 1358592
5 Beiträge
ActiveCell.Value
Alex
Man beachte bitte folgenden VBA-Code: Public Sub ValueType() Dim vValue As Variant vValue = "2" ActiveCell.Value = vValue Debug.Print "Cell: " & TypeName(ActiveCell.Value) & " / Var: " & TypeName(vValue) End Sub ... welcher folgende Ausgabe liefert:
Cell: Double / Var: String Es sieht so aus...
02.07.2014 13:30:09
Thread-ID: 1368603
5 Beiträge
VBA Hilfe ActiveCell
Alex

Hallo,
ich habe bisher folgenden Code Private Sub CommandButton21_Click() Dim zeit As String zeit = Right(Now(), 19) ActiveCell.FormulaR1C1 = zeit Selection.NumberFormat = "dd.mm.yyyy hh:mm:ss" Dim Zeile As Long Zeile = ActiveCell.Row With ActiveSheet Do Zeile = Zeile + 1 Loop Until Rows(Ze...
16.02.2015 16:41:31
Thread-ID: 1409730
4 Beiträge
ActiveCell.Value
Horst

Hallo

Wie bekomme ich den Wert einer Zelle neben der aktiven Zelle?

Bsp. Test = ActiveCell(Offset(0,1)).Value

Das mit dem Offset ist nur so eine Idee von mir, es geht leider nicht

Gruß Horst
31.07.2003 15:52:13
Thread-ID: 288238
3 Beiträge
Andere VBA Anweisung für - ActiveCell.Row
udo
Hallo und schönen Mittag zusammen,

wüsste mir bei folgender Aufstellung Jemand bitte einen Rat ?, Habe da nochmals so ein
Problem bei EXCEL 8 , welches aber auf XP läuft , komisch.

Es handelt sich nur um die Aufstellung best. definierter Zellen der gerade aktiven Zeile.
<...
10.11.2003 14:33:41
Thread-ID: 335893
3 Beiträge
VBA gibt es „ActiveTextbox“ wie ActiveCell
Lupus
Hallo Excel-User,
gibt es für Controls (Textboxen) so etwas Ähnliches wie ActiveCell, also „ActiveTextbox“?
Ich will ein Makro schreiben, das für mehrer Textboxen gelten soll, will aber nicht mehrmals den gleichen Code für jede Textbox schreiben.
Gruß Lupus
04.02.2004 17:16:30
Thread-ID: 376616
13 Beiträge
Anzeige
ActiveCell.Value
Frank
Hallo,
ich habe folgendes Makro:
Sub Test() Range("G2").Select Dim i As Long For i = 1 To 100 If ActiveCell.Value "Eins" Then ActiveCell.Value = "" Else ActiveCell.Offset(1, 0).Select End If Next i End Sub
Wenn der Text in der Zelle ungleich "Eins" ist,dann soll die Zelle leer sein. E...
17.02.2004 11:14:16
Thread-ID: 383636
4 Beiträge
Anzeige
Komplettes Sheet anwählen (VBA) anstatt ActiveCell
Nico

Hi @ll
folgendes Problem:
Ich habe den untenstehenden Code im Archiv gefunden, um "e" in "E" und "t" in "T" umzuändern. Problem ist, dass es nur auf die aktive Zelle gerichtet ist.
Wie muss ich den Code umschreiben, um das komplette Sheet anzusteuern?
ActiveCell = Application.Wo...
03.05.2005 14:01:28
Thread-ID: 607039
6 Beiträge
ActiveCell.Value
BK

Hallo zusammen,
ich möchte mir für eine Versuchsauswertung eine Excel-Vorlage erstellen. In dieser Vorlage soll der Nulldurchgang eines Winkels ermittelt werden. Klingt eigentlich einfach, so ganz klappt das aber nicht.
Ist der Nulldurchgang gefunden, soll die Zeilennummer gespeichert...
17.06.2005 16:38:16
Thread-ID: 625502
4 Beiträge
Anzeige
i = ActiveCell.Value
Dani

Hallo zusammen
hab da eine kleiners Problem
mit
i = ActiveCell.Value
definiere ich ja den Wert der aktuellen Zelle
nun möchte ich mit
Cells.Find(What:=i, After:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchC...
24.06.2005 11:42:45
Thread-ID: 628508
3 Beiträge
VBA Hilfe Active Cell
Frank

Hallo
vielleicht kann mir ja jemand helfen,
wie kann ich in einem Makro einen Bereich vor oder nach der aktiven Zelle markieren zb nach "suchen" ?
09.04.2006 15:32:30
Thread-ID: 753657
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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