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

Zellen per VBA vergleichen

Zellen per VBA vergleichen
20.01.2006 11:44:38
Mark
Hallo
Ich würde gerne per VBA zwei Zellen miteinander vegleichen. Heißt: Wenn der Wert aus Tabelle Meier in Zelle A1 mit dem Wert aus Tabelle Schulz in der Zelle A1 übereinstimmt, füge in der Zelle B3 in Tabelle Schneider einen Wert hinzu.
Wirre worte, die glaub ich garnicht so schwer sind, zum umsetzen. Ich habe hauptsächlich ein Problem mit der Syntax.
Über Hilfe wäre ich dankbar
mfg
Mark

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen per VBA vergleichen
20.01.2006 11:55:59
Matthias
Hallo MArk,

If Sheets("Meier").Range("A1") = Sheets("Schulz").Range("A1") Then
Sheets("Schneider").Range("B3") = "gleich"
Else
Sheets("Schneider").Range("B3") = "ungleich"
End If

So?
Gruß Matthias
AW: Zellen per VBA vergleichen
20.01.2006 12:09:33
Jan3
Hi,
Ich weiß zwar nicht, ob Dich richtig verstanden habe!?
Aber ich würde folgenden Code probieren:

Sub test()
Dim n, wert As Long
Dim ws, ws1, ws2 As Worksheet
Set ws = Worksheets("Meier")
Set ws1 = Worksheets("Schulz")
Set ws2 = Worksheets("Schneider")
wert = 1
If ws.Range("A1") = ws1.Range("A1") Then
ws2.Range("B3") = ws2.Range("B3") + wert
End If
End Sub

Jan
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige