Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
116to120
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
116to120
116to120
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Was ist das?

Was ist das?
26.04.2002 09:18:13
Ron
Hallo Wissende, ich wüsste gerne was dieser Code genau macht und wie man ihn umschreiben kann, so dass er mir aus zwei Worksheets(nämlich einem alten und einem update davon)einen dritten Worksheet erstellt der die Gleichanteile sowie neue Zeilen des zweiten Worksheets enthält. Dank an alle Helfer.

Sub Vergleich2()
Dim i As Integer
Dim J As Integer
For i = 1 To Worksheets("Tabelle2").Cells(Rows.Count, 2).End(xlUp).Row
For J = 1 To Worksheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row
If Worksheets("Tabelle1").Cells(J, 1).Cells = Worksheets("Tabelle2").Cells(i, 1) Then
Worksheets("Tabelle1").Rows(J).Copy _
Destination:=Worksheets("Tabelle3").Range("A" & Worksheets("Tabelle3").Cells(Rows.Count, 1).End(xlUp).Row + 1)
End If
Next J
Next i
End Sub

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Was ist das?
26.04.2002 09:39:32
Stefan
Hallo, man muss einfach das Master-Worksheet mit dem anderen Workscheet via Schleife vergleichen und in dem 3.ausgeben, ungefähr so: dim SV as string dim SVRef as string workbooks(DATEI).sheets(1).activate Letzte1 = Workbooks(DATEI).Sheets(1).UsedRange.Rows.Count workbooks("Test").sheets(2).activate Letzte2 = Workbooks(DATEI).Sheets(2).UsedRange.Rows.Count for i = 1 to letzte1 SV = workbooks(Datei).sheets(1).cells(x,y).value for j = 1 to letzte2 SVRef = workbooks(Datei).sheets(2).cells(x,y).value if SV = SVRef then workbooks(Datei).sheets(3).cells(x,y).value = SV end if next j next i
Re: Was ist das?
26.04.2002 09:55:50
Ron
Vielen Dank Stefan!-aber irgendwie bekomm ich die Meldung "Außerhalb des gültigen Bereichs". Tut mir echt leid aber bin ein absoluter Newbie
Anzeige
Re: Was ist das?
26.04.2002 10:35:44
Ron
Index außerhald des gültigen Bereichs-was heisst das??

111 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige