Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 17:41:19
Link erstellen mit Formel oder VBA?
23.04.2024 17:00:22
Summe und Ausgabe
23.04.2024 16:27:34
Excel Starthinweis - Arbeitsmappenleistung überprüfen ...
23.04.2024 16:15:16
Mittels VBA vordefinierte Kommentare in Zellen einfügen?
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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!
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
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

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige