Thema Datum  Von Nutzer Rating
Antwort
Rot Bestimmte Daten in neues Tabellenblatt
17.06.2021 17:53:57 Susanne
NotSolved
17.06.2021 20:56:03 Gast13616
NotSolved
18.06.2021 06:14:56 Susanne
NotSolved
18.06.2021 10:23:09 Susanne
NotSolved
18.06.2021 11:52:56 Gast61002
NotSolved
18.06.2021 13:09:58 Susanne
NotSolved

Ansicht des Beitrags:
Von:
Susanne
Datum:
17.06.2021 17:53:57
Views:
112
Rating: Antwort:
  Ja
Thema:
Bestimmte Daten in neues Tabellenblatt

Hallo zusammen

Ich weiss im Moment noch nicht was ich falsch geschrieben habe, aber beim Kopieren in eine neue Tabelle (Tabelle2) sollen nur Daten reinkopiert werden die noch nicht vorhanden sind. Sollten sich die gleichen Datensätze darin befinden, muss nichts kopiert werden.

Kann mir da jemand einen Tipp geben?

Sub Daten_zu_Datenbank()

Dim Zelle1 As String
Dim Zelle2 As String
Dim Zelle3 As String
Dim Zelle4 As String

Worksheets("Tabelle1").Select
Zelle1 = Range("B3")
Zelle2 = Range("E9")
Zelle3 = Range("E10")
Zelle4 = Range("B14")

Worksheets("Tabelle2").Select
Worksheets("Tabelle2").Range("A3").Select
If Worksheets("Tabelle2").Range("A3").Offset(1, 0) <> "" Then
Worksheets("Tabelle2").Range("A3").End(xlDown).Select
End If

ActiveCell.Offset(1, 0).Select
ActiveCell.Value = Zelle1
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Zelle2
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Zelle3
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Zelle4
ActiveCell.Offset(0, 1).Select



End Sub

lg Susanne


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:

 
 

  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Bestimmte Daten in neues Tabellenblatt
17.06.2021 17:53:57 Susanne
NotSolved
17.06.2021 20:56:03 Gast13616
NotSolved
18.06.2021 06:14:56 Susanne
NotSolved
18.06.2021 10:23:09 Susanne
NotSolved
18.06.2021 11:52:56 Gast61002
NotSolved
18.06.2021 13:09:58 Susanne
NotSolved