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

Übergabe in ein anderes Tabellenblattt!?

Übergabe in ein anderes Tabellenblattt!?
15.07.2004 10:01:29
Marcel
Hallo
ich habe ein problem:
ich will, dass mir im Tabellenblatt 2 angezeigt wird, wieviele Dateien aus Tabellenblatt 1 in Spalte B "Solved" und in Spalte I "ESD*" stehen haben.
Also beide kriterien müssen erfüllt sein!Also in einer Zeile muss bei B "Solved" und bei I "Esd*" stehen
dankeschön

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Übergabe in ein anderes Tabellenblattt!?
15.07.2004 11:10:31
Roland
Hallo Marcel,
hier ein Ansatz zum Weiterentwickeln:

Sub Marcel()
Dim i As Integer, j As Integer, k As Integer
Sheets("Tabelle1").Activate
If Range("B65536").End(xlUp).Row > Range("I65536").End(xlUp).Row Then
i = Range("B65536").End(xlUp).Row
Else
i = Range("I65536").End(xlUp).Row
End If
For j = i To 1 Step -1
If Range("B" & j).Value = "Solved" And Range("I" & j).Value = "ESD*" Then k = k + 1
Next
Sheets("Tabelle2").Activate
Sheets("Tabelle2").Range("A1") = k & " Übereinstimmungen gefunden!"
End Sub

Viel Spaß
Roland
Anzeige

306 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige