Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
432to436
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten aus Tab1 auslesen und in Tab2 listen

Daten aus Tab1 auslesen und in Tab2 listen
01.06.2004 11:05:08
chris
Hallo,
ich habe folgendes Problem:
in tabelle 1 ist ein sap datenexport. ich möchte nun gezielt werte (A7, B7, C7 etc) in Tabelle 2 kopieren, dh A7(Tab1) - A2(Tab2), B7(Tab1) - C2(Tab2), etc.
danach in tabelle 1 jeweils sieben reihen nach unten und die werte von dort ebenfalls kopieren: A14 - A3, B14 - b2, etc. Wobei in Tabelle 2 immer fortlaufend beschrieben werden soll.

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten aus Tab1 auslesen und in Tab2 listen
01.06.2004 13:11:00
FloGo
Hallo chris
versuchs mal mit folgendem Code:

Sub kopieren()
Dim anz As Long, n As Long
anz = 1
Do
anz = anz + 1
Loop Until IsEmpty(Sheets("Tab2").Cells(anz, 1))
anz = anz - 1
For i = 7 To 6000 Step 7 'hier musst du noch die untere Grenze verändern
'Wenn du auf Tab1 zb. 200 gefüllte Zeilen hast,
'schreibst du 200 statt 6000
anz = anz + 1
Sheets("Tab1").Select
Rows(i).Select
Selection.Copy
Sheets("Tab2").Select
Cells(anz, 1).Select
ActiveSheet.Paste
Next i
End Sub

Du musst überall noch die Tabellennamen ändern (also die ganzen Tab1 & Tab2), die untere Grenze sollte auch noch geändert werden!
Anzeige
AW: Daten aus Tab1 auslesen und in Tab2 listen
Chris
und wie spezifiziere ich aus welcher zelle er wohin kopiert und in welchen abständen?
AW: Daten aus Tab1 auslesen und in Tab2 listen
01.06.2004 14:35:48
FloGo
HALLO chris
nun kannst du die Abstände einstellen:

Sub kopieren()
Dim anz As Long, n As Long, abstand As Integer
Application.ScreenUpdating = False
abstand = InputBox("Geben sie den Zeilen Abstand ein!")
anz = 1
Do
anz = anz + 1
Loop Until IsEmpty(Sheets("Tab2").Cells(anz, 1))
anz = anz - 1
For i = abstand To 60 Step abstand
anz = anz + 1
Sheets("Tab1").Select
Rows(i).Select
Selection.Copy
Sheets("Tab2").Select
Cells(anz, 1).Select
ActiveSheet.Paste
Next i
Application.ScreenUpdating = True
End Sub

So kopiert er die ganze Zeile. Anschließend kannst du ja die Spalten die du nicht brauchst aus der Tab2 löschen! Das sollte doch kein Problem sein?! Das ist ja schnell gemacht!
FloGo
Anzeige
AW: Daten aus Tab1 auslesen und in Tab2 listen
Chris
Bei ca. 1000 Seiten ist das schon ein Problem ;) vor allem weil ich ja aus Spalte A Daten brauch und danach das ganze nochmal für Spalte B (hier dann sogar nach Zeilen unterschieden, dh. B7 nach Tab2B2 und B8 nach Tab2C2.
AW: Daten aus Tab1 auslesen und in Tab2 listen
Chris
also am besten wäre es wie bei dem Script oben mit Eingabe für die Startzelle (spalte, Reihe) und dann eine Eingabe für den Abstand.
AW: Daten aus Tab1 auslesen und in Tab2 listen
01.06.2004 14:48:04
FloGo
Das solltest du bei der Aufgabenstellung erwähnen, und nicht dann wenn der Code schon fertig ist!!!
Also was muss alles veränderbar sein:?
- die Spaltenabstände (in deinem Bsp. 7)
- das Tabellenblatt
- die Spalte (immer nur A & B, oder noch mehr...?)
- was noch...?
Bitte genaue angaben!
FloGo
Anzeige
AW: Daten aus Tab1 auslesen und in Tab2 listen
Chris
Insgesammt habe ich ca. 20 Werte die jeweils ausgelesen werden sollen, diese stehen in festzulegenden Zellen (teilweise in der gleichen Spalte, teilweise in der gleichen Zeile). Der Spaltenbereich geht dabei bis Z.
Am Ende sollte es so aussehn:
Eingabe Startposition (Spalte):
Eingabe Startposition (Reihe):
Eingabe Abstand (Reihe):
Eingabe Abstand (Spalte):
Zielspalte:
Sowohl Zeilen wie auch Spaltenabstand sollten dabei variabel sein.
Tabellenblätter gibt es 2, eines mit der Liste, das andere zur Auswertung wo die ausgelesenen Daten hingeschrieben werden sollen.
bsp: ich gebe als starposition a1, als abstand 3 reihen, 0 spalten und als Zielspalte A ein:
es wird a1 kopiert und in tab2 in die letzte freie zelle in der Spalte A geschrieben.
es wird a4 kopiert und in tab2 in die letzte freie zelle in der Spalte A geschrieben.
Anzeige
NOCH OFFEN
01.06.2004 15:09:23
FloGo
Tut mir leid, aber das ist nur mit ssssseeehhhhrrrr viel aufwand möglich!!!
Hab leider keine Zeit mehr!
FloGo
AW: NOCH OFFEN
chris
na trozdem danke, vll hat ja jemand anders eine idee oder ein script in der schublade ;)

332 Forumthreads zu ähnlichen Themen

Daten aus vielen xls-Datein auslesen
Daniel

Hallo Profis,
ich suche einen VBA-Befehl für folgendes:
Ich habe einen Ordner mit vielen xls-Dateien. Diese sollen nun alle in einer Datei zusammengefahren werden, alle Zeilen, wenn der Wert der 2. Spalte links mit "12345" anfängt.
Geht dies?
Vielen Dank vorab.
Daniel
...
18.08.2008 15:07:01
Thread-ID: 1002621
2 Beiträge
Anzeige
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
Datensätze aus Blatt auslesen
bully

Hallo Leute,
ich möchte mit VBA aus dem Blatt2 ganze Datenzeilen auslesen, wenn diese in der Spalte3 den Wert enthalten, den ich in Blatt3 in Zelle F6 vorgebe. Die Datenzeilen sollen dann in Blatt3 ab Zeile14 eingefügt werden.
Nach etlichen Selbstversuchen gebe ich jetzt auf.
Gruss...
02.09.2008 15:55:27
Thread-ID: 1006842
6 Beiträge
Anzeige
Werte aus Matrix auslesen j. mit richtiger Bsp.
trebor-robert

Hallo,
wie kann ich aus einer Matrix, die in einer separaten Arbeitsmappe (im Beispiel der Bereich Arbeitsmappe "B") liegt, den entsprechenden EUR Betrag auslesen, wenn in der Spalte "C" untereinander in den einzelnen Zeilen die Bemessungsgrösse 1 steht (in diesem Fall qm) und in den Spalt...
05.09.2008 13:33:00
Thread-ID: 1007667
5 Beiträge
von Datum bis Datum suchen und Werte in die Spalte
Datum

Hallo liebe Excel-Könner,
ich habe folgendes Problem und finde keine Lösung.
Ich habe in Spalte A von 2006 bis heute Datum stehen, über eine UserForm möche ich in zwei TextBoxen von bis Datum eintragen und in Spalte B in diesem Bereich den WertX.
Ich hoffe Ihr könnt mir helfen!
...
07.09.2008 09:31:20
Thread-ID: 1007931
8 Beiträge
Werte aus anderem Blatt für ComboBox auslesen
mtremer

Hallo Excel-Freunde,
ich glaub ich werde verrückt.
Meine ComboBox füllt sich nicht mehr. Ich versuche den Code so zu ändern, dass die Quelle für die ComboBox wo anders stehen kann. Im folgenden Code müssen die Werte in der Spalte A der Tabelle1 stehen.
Private Sub Worksheet_Change...
17.09.2008 13:17:34
Thread-ID: 1010349
11 Beiträge
Wert innerhalb Array suchen
David

Hallo VBAler,
wenn ich ein Array in der Form
treffer_n(n)
habe, gibt es da eine schnelle und einfache Möglichkeit zu prüfen, ob ein bestimmter Wert in diesem Array vorhanden ist, oder muss ich alle Werte per Schleife einzeln prüfen lassen?
Gruß
David
19.09.2008 08:48:14
Thread-ID: 1010894
3 Beiträge
Bestimmten Wert in einer Zelle finden
Olli

Hallo,
ich lauf gerade wieder mal mit einem Brett vorm Kopf rum und hoffe, mir kann einer hier helfen.
Ich habe in einer Zelle mehrere Werte stehen, die jeweils durch Semikolon getrennt sind (bis zu 15).
Wie kann ich per VBA eine Schleife erstellen, dass solange nach einem Wert gesu...
19.09.2008 08:54:00
Thread-ID: 1010897
5 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
8
2
5
3
4
7
10
2
4
2
4
4
3
6
1
3
3
6
6
1
4
2
2
4