Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Automatisch Tabelle erstellen
#21
(15.07.2015, 10:38)BoskoBiati schrieb: Hallo,

das Ganze ließe sich auch mit Formeln bewerkstelligen:

Arbeitsblatt mit dem Namen 'Tabelle1'
 ABCDEFGH
1FirmaKostenstelleJahr 34336
2Fa. AKst 11995 Fa. AKst 11995 
3Fa. AKst 11996 Fa. BKst 21996 
4Fa. AKst 11997 Fa. CKst 31997 
5Fa. AKst 21995  Kst 4  
6Fa. AKst 21996     
7Fa. AKst 21997     
8Fa. AKst 31995     
9Fa. AKst 31996     
10Fa. AKst 31997     
11Fa. AKst 41995     
12Fa. AKst 41996     
13Fa. AKst 41997     

ZelleFormel
E1=ANZAHL2(E2:E21)
F1=ANZAHL2(F2:F21)
G1=ANZAHL2(G2:G21)
H1=E1*F1*G1
A2=WENN(ZEILE(A1)>$H$1;"";INDEX(E:E;KÜRZEN((ZEILE(A1)-1)/$F$1/$G$1;)+2))
B2=WENN(ZEILE(B1)>$H$1;"";INDEX(F:F;REST(KÜRZEN((ZEILE(B1)-1)/$G$1;);$F$1)+2))
C2=WENN(ZEILE(C1)>$H$1;"";INDEX(G:G;REST(ZEILE(A1)-1;$G$1)+2))
Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

Ah jetzt versteht ihr was ich meine !!
Super vielen Dank auch an dich ::) ich gucke mal welche Variante besser in mein Workbook passt.

Vielen Dank euch !! Wirklich super
Antworten Top
#22
Hallo Ralf,

danke für die Korrektur. Da hatte ich wohl den finalen Stand nicht erwischt Sad Die Eintragungen reichen je 1x
statt z.B.

          Cells(lRow, 4).Value = arrGRA(iCnt4 - 1)
          Cells(lRow, 4).Value = arrGRA(iCnt4 - 1)
          Cells(lRow, 5).Value = arrGRB(iCnt4 - 1)
          Cells(lRow, 5).Value = arrGRB(iCnt4 - 1)

nur
          Cells(lRow, 4).Value = arrGRA(iCnt4 - 1)
          Cells(lRow, 5).Value = arrGRB(iCnt4 - 1)

Die Überschriften waren bereits im Beispiel enthalten, hat daher vermutlich einen Zweck. Vielleicht kommen da später Zusammenfassungen der jeweils untergeordneten Daten hin.
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
[-] Folgende(r) 1 Nutzer sagt Danke an schauan für diesen Beitrag:
  • duckman15
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste