Datum

Titel

20.04.2024 00:49:19

Excel Sheet in einen Excel Kalender einfügen

20.04.2024 00:08:11

In Ordner nur das Speichern von Dateien erlauben

19.04.2024 21:26:15

mehrfache Texte finden

19.04.2024 19:41:34

Bei VBA Ausführung Anzeige einfrieren

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1500to1504

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

VBA Zeichen in String

Forumthread: VBA Zeichen in String
6 Beiträge zu diesem Forumthread
Anzeige
371 Threads zu ähnlichen Themen
VBA Beispiele zu verwandten Themen

Top 100 Forumthreads

25.06.2016 17:21:48

Lukas

Hallo!
Mit InStr() prüfe ich ob mein Text in der Zelle enthalten ist. Wenn ja, möchte ich das Zeichen vor und die beiden Zeichen nach dem Text wissen!
Vielen Dank für eure Hilfe schon im Voraus!

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: VBA Zeichen in String

25.06.2016 17:24:40

Hajo_Zi
AW: VBA Zeichen in String

25.06.2016 17:31:50

Lukas
AW: VBA Zeichen in String

25.06.2016 17:32:55

Hajo_Zi
AW: VBA Zeichen in String

25.06.2016 18:38:31

ransi
AW: VBA Zeichen in String

25.06.2016 19:00:41

Matthias
AW: VBA Zeichen in String

27.06.2016 16:41:20

Lukas

AW: VBA Zeichen in String

25.06.2016 17:24:40

Hajo_Zi

=Mid(Range("A1"), Instr(DeinInstr)-1,1)&Mid(Range("A1"), Instr(DeinInstr)+1,2)

AW: VBA Zeichen in String

25.06.2016 17:31:50

Lukas

Ich bekomme einen Syntaxfehler...

AW: VBA Zeichen in String

25.06.2016 17:32:55

Hajo_Zi

den Fehler kannst Du nur finden oder jemand der neben Dir sitzt. Die sehen den Code.
Gruß Hajo

AW: VBA Zeichen in String

25.06.2016 18:38:31

ransi

Hallo Hajo,
den Fehler kannst Du nur finden oder jemand der neben Dir sitzt. Die sehen den Code.
Falsch!
Ich hab ihn ja auch gefunden! Instr() verlangt mindestens 2 Parameter.
@Lukas,
Versuch mal sowas:
Tabelle1

	A
1	abcdefghijklmnop
2

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

Option Explicit

Sub machs()
    Dim DeinInstr As String
    Dim das_Zeichen_vor_Dem_text As String
    Dim die_2_Zeichen_nach_dem_Text As String

    DeinInstr = "efg"

    das_Zeichen_vor_Dem_text = Mid(Range("A1"), InStr(1, Range("A1"), DeinInstr) - 1, 1)
    die_2_Zeichen_nach_dem_Text = Mid(Range("A1"), InStr(1, Range("A1"), DeinInstr) + Len(DeinInstr), 2)

    MsgBox das_Zeichen_vor_Dem_text & vbCrLf & die_2_Zeichen_nach_dem_Text
End Sub

ransi

AW: VBA Zeichen in String

25.06.2016 19:00:41

Matthias

Hallo! Also Hinweis mal noch. Ihr/Du sollest vor dem ermitteln der Zeichen noch auswerten, ob der zu suchende String nicht am Anfang des Quellstrings anfängt bzw. mind. 2 Stellen vor dem Ende aufhört. Sonst gibt es einen Fehler. VG

AW: VBA Zeichen in String

27.06.2016 16:41:20

Lukas

Oke, danke für den Hinweis!