Ich benötige die Formel:
=LINKS(AK2;SUCHEN("_";AK2)-1)
per VBA durchzuführen.Besten Dank fur eure Hilfe.
Gruss
Peter
=LINKS(AK2;SUCHEN("_";AK2)-1)
per VBA durchzuführen.
Sub Formel()
ActiveCell.FormulaR1C1 = "=LEFT(R[-1]C[34],SEARCH(""_"",R[-1]C[34])-1)"
End Sub
Sub Wert_von_links()
Dim strZelle As String
Dim Wert As String
strZelle = Worksheets("Worddaten").Range("AK2")
Wert = Left((strZelle), InStr(1, (strZelle), "_") - 1)
MsgBox Wert
End Sub
Besten Dank für eure Hilfe.Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen