Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1676to1680
1676to1680
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten in anderes Tabellenblatt kopieren

Forumthread: Daten in anderes Tabellenblatt kopieren

Daten in anderes Tabellenblatt kopieren
25.02.2019 11:34:09
Rob
Hallo zusammen,
ich hoffe, dass ihr mir weiterhelfen könnt.
Ich möchte bestimmte Zeilen (Spalte B = #NV) in ein anderes Tabellenblatt kopieren und die Spalte C im Tabellenblatt "Result" mit einem anderen Suffix versehen, welche durch ein Checkbox definiert werden sollen.
Ich habe mal versucht, dass in einer Excelmappe dazustellen.
Habt ihr eine Idee, wie man sowas realisieren kann?
Vielen Dank und viele Grüße
Rwjaws
https://www.herber.de/bbs/user/127901.xlsx
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Daten in anderes Tabellenblatt kopieren
25.02.2019 12:07:48
Daniel
Hi
wie genau stellst du dir denn den Ablauf vor?
soll das automatisch passieren, wenn man auf die Checkboxen klickt?
Gruß Daniel
AW: Daten in anderes Tabellenblatt kopieren
25.02.2019 12:28:56
Daniel
HI
da ich mal davon ausgehe, dass das bei Klick auf die Checkboxen passieren soll, ggf so:
1. kopiere diesen Code in ein allgemeines Modul
2. weise jeder Checkbox über das Kontextmenü dieses Makro zu.
Sub BeiKlick()
Dim shpe As Shape
Dim txt As String
Dim WasTun As String
Dim Zellen As Range
Dim Ziel As Range
With ActiveSheet.Shapes(Application.Caller).OLEFormat.Object
txt = .Caption
WasTun = IIf(.Value = 1, "Hinzu", "Löschen")
End With
Select Case WasTun
Case "Hinzu"
Set Zellen = Sheets("BOM").Columns(2).SpecialCells(xlCellTypeConstants, 16)
Set Ziel = Sheets("Result").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
Zellen.Offset(0, -1).Copy Ziel
Zellen.Offset(0, 1).Copy Ziel.Offset(0, 1)
Ziel.Offset(0, 1).Resize(Zellen.Count).Replace "-01", "-" & txt, xlPart
Case "Löschen"
With Sheets("Result").Columns(2)
.Replace "*-" & txt, True, xlWhole
If WorksheetFunction.CountIf(.Cells, True) Then
.SpecialCells(xlCellTypeConstants, 4).EntireRow.Delete
End If
End With
End Select
End Sub
das Makro erkennt automatisch die angeklickte Checkbox (sofern sie verknüpft ist) und liest deren Text und Wert aus)
Code ist passend für die Beispieldatei, dh mit Fehlerwert als Konstante.
Gruß Daniel
Anzeige
AW: Daten in anderes Tabellenblatt kopieren
25.02.2019 13:36:31
Rob
Hi Daniel,
zunächst: vielen lieben Dank für deine Hilfe!
Ich habe leider vergessen dass zu erwähnen, aber die letzten beiden Zeichnen sollten relativ sein. d.h. sie sind nicht zwangläufig "01", sollen aber trotzdem ersetzt werden.
in einer Formel würde ich es so dastellen, um die letzten beiden Zeichnen anzusprechen:
=rechts(XX;2)
VG
Anzeige
AW: Daten in anderes Tabellenblatt kopieren
25.02.2019 13:47:58
Daniel
Hi
dann probier mal mit beim ersten Replace folgendes:
 Ziel.Offset(0, 1).Resize(Zellen.Count).Replace "-*", "-" & txt, xlPart
müsste funktionieren, wenn im Text nur ein Bindestrich vorkommt, weil hier alles nach dem ersten Bindestrich durch den Text aus der Checkbox ersetzt wird.
Gruß Daniel
Anzeige
AW: Daten in anderes Tabellenblatt kopieren
25.02.2019 14:29:06
Rob
Argh...das ist leider ein Problem, da der Nummernkreis wie folgt ist:
XXXXXXX-XX-XX
;

Forumthreads zu verwandten Themen

Formel komplett aus anderem Blatt übernehmen
martin

Hallo.
In verschiedenen Arbeitsbättern befinden sich exakt die selben Rechnungen, jeweils mit unterschiedlichen Werten.
In einem Master-Blatt möchte ich gerne die Zeilen und Spaltenbeschriftungen, sowie die zu verwenden formeln definieren.
Könnt Ihr mir Tipps geben, wo ich dazu was...
18.06.2009 14:56:18
Thread-ID: 1082618
2 Beiträge
Anzeige
Zeilen in anderes Arbeitsblatt kopieren
Alex

Hallo @ all
ich habe folgendes Problem:
Tabelle 1 enthält eine Vielzahl von Daten. Diese will ich nun filtern und die jeweilige Zeile, die in N "TGA" enthält in Tabelle 2 kopieren.
Ich weiß, dass das Ganze mit wenn(summe... funktioniert, aber vermute, man muss hier feste Zahlen ange...
06.07.2009 11:29:58
Thread-ID: 1086570
7 Beiträge
Kopieren in andere Tabelle
liese

Hallo Forumfreunde!
Bitte um Hilfe zu folgendem Problem:
Bei Doppelklick im Bereich H10:H15 in Tabelle1 (z.B. H7) soll der Zellinhalt nach Tabelle2
in Zelle D5 kopiert werden und der Inhalt zwei Zellen neben dem Doppelklick (J7)
ebenfalls nach Tabelle2 in K10 kopiert werden.
...
19.08.2009 13:20:01
Thread-ID: 1097094
10 Beiträge
variables kopieren in ein anderes Tabellenblatt | Herbers Excel-Forum
Space
Hallo Community
Ich suche einen VBA Code um folgendes Problem mittels Button zu lösen:
ich würde gerne aus einem Tabellenblatt "Tabelle1" von Zeile 14 bis Spalte Q bis zum letzen vorhandenen Eintrag alles koperen und das ganze in das Tabellenblatt "Tabelle2" einfügen. In "Tabelle2" soll es...
15.01.2010 12:12:20
Thread-ID: 1130211
5 Beiträge
Anzeige
nur in bestimmte bereiche reinkopieren
thomas

hallo zusammen,
ich schreibe gerade ein makro, dass über eine inputbox abfrägt, in welchem bereich man zeilen einfügen möchte. das klappt auch super, aber ich will eigentlich nur bestimmte bereiche zulassen. also zum beispiel zwischen a14 und a20. sollte nun einer einen bereich zwischen a1 u...
11.04.2002 10:25:24
Thread-ID: 112349
3 Beiträge
Spalte A in andere Tabelle kopieren
Ben

Hallo,
ich habe folgendes Problem:
zwei Tabellen mit dem gleichen Aufbau, in Spalte A stehen immer Bezeichnungen und in den weiteren Spalten folgen Werte.
Ich versuche nun die Spalte A aller Tabellenblätter der ersten Tabelle (besitzt 41 Tabellenblätter) in die andere Tabelle zu k...
22.01.2010 20:13:26
Thread-ID: 1132034
8 Beiträge
Zeile in anderes Tabellenblatt kopieren
Carle

Hallo zusammen!
Ich würde gerne in einem Arbeitsblatt die Kopfzeile einer Tabelle in ein anderes Tabellenblatt derselben Arbeitsmappe kopieren, und zwar in der Weise, dass bei einer Änderung der Tabellenzeile (z. B. durch Einfügen einer neuen Spalte oder Änderung des Werts einer Zelle) sich...
01.02.2010 20:51:08
Thread-ID: 1134230
3 Beiträge
werte in anderes tabellenblatt mit ; kopieren
Helmut

hallo liebe vba’ler,
noch eine letzte frage für heute:
ich habe ein excel-sheet. In diesem habe ich 5 spalten, in denen sich daten (Zahlen, Worte) befinden. Wie kann ich über ein vba-script diese daten in ein anderes tabellenblatt des sheets kopieren, und zwar so, dass die kopierten dat...
08.03.2010 17:51:04
Thread-ID: 1144386
7 Beiträge
bestimmte Zeilen nach einer Bedingung kopieren
Andre

Hi Leute,
ich werde noch verrückt mit dem code. Ich möchte gerne bestimme Zeilen von einem Sheet ins nächste kopieren, wenn zwei Bedinungen (mit Oder) erfüllt sind.
Leider klappt meine Schleife irgendwie nicht. i müsste bei jedem Durchgang höher gehen um alle 50k Zeilen zu prüfen und z...
09.04.2010 13:38:55
Thread-ID: 1150779
9 Beiträge
Anzeige
Daten in anderes Tabellenblatt kopieren
Werner

Hallo zusammen,
ich möchte Daten von Activen Tabellenblatt in die Tabelle1 kopieren. Ich habe es mit nen Makrorekorter propiert aber ohne Erfolg.
Es sollen im Act. Tabellenblatt die Bereiche:
A1:A30 in die Tabelle1 in die gleichen Zellen (A1:A30) kopiert werden.
C1:A30 in die Ta...
15.09.2010 20:26:28
Thread-ID: 1177919
10 Beiträge
Bestimmte Zeilen (Zellen) kopieren
Patrick

Hallo zusammen,
wäre echt super wenn ihr mir bei der Lösung meines Problems helfen könntet:
Hier erst einmal die Datei (https://www.herber.de/bbs/user/72451.xls).
Ziel ist es, dass bestimmte Zeilen aus dem Blatt "Ausgangsdatei" in das
Tabellenblatt "Ausgabedatei" kopiert werden....
24.11.2010 14:00:17
Thread-ID: 1188513
5 Beiträge
Bei bestimmtem Zellwert Zeilen kopieren
Michael

Liebe Profis!
Ich habe mir mit googlen und Basiskenntnissen ein Makro geschrieben, welches leider nicht funktioniert, und ich komme bei der Analyse selbst nicht mehr weiter.
Folgendes Szenario:
Ich habe eine Datei mit mehreren Sheets(Anzahl kann variieren).
Das letzte Sheet ist...
12.02.2011 10:13:23
Thread-ID: 1200379
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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