Gefilterte Daten betrachten
16.01.2014 09:26:21
Stefan
ich habe in Spalte A Dateinamen stehen. In Spalte B ist ein Filter, der "x" bzw. "-" anzeigt, falls der Dateiname aus Spalte A für eine Umbenennung ausgewählt (x) bzw. übersprungen (-) werden soll.
Bloß es klappt bisher kein Ansatz den ich mir überlegt habe...bin auch leider ein Neuling in der VBA Programmierung. Welchen Ansatz ich im Moment verfolge ist:
If found > 1 Then
ActiveCell.Rows
Set c = .Find(x, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Adress firstAddress
End If
End If
Ich will damit halt einfach überprüfen, ob in der ganzen aktiven Zeile ein x steht. Dachte mir _
das wäre die einfachste Möglichkeit..funktioniert aber leider schon bei ActiveCell.Rows nicht :(
Falls jemand einen sinnvolleren Ansatz weiß, bin ich für Ratschläge sehr dankbar :)
PS: Hab's hier als Zitat jetzt, weil sonst wegen des Codes gemeckert wurde.
Beste Grüße,
Stefan
