Clever-Excel-Forum

Hallo liebe Excel Freunde,

ich möchte eine Liste aus Abschnittsbezeichnungen automatisch ausgeben lassen.
Die Zielformel soll die erforderlichen Feldnamen aus Spalte I untereinander in eine Spalte schreiben.
Bedingungen:
- Die Anzahl der untereinander ausgegebenen Feldnamen soll abhängig von der genannten Anzahl in Spalte M sein
- für die Ausnahme "ohne Kabel" in Spalte L soll das Feld in der Ausgabe übersprungen werden.

Eine Beispieldatei wurde angehängt.

Würde mich sehr über jede Hilfe freuen.
Gruß,
Hannes.

Hallöchen,

mit einem Makro ginge das so:

Code:
Option Explicit

Sub Liste()

'Variablendeklarationen

Dim iCnt1%, iCnt2%

'Startzeile festlegen

iCnt1 = 17

'Schleife solange in I kein Leereintrag auftritt

Do While Cells(iCnt1, 9).Value <> ""

  'Schleife entsprechend Anzahl aus Spalte M

  For iCnt2 = 1 To Cells(iCnt1, 13).Value

    'Eintrag aus Spalte I nach SPalte R uebernehmen

    Cells(Rows.Count, 18).End(xlUp).Offset(1).Value = Cells(iCnt1, 9).Value

  'Ende Schleife entsprechend Anzahl aus Spalte M

  Next

'Zeilenzaehler hochsetzen

iCnt1 = iCnt1 + 1

'Ende Schleife solange in I kein Leereintrag auftritt

Loop

End Sub

Hi

Wenn du bei Formeln bleiben möchtest.
N16 =0
N17 =SUMME($M$17:M17) 'nach unten ziehen
R17 =VERWEIS(ZEILE(A1)-1;$N$16:$N$200;$I$17:$I$201) 'nach unten ziehen

Gruß Elex

hanso686

schauan

Elex