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

Zelleninhalte vergleichen und übertragen

Zelleninhalte vergleichen und übertragen
05.04.2003 12:25:06
Rolf St

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Zelleninhalte vergleichen und übertragen
05.04.2003 12:47:55
Ramses

Hallo,

das sollte es in etwas sein:


Option Explicit

Sub Replace_MainData()
Dim Cr As Long, CC As Integer, i As Integer
Dim wks1 As Worksheet, wks2 As Worksheet
Dim Mr As Variant, Wr As Variant, Mf As Variant, Ff As Variant
Set wks1 = Worksheets("Stammdaten")
Set wks2 = Worksheets("Klasseneinteilung")
Mf = wks2.Range("M2")
Ff = wks2.Range("M3")
Mr = wks2.Range("N2")
Wr = wks2.Range("N3")
Cr = 65536
CC = 4
If wks1.Cells(Cr, CC) = "" Then
    Cr = wks1.Cells(Cr, CC).End(xlUp).Row
End If
For i = 1 To Cr
    If UCase(wks1.Cells(i, CC)) = UCase(Mf) Then
        wks1.Cells(i, CC) = Mr
    ElseIf UCase(wks1.Cells(i, CC)) = UCase(Ff) Then
        wks1.Cells(i, CC) = Wr
    End If
Next i
End Sub 

     Code eingefügt mit Syntaxhighlighter 1.16

Gruss Rainer

Anzeige
Re: Zelleninhalte vergleichen und übertragen
05.04.2003 12:50:35
th.heinrich

hallo Rolf,

"Nun möchte ich, das diese Buchstaben mit Tabellenblatt Klasseneinteilung Zelle M2 (für m) und M3 (für w) verglichen werden und bei m der Wert aus Zelle Tabellenblatt Klasseneinteilung N2 und bei w der Wert aus Zelle Tabellenblatt Klasseneinteilung N3 wieder nach Spalte D in die jeweilige Zelle eingefügt wird."

das verstehe ich ueberhaupt nicht. warum der umweg ueber M2, M3 ??

der eintrag in D ist sowieso nicht moeglich, weil sich ein ZIRKELBEZUG ergibt, also hilfsspalte.

mit DATEN-GÜLTIGKEIT kannst Du fehleingaben in D verhindern.

gruss thomas

Re: Zelleninhalte vergleichen und übertragen
05.04.2003 12:56:26
Rolf St

Hallo Rainer!

Vielen Dank!

Genau das habe ich gesucht!

Tschüß
Rolf

Anzeige
Re: Zelleninhalte vergleichen und übertragen
05.04.2003 12:59:05
Rolf St

Hallo Thomas!
Vielen Dank für deine Hilfe!

Ramses hat mir bereits geholfen!

Tschüß
Rolf

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige