für jede gefüllte Zelle...
07.10.2016 09:14:49
Berndt
ich brauche eine kleine Hilfe bzgl. folgenden des folgenden Problems:
- betrachte nur die Sheets welche mit Herr* oder Frau* beginnen
For Each Worksheet In ActiveWorkbook.Worksheets
If LCase(Left(wksQuelle.Name, 5)) = "herr " Or LCase(Left(wksQuelle.Name, 5)) = "frau " Then
End If
Next
- suche mir in den Sheets in Spalte B "aus Themenspeicher übertragen* (das ist mein Tabellenkopf)
- darunter stehen Einträge (unterschiedlich viele)
für jede befüllte Zelle in Spalte B unter den Spaltenkopf soll es mir in Spalte A (eine Zelle links von B^^)ein Zelle formatieren (gepunktete Linie unten und eine Datenüberprüfung (Dropdownauswahlmöglichkeit= "x") einfügen).
Ist das umsetzbar?
VG Berndt