Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
412to416
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
412to416
412to416
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Funktion - Rücksprung ins vorherige Blatt

Funktion - Rücksprung ins vorherige Blatt
Falk
Hallo alle zusammen,
mit der folgenden Funktion:

Function Kopieren()
Range(ActiveCell.Offset(0, -6), ActiveCell.Offset(0, 7)).Select
Selection.Copy
Sheets("Navigation").Select
Selection.PasteSpecial Paste:=xlValues
Selection.PasteSpecial Paste:=xlFormats
ActiveCell.Offset(1, 0).Select
Sheets("Calc Audi").Select
ActiveCell.Offset(1, 6).Select
End Function

... kopiere ich Daten ins Navigationsblatt hinein. Mein Problem ist nun, das ich die Daten nicht nur vom Blatt "Calc Audi" sondern auch aus anderen Tabellen kopieren möchte. Also wenn die Daten aus dem Blatt "Calc VW" kopiert werden, dann springt die Funtkion ins Navigationsblatt und kopiert sie dort hin, jetzt soll aber der Rücksprung ins "Calc VW" Blatt geschehen.
Wie kann ich die Zeile "Sheets("Calc Audi").Select" nun variabel halten? Also "Sheets(" Tabelleblatt aus dem die Daten stammen ").Select"
Danke für Euro Hilfe im voraus ...
Grüße
Falk

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Funktion - Rücksprung ins vorherige Blatt
Kurt
Zum Kopieren ist es nicht nötig, das Blatt zu selektieren!
Kurt
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige