Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 17:40:39
16.10.2025 17:25:38
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

AW: Probleme mit ner If-Abfrage (VBA)!

Forumthread: AW: Probleme mit ner If-Abfrage (VBA)!

AW: Probleme mit ner If-Abfrage (VBA)!
24.05.2004 09:22:45
Hans
Hallo,
da es ja das Objekt ActiveCell.Offset(0, 0) gibt, ist es nicht Nothing, m?glicherweise aber leer, wobei das Ganze aber sowieso keinen Sinn gibt. Dazu sollte auf das Selektieren verzichtet werden. Dazu kommt, dass "0" nicht 0 ist.
Was den Zweck aber auch erf?llt:
Range("A1:A15").SpecialCells(xlCellTypeBlanks).Value = 0
Bitte in den einzelnen Threads R?ckmeldung geben, damit man weiss, dass nicht f?r den Papierkorb gearbeitet wurde.
Gruss hans
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Probleme mit ner If-Abfrage (VBA)!
Logan
Jo hier ist meine aktuelle L?sung:

Sub Test_0()
Dim a As Integer
Dim b As Integer
Sheets("Test1").Select
Range("A1").Select
a = ActiveSheet.UsedRange.Rows.Count
Range("B1").Select
For b = 1 To a
If ActiveCell.Offset(0, 0).Value = 1 Then
ActiveCell.Offset(1, 0).Select
Else
ActiveCell = "0"
ActiveCell.Offset(1, 0).Select
End If
Next
End Sub

MfG
Logan
PS: Danke f?r die Hilfestellungen!
Anzeige
AW: Probleme mit ner If-Abfrage (VBA)!
24.05.2004 10:05:46
Harry
Hallo Hans,
war sicher nicht f?r den M?lleimer. Es gibt ja immer "Mitleser", die superdankbar sind, wenn sie auf diese Art f?ndig werden. Leider hinterlassen die eher selten ein "Dankesch?n....funzt prima" o.?.
Von mir kommt eins !
Viele meiner Code- L?sungen verdanke ich deiner hervorragenden Seite und den Spezis hier.
Ist schon beeindruckend, wie ihr Prosa in vba "zaubert".
Hut ab und herzlichen Dank daf?r
Harry
Anzeige
AW: Probleme mit ner If-Abfrage (VBA)!
24.05.2004 09:22:45
Hans
Hallo,
da es ja das Objekt ActiveCell.Offset(0, 0) gibt, ist es nicht Nothing, m?glicherweise aber leer, wobei das Ganze aber sowieso keinen Sinn gibt. Dazu sollte auf das Selektieren verzichtet werden. Dazu kommt, dass "0" nicht 0 ist.
Was den Zweck aber auch erf?llt:
Range("A1:A15").SpecialCells(xlCellTypeBlanks).Value = 0
Bitte in den einzelnen Threads R?ckmeldung geben, damit man weiss, dass nicht f?r den Papierkorb gearbeitet wurde.
Gruss hans
Anzeige
AW: Probleme mit ner If-Abfrage (VBA)!
Logan
Jo hier ist meine aktuelle L?sung:

Sub Test_0()
Dim a As Integer
Dim b As Integer
Sheets("Test1").Select
Range("A1").Select
a = ActiveSheet.UsedRange.Rows.Count
Range("B1").Select
For b = 1 To a
If ActiveCell.Offset(0, 0).Value = 1 Then
ActiveCell.Offset(1, 0).Select
Else
ActiveCell = "0"
ActiveCell.Offset(1, 0).Select
End If
Next
End Sub

MfG
Logan
PS: Danke f?r die Hilfestellungen!
Anzeige
AW: Probleme mit ner If-Abfrage (VBA)!
24.05.2004 10:05:46
Harry
Hallo Hans,
war sicher nicht f?r den M?lleimer. Es gibt ja immer "Mitleser", die superdankbar sind, wenn sie auf diese Art f?ndig werden. Leider hinterlassen die eher selten ein "Dankesch?n....funzt prima" o.?.
Von mir kommt eins !
Viele meiner Code- L?sungen verdanke ich deiner hervorragenden Seite und den Spezis hier.
Ist schon beeindruckend, wie ihr Prosa in vba "zaubert".
Hut ab und herzlichen Dank daf?r
Harry
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

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