Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1308to1312
1308to1312
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wenn Abfrage

Forumthread: Wenn Abfrage

Wenn Abfrage
06.05.2013 19:43:13
Fritz
Hallo und schon jetzt ein Dankeschön für eure Hilfe.
Ich such ein Makro über einen bestimmten Bereich.
z.B.:
Wenn in Range("A1:B5")eine leere Zelle ist, dann ........
Liebe Grüße
Fritz

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Abfrage
06.05.2013 19:46:47
Hajo_Zi
Hallo Fritz,
Option Explicit
Sub naechste_leere_Zelle()
Dim RaFound As Range
' Spalte A
Set RaFound = Range("A1:A" & Rows.Count).Find("", , , xlPart, , xlNext)
If Not RaFound Is Nothing Then
MsgBox RaFound.Address
End If
Set RaFound = Nothing
End Sub

Anzeige
AW: Wenn Abfrage
06.05.2013 19:53:05
Fritz
Vielen Dank für deine Hilfe.
Fritz

Bereich.Count - CountA(Bereich) >0
06.05.2013 20:48:23
Matthias
Hallo
If Range("A1:B5").Count - Application.WorksheetFunction.CountA(Range("A1:B5")) > 0 Then
Gruß Matthias
;

Beliebteste Forumthreads (12 Monate)

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