MS-Office-Forum

Zurück   MS-Office-Forum > Microsoft Office > Microsoft Excel
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads
Themen-Optionen Ansicht
Alt 08.11.2018, 10:02   #1
speednetz
MOF User
MOF User
Standard Excel 2013 - Tabelle2 mit tabelle1 prüfen und fehlende Zeilen einfügen

Hallo zusammen,

Brauche eure Hilfe:

Ich bekomme jeden Morgen eine Tabelle (AS400) mit Daten.
Die werden dann in eine Lehre Tabelle (prüfen) kopiert.
Das geht schon.
Mein Problem sieht folgendermaßen aus:
Ich bekomme mittags eine neue Tabelle (AS400) wo Daten hin zugekommen sind.
Ich möchte nun aber nur die Daten in die Tabelle (prüfen) einfügen die noch nicht vorhanden sind.
Zu prüfen ist das über die Spalte A ab Zeile 3. Die fehlenden Zeilen müssen aber auch sortiert über Spalte A eingefügt werden.
Neu Tabelle einfügen ist nicht möglich da in Tabelle (prüfen) schon Zeilen markiert sind.
Hier mein jetziger Code
Sub kopieren_und_eintragen() ' Einfügen

Sheets("AS400").Select
Range("A3:S1000").Select

Range("A3").Activate
Application.CutCopyMode = False
Selection.Copy
Sheets("Prüfen").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A3").Select
Sheets("AS400").Select
Application.CutCopyMode = False
Range("A3").Select
Sheets("Prüfen").Select
Range("A3").Select

Dim Zelle As Range
For Each Zelle In Range("D3" & Cells(Rows.Count, 1).End(xlUp).Row)
Zelle = UCase(Zelle.Value)
Next Zelle
End Sub
Test Datei habe ich hoch geladen.
Ich hoffe es kann mir jemand helfen.

Gruss Ralf
Angehängte Dateien
Dateityp: xlsm Test.xlsm (135,8 KB, 8x aufgerufen)
speednetz ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.11.2018, 10:36   #2
MisterBurns
MOF Koryphäe
MOF Koryphäe
Standard

Wie soll das über die Spalte A geprüft werden, wenn dort Nummern mehrfach vorkommen?

__________________

Schöne Grüße
Berni
MisterBurns ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.11.2018, 10:42   #3
hubert17
MOF User
MOF User
Standard

Hallo Ralf,

wenn ich es richtig verstanden habe, eigentlich ganz einfach.

Makrorecorder anschmeißen und los geht es.

Markiere im Tabellenblatt "AS400" die gewünschten Datensätze, ist in deinem Makro schon enthalten. Kopieren und am Ende von Tabellenblatt "Prüfen" einfügen.
Nun markierst du in Spalte A von Zeile 3 bis zur letzten Zeile und machst eine Sortierung der Werte nach der Größe aufsteigend.
Danach markierst du von A3 bis S-letzte Zeile und löschst alle Duplikate. Hierbei wählst du nur Spalte A aus. Bei den anderen den Hacken entfernen.
Sortieren und Duplikate entfernen findest du im Reiter Daten.

Das wäre schon fast dein Makro. Nun kannst du noch anstelle von Select die entsprechenden Markierungen mit Range setzen.

__________________

Gruß
Hubert
hubert17 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.11.2018, 10:42   #4
EarlFred
MOF Guru
MOF Guru
Standard

Lösung gelöscht

__________________

Datum und Uhrzeit, Makrorekorder-Code entschlacken, {Matrixformeln}
Tutorials zu Pivottabellen: Kurzeinstieg; Dynamischer Datenbereich; Daten und Zeiten gruppieren
Für 6 meiner Beiträge haben sich die Hilfesuchenden mit einer Spende an Wikipedia, die Tafeln oder Hilfe für krebskranke Kinder eV bedankt (das entspricht 0,044% per 26.07.2018) - eine tolle Geste!

Geändert von EarlFred (08.11.2018 um 11:41 Uhr).
EarlFred ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.11.2018, 11:32   #5
speednetz
Threadstarter Threadstarter
MOF User
MOF User
Standard

Hallo

Habe dein Makro eingefügt leider zeigt es mir einen Fehler

ShowAllData

Die doppelten Nummer müssen auch übernommen werden.

Gruß Ralf
speednetz ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.11.2018, 11:36   #6
EarlFred
MOF Guru
MOF Guru
Standard

Zitat:

Die doppelten Nummer müssen auch übernommen werden.

aha, also eine andere Aufgabe. Und Du meinst, mit diesem lustlos hingerotzten Satz wäre die Aufgabe klar beschrieben?
Du hast ein Problem. Du kannst eine Aufgabe nicht lösen. Du brauchst Hilfe. Und du hast nichtmal Bock, Dein Problem verständlich zu beschreiben, erwartest aber Hilfe?

Gut, da mag sich dann sicher ein anderer drum kümmern.

__________________

Datum und Uhrzeit, Makrorekorder-Code entschlacken, {Matrixformeln}
Tutorials zu Pivottabellen: Kurzeinstieg; Dynamischer Datenbereich; Daten und Zeiten gruppieren
Für 6 meiner Beiträge haben sich die Hilfesuchenden mit einer Spende an Wikipedia, die Tafeln oder Hilfe für krebskranke Kinder eV bedankt (das entspricht 0,044% per 26.07.2018) - eine tolle Geste!

Geändert von EarlFred (08.11.2018 um 11:42 Uhr).
EarlFred ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.11.2018, 11:51   #7
speednetz
Threadstarter Threadstarter
MOF User
MOF User
Standard

Tut mir leid wenn du das so verstehst

Aber ich bin halt ein Anfänger und habe nicht die Erfahrung wie du.
Das betrifft auch die Bschreibung meines Problems.

Gruß Ralf
speednetz ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:18 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

Copyright ©2000-2018 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günter Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.