Ein Makro für Übertrag von verschiedenn Tabellen in eine

Question

hi Leute,
ich bin ganz neu. habe einen Excel Advange Kurs gemacht und nun den Programm ganz verfallen.
Nun habe ich ein Problem.
Ich ahbe schon ein Makro das mir in einer Tabelle eine bestimmte Spalte Summiert. Da klappt schon.
Nun soll das Ergebnis in einen Tabelle namesn Stuck eingetragen werden.
dh
es soll zb feld A3 und Feld E2, in die Tabelle Stuck auf A2(Spaltenname Aufkb) und B2 (Spaltenname Stuck) eingetragen werden.
Das schaffe ich auch das probelm ist nur das es
1. verschieden Tabellen sind dh nie die gleichen Namen aus denen die Zahlen kommen und
2. das ja je mehr Zahlen schon drinnen sind in Stuck je weiter unten muß dann ja eingefügt werden.
Also tabelle zwei muß ja in Stuck schon auf A3 und B3 eingefügt werden.

Meine FRage nun kann man das machen oder funktioniert sowas nicht. also die konstante ist nur Stuck. und die Felder in den anderen Tabellen.

hm Hoffentlich habe ich nicht zu wirr geschrieben

Answer 1

Hallo hexime30,

da könnte eine Beispielmappe Deinerseits helfen, die Du über
diese Adresse online stellen und nach hier verlinken kannst.

Dein bisheriges Makro und evtl. noch paar Erklärungen zu Deinem Problem, sollten in der Mappe nicht fehlen.

Gruß
Rainer

PS: die Angabe der Exelversion sollte bei jeder Frage selbstversändlich sein.

Answer 2

Hallo,

die letzte beschriebene Zelle kannst du wie folgt ermittelt:

ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row

bzw.

Sheets("Stuck").UsedRange.SpecialCells(xlCellTypeLastCell).Row

Eine neue Zeile kannst du dann also wie folgt anfügen:

Sheets("Stuck").Cells(Sheets("Stuck").UsedRange.SpecialCells(xlCellTypeLastCell).Row+1,1) = Sheets("Tabelle1").Cells(1,3)

Handelt es sich bei den Quelltabellen um Tabellen aus der selben Arbeitsmappe?
Dann könnte man diese über eine Schleife mit

ThisWorkbook.Worksheets.Count

ansprechen.

Gruß

M.O.