Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x in andere Spalte
Autor: minimalist
Datum: 18.08.17 14:14
OK dieser code hilft dann vielleicht: 1) Hier habe ich mir einen button eingefügt Private Sub CommandButton1_Click() Dim i As Long Dim str As String Dim pos As Integer Dim resultstring As String ' cycle durch alle cellen in erster column For i = 1 To Rows.Count If Not IsEmpty(Cells(i, 1).Value) Then str = Cells(i, 1).Value 'finde value If Len(str) > 10 Then 'bedingung das der value eine gewisse länge hat, nur testing hier pos = InStrRev(str, "\fs") 'finde den index des substrings("\fs" resultstring = Right(str, Len(str) - pos + 1) ' benutze den reststring Cells(2, 2).Value = resultstring 'in cell(2,2) copieren testing o.k. End If End If Next i End Sub

Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x in ...	1.602	FrankAs	18.08.17 07:15
Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x...	1.134	minimalist	18.08.17 08:33
Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x...	997	FrankAs	18.08.17 09:29
Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x...	985	FrankAs	18.08.17 11:21
Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x...	1.156	minimalist	18.08.17 13:15
Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x...	1.111	minimalist	18.08.17 14:14
Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x...	990	Blackbox	18.08.17 20:07
Re: Zeichenfolge in Zelle suchen, wenn gefunden: ab Stelle x...	1.006	effeff	18.08.17 21:16

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen