Live-Forum - Die aktuellen Beiträge
Datum
Titel
03.12.2023 22:06:16
OT: Wer war vor Einführung ....
03.12.2023 20:16:30
Listbox mit Eingabe füllen
03.12.2023 18:04:26
Dateien in Ordner umbenennen
Du konntest keine passende Antwort finden?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
112to116
112to116
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Datensatz auf andere Tabelle

Datensatz auf andere Tabelle
11.04.2002 09:05:23
Fred
Hallo Leute !
Ich möchte aus einer Datenliste (siehe unten) die Datensätze mit Kennzahl auf die gleichbenannten Tabellenblätter übernehmen.
z.B. Der Datensatz der Zeile 3 hat die Kennzahl 3024. Nun soll die ganze Zeile 3 in das Tabellenblatt 3024 übernommen werden.
Ich danke Euch im voraus ! Gruß Fred

Nr. Name Vorname Kennzahl KST
1 Futz Kalli 3022 47100
2 Meyer Horst 3024 47110
3 Grube Klaus 3022 47100
4 Schneider Heino 3152 42600
usw usw usw usw usw usw usw

Daten/3022/3024/3152 usw.


1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Datensatz auf andere Tabelle
11.04.2002 10:39:35
Peter H. Erdmann
Hallo,

so gehts auf jeden Fall. Mußt nur dafür sorgen,daß die Überschriften in allen Tabellenblättern von Anfang an da sind.

Sub Daten_Kopieren()

Dim intZeil As Integer
Dim Zähler As Integer
Dim Puffer As String

Application.ScreenUpdating = False
intzeile = ActiveSheet.Range("A1").Offset(65535, 0).End(xlUp).Row
For Zähler = 2 To intzeile
Puffer = Cells(Zähler, 4)
Range(Cells(Zähler, 1), Cells(Zähler, 5)).Copy
Sheets(Puffer).Select
If IsEmpty(Cells(2, 1)) Then
Range("A2").Select
Else
ActiveSheet.Range("A1").End(xlDown).Select
ActiveCell.Offset(1, 0).Select
End If
ActiveCell.PasteSpecial
Sheets("Tabelle1").Select
Next Zähler
Application.ScreenUpdating = True

End Sub

Gruß aus dem Land der Bayern
Peter

Anzeige

299 Forumthreads zu ähnlichen Themen

Gültigkeitsprüfung in Bezug auf andere Zelle
Erwin

Geschätztes Forum!
Ich möchte in Zelle A1 eine Gültigkeitsprüfung einfügen.
Die Gültigkeit soll mir dort Eingaben bis zur Höchstzahl der in A2 vorhandenen Zahl erlauben.
zB. Wenn in A2 die Zahl 5 steht, soll die Eingabe in A1 bis höchstens bis zur Zahl 5 (also 1,2,3,4,5) erlaubt sei...
14.08.2008 14:06:00
Thread-ID: 1001854
5 Beiträge
Daten sortiert aus anderem Tabellenblatt auslesen
Robert

Hallo,
bräuchte eure Hilfe bitte.
Aus einem Tabellenblatt ("FEHLZEITEN") sollen Daten ausgelesen und in einem anderen Tabellenblatt ("EINSATZPLANUNG") ab Zeile 100 eingefügt und bei Änderungen in "FEHLZEITEN" aktualisiert werden.
Habe da mal eine Beispieldatei zur besseren Veransch...
28.08.2008 11:32:00
Thread-ID: 1005356
3 Beiträge
Cursor auf anderes Blatt springen lassen
KlausF

Schönen Freitag-Morgen Leute!
In einer Datei kontrolliere ich in Tabelle 20 errechnete Werte. Entsprechen diese nicht meinen Vorstellungen, so muß ich in Tabelle 1 in der korrespondierenden Zelle (d.h. die mit der gleichen Adresse wie die aktuelle Zelle in Tab.20) Korrekturwerte eingeben.
26.09.2008 08:02:06
Thread-ID: 1012475
3 Beiträge
Übertrag auf anderes Blatt
Sankt

Hallo ,
erstmal vielen Dank für Eue Hilfen.
Ich würde gerne bei folgendem Blatt von der jeweiligen unteren Zelle einen Übertrag auf die Obere Zelle machen. Wie es normal geht weiß ich.
Meine Frage ist nun kann ich den Wert übernehmen wenn ich das Blatt kopiere.
https://www.herb...
02.10.2008 14:42:14
Thread-ID: 1013889
3 Beiträge
Übertrag auf anderes Blatt
Sankt

Hallo,
ich habe diese Frage schon einmal gestellt aber leider komme ich mit der Antwort nicht zurecht.

Ich möchte gerne aus ein Zelle November M47 den Wert in Dezember D9 übernehmen.
Normal würde es funktionieren mit ='November 2008'!M47. Man könnte nun ganz einfach die Stunden...
06.10.2008 11:50:21
Thread-ID: 1014393
7 Beiträge
Übertrag auf anderes Blatt
Sankt

Hallo
ich habe da ein kleines Problem.
Ich benutze folgende Formel
=INDIREKT(""&WAHL(MONAT(A1)-1;"Januar";"Februar";"März";"April";"Mai";"Juni";"Juli";"August"; "September";"Oktober";"November";"Dezember")&"!D9")
die funktioniert auch so weit ganz gut.
Nun habe ich...
03.11.2008 16:50:00
Thread-ID: 1021376
7 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige