Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1944to1948
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Google Tabellen in nächste freie Zeile kopieren

Google Tabellen in nächste freie Zeile kopieren
24.09.2023 19:55:57
Andre N.
Hallo,
ich arbeite in einem Verein in dem kranke Menschen Unterstützung und eine Beschäftigung finden. Da gibt es u.a. eine e-Werkstatt. Dort werden gespendete PCs und Notebooks aufgearbeitet und verkauft. Nun läuft dort vieles noch mit Papier was doch ziemlich chaotisch ist. Wir wollten nun probieren eine Google Tabelle einzuführen bei der vieles nur angeklickt werden muss. Nun läuft die „Aufarbeitung“ in mehreren Stufen ab. Einmal die Bestandsaufnahme, 1. Installation, 1. Endkontrolle und 2. Endkontrolle. Danach wird ein Verkaufspreis ermittelt usw. Nun habe ich in den 3 Schritten auf den Tabellenblättern je ein Kästchen mit „defekt festgestellt“ eingefügt. Wenn ein defekt festgestellt wurde sollen die Geräte in eine „Notebooks defekt“ Liste eingetragen werden und dann zurück ins Lager. Ich möchte das ganze für die Leute so einfach wie möglich machen. Nun möchte ich in jeder Zeile neben „defekt festgestellt?“ einen Button einfügen der beim anklicken einige Zellen der „Notebooks Bestand“ Liste in die Notebooks defekt“ Liste kopiert. Ich habe ein Makro aufgezeichnet für die erste Zeile der Bestandsliste. Das kopieren funktioniert auch. Nun soll aber in jeder der 3 Installations und Endkontrolle Listen in jeder Zeile ein Button sein der die Daten der bestimmten Zeile aus „Notebooks Bestand“ in die nächste freie Zeile der Notebooks defekt Liste kopiert. Es geht um Hersteller, Modell, Seriennummer und einige Module wie Ram, Wlan Karte und co. So können benötigte Ersatzteile usw. schneller gefunden werden. Ich habe schon viel gegoogelt aber noch keine passende Lösung gefunden. Da die Zellen von der Bestandsliste nicht mit der defekt Liste identisch sind, muss alles von Zelle zu Zelle kopiert werden. Ich habe den Makro Code mal angehängt.

Vielen Dank vorab für eure Bemühungen!!

LG Andre

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Google Tabellen in nächste freie Zeile kopieren
24.09.2023 20:38:19
Andre N.
var spreadsheet = SpreadsheetApp.getActive();
spreadsheet.getRange('BR5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('A5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('A5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!A5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('X5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('H5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!X5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('Y5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('I5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!Y5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('Z5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('K5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!Z5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AA5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('M5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AA5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AB5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('Q5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AB5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AC5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('R5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AC5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AD5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('T5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AD5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AE5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('U5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AE5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AF5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('W5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AF5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AG5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('X5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AG5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AH5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('Y5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AH5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebook Bestand'), true);
spreadsheet.getRange('AI5').activate();
spreadsheet.setActiveSheet(spreadsheet.getSheetByName('Notebooks defekt'), true);
spreadsheet.getRange('Z5').activate();
spreadsheet.getRange('\'Notebook Bestand\'!AI5').copyTo(spreadsheet.getActiveRange(), SpreadsheetApp.CopyPasteType.PASTE_NORMAL, false);
};
Anzeige
falsches Forum: Excel != GoogleTabellen owt
24.09.2023 21:13:16
ralf_b
Erläuterung zu ralf_b
25.09.2023 19:13:54
lupo1
Mit Google-Tabellen selbst wird Dir hier noch geholfen werden können.

Die dortige Programmier-Sprache aber hat nichts mit VBA zu tun - und sie wird nur mit etwas Glück von jemandem beherrscht.

309 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige