Datenübertragung

Servus liebe Forummitglieder,
ich zähle mich leider auch zu den VBA Anfängern und würde mich total über Hilfe und Tipps freuen.
Ich habe eine interne aber standortübergreifende Unternehmensumfrage zu machen und dafür sollen die verschiedene Standorte, Daten in ein Datenblatt einpflegen.
Das Datenblatt habe ich erstellt. Die Daten sollen in C4:D34 eingetragen werden. Die Zellen C4 und D4 sind bis Zeile 34 aufgrund von einer unteren Darstellung/Aufteilung mit der Funktion "Verbinden und Zentrieren" verbunden, sollen aber für die Dateneingabe nur jeweils eine Zelle darstellen.
Per Button wird ein "Datenblatt Master" kopiert und als letztes Tabellenblatt mit dem Namen "Machine1" eingefügt,bei einem weiteren Tabellenblatt mit dem Namen "Machine2" usw. eingefügt.
Ab jetzt Hilfe benötigt:
Die Daten der Zellen C4:D34 sollen dann kopiert und in das Tabellenblatt "Machine_overview" von dem Spaltenformat in Zeilenformat eingetragen werden. Startzellen für die Eintragung der Datenblätter wie bspw. "Machine1" ist bei A4:AE4.
Sobald nun ein neues Datenblatt wie bspw. "Machine2" angelegt und ausgefüllt wird, sollen die Daten automatisch oder durch einen button in die nächste freie Zeile, also A5:AE5 eingetragen werden. Die Anzahl wie viele Datenblätter ausgefüllt werden ist bisher noch unbekannt.
Wenn ihr mir helfen könntet, wäre ich SEHR DANKBAR!!!
Beste Grüße

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Kevin,
ich glaube das geht ohne VBA.
Vorraussetzung: du hast in der Tabelle also eine "Master-Übersicht" und für jede "Machine" ein (identisch aufgebautes) seperates Tabellenblatt.
Dann weiter:
Im Namensmanager Variable "x" definieren:
x =ARBEITSMAPPE.ZUORDNEN(1+0*JETZT())
In beliebige Zelle im Arbeitsblatt:
=WENN(ZEILE(A1)>ANZAHL2(x);"";HYPERLINK("#'"&INDEX(x;ZEILE(A1))&"'!A1";TEIL(INDEX(x;ZEILE(A1)); FINDEN("]";INDEX(x;ZEILE(A1)))+1;31)))
Diese Formel erzeugt dann einen Link zum 1. Arbeitsblatt. Die Formel kannst du "nach unten durchziehen" um ein Inhaltsverzeichnis mit Verlinkung zu erstellen. Der Ausdruck "Zeile(A1)" ist ein Zählindex, wenn du mit dem 5. Tabellenblatt beginnen möchtest dann ist der erste Link mit "Zeile(A5)" statt "Zeile(A1)".
Wenn du Zeile() durch Spalte() ersetzt, dann geht es auch "nebeneinander".
Auf diese Links kannst du mit INDIREKT() zugreifen, z.B.


=INDIREKT("'"&$B$1&"'!$"&$C$1)

In diesem Beispiel ist "B1" der Link zum Tabellenblatt und in "C1" steht der Name der Zelle aus den seperaten Tabellenblättern (z.B. "C4").
Wenn du eine Beispielmappe hochlädst (mit Master-Übersicht und einer "Machine"Tabelle) kann ich es auch einbauen für dich.
Gruß,
Rainer

Beliebteste Forumthreads (12 Monate)

11 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread