Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
312to316
312to316
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Suchen und verschieben

Suchen und verschieben
26.09.2003 08:34:39
Andre
Hallo Guten Morgen,
kann mir jemand helfen? Ich möchte in Spalte c den Wert "Herrn" oder "Frau" suchen wenn einer dieser Namen vorhanden ist möchte ich den Inhalt aus Spalte C und D nach A und B verschieben.

vielen Dank Andre

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

Betreff
Datum
Anwender
Anzeige
AW: Suchen und verschieben
26.09.2003 08:50:32
Sven
morgen

versuchs mal mit:

if c$ = "Herr" Or c& = "Frau" then
a$ = c$
b$ = d$
End if

Müßte gehn,wenn ich noicht noch zu müde bin zum denken
AW: Suchen und verschieben
26.09.2003 09:44:04
Beni
Hallo Andre,
probiere es mit diesem Code
Gruss Beni


Sub Suchen_und_verschieben()
'26.09.03 von Bernhard Mächler
For i = 1 To Cells(Rows.Count, 3).End(xlUp).Row
If Cells(i, 3).Value = "Herr" Or Cells(i, 3).Value = "Frau" Then
Cells(i, 3).Cut Destination:=Cells(i, 1)
Cells(i, 4).Cut Destination:=Cells(i, 2)
End If
Next
End Sub

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige