collapse

* Benutzer Info

 
 
Willkommen Gast. Bitte einloggen oder registrieren. Haben Sie Ihre Aktivierungs E-Mail übersehen?

* Wer ist Online

  • Punkt Gäste: 62
  • Punkt Versteckte: 0
  • Punkt Mitglieder: 1
  • Punkt Benutzer Online:

* Forenstatistik

  • stats Mitglieder insgesamt: 14038
  • stats Beiträge insgesamt: 67226
  • stats Themen insgesamt: 9067
  • stats Kategorien insgesamt: 5
  • stats Boards insgesamt: 17
  • stats Am meisten online: 415

Autor Thema: In usedrange nach leeren Zellen suchen?  (Gelesen 1211 mal)

Offline silentwolf

  • Access-Meister
  • ***
  • Beiträge: 801
In usedrange nach leeren Zellen suchen?
« am: April 25, 2017, 15:03:04 »
Hallo,
bekomme es leider nicht hin und finde auch nichts im Netz was mich weiterbringt..
Ich möchte gerne ein Makro erstellen das mir folgendes erledigt.
Würde gerne prüfen ob in einer Spalte oder auch den gesamten usedrange im aktuellen Worksheet zellen leer sind.
Sollte das der Fall sein dann soll eine andere Prozedur gestartet werden wenn diese nicht mehr leer sind dann ist sozusagen der Code schon gelaufen und würde dann eben diese Prozedur nicht mehr ausführen wollen.

Hier ist mein Ansatz um einen Bereich die Spalte E
Sub MarkiereBenutztenBereich()
    Dim rngHier As Range
    Dim cell As Range
   
'    Set rngHier = ActiveSheet.UsedRange.SpecialCells(xlCellTypeBlanks)
   
    Set rngHier = ActiveSheet.UsedRange.Columns("E")
   
'    a = WorksheetFunction.CountA(Range(rngHier))
   
    For Each cell In rngHier
        If IsEmpty(cell) Then
            MsgBox "Usedrange enthält leere Zeilen!"
        Else
            MsgBox "Usedrange enthält keine leeren Zellen!"
   
        End If
    Next
    rngHier.Select
   
End Sub

Da in der Spalte E manchmal leere Zellen stehen können benutze ich den usedrange.. aber ich bekomme es nicht hin das meine Prüfung richtig funktioniert.

Wäre um Hilfe dankbar..

mfg
 

Online markus888

  • Access-Profi
  • **
  • Beiträge: 206
Re: In usedrange nach leeren Zellen suchen?
« Antwort #1 am: Juli 31, 2017, 17:14:50 »
Deine Fehlerbeschreibung ist nicht brauchbar.
Vielleicht hilft es einen Blick in die Hilfe zu werfen:
IsEmpty erwartet einen Wert vom Typ Variant und enthält einen numerischen Ausdruck oder einen Zeichenfolgenausdruck.
Damit solltest du dein Problem selbst lösen können.
10 Jahre Access
 

Offline silentwolf

  • Access-Meister
  • ***
  • Beiträge: 801
Re: In usedrange nach leeren Zellen suchen?
« Antwort #2 am: August 04, 2017, 09:50:35 »
Hallo,
Danke für Deine Anwort!
Werde ich probieren!

mfg
SW