Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
372to376
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
372to376
372to376
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

VBA: Textteile selektieren

VBA: Textteile selektieren
28.01.2004 12:18:32
HanniMaus
Mein Problem stellt sich wie folgt dar!
Ich habe eine Tabelle mit mehreren Spalten. In der dritten Spalte steht unterschiedlicher Text. Ich möchte nun alle Zeilen in der in der dritten Spalte Z.B Ausfallzeit vorkommt in ein neues Tabellenblatt kopieren. Nun weiß ich nicht wie ich das als Makro programmieren kann. Da die Texte in der Zelle immer an verschiedenen Stellen stehen.
Kann mir da jemand weiterhelfen???
DAnke!

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA: Textteile selektieren
28.01.2004 14:41:49
Beni
Hallo Hanni,
aktiviere den Wert, den Du übetragen willst, alle Zeilen mit diesem Wert werden in Tabelle2 übertragen.
Gruss Beni

Sub Daten_übertragen()
Wert = ActiveCell
For i = 1 To Cells(65536, 3).End(xlUp).Row
If Cells(i, 3) = Wert Then
With Sheets(2)
r = .Cells(65536, 1).End(xlUp).Row + 1
s = Cells(i, 255).End(xlToLeft).Column
Range(Cells(i, 1), Cells(i, s)).Copy Destination:=.Cells(r, 1)
End With
End If
Next i
End Sub

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige