Office: Code erkennt Zeichenkette (leerzeichen nicht)

Bördeländer · 8. Juli 2007

Hallo:

habe in einer Zelle folgendes stehen "*****Produktkatalog BSW". Jetzt soll er mir per Schleife die " " zählen..macht er aber nicht!!! (Tabelle stammt aus SAP Anwendung)...per instr Anweisung habe ich heraus gefunden, dass das erste leerzeichen an pos 20 also zwischen den Wörtern Produktkatalog und BSw steht.

WAS sind das VOR Produktkatalog denn für zeichen...**frown.gif* *..bin verzweifelt..da das extrem wichtig ist.

gruß Martin

:)

Sebastian Schulz · 10. Juli 2007

Hallo,

für mich sind das **** (Sternchen) *Smilie

Vll. suchst du nicht nach " " sondern nach Chr(32)

BTW: Du hast noch nie (oder fast nie) abschließendes Feedback auf deine Fragen gegeben

Styrkar · 10. Juli 2007

Mit der Schleife hier kannst du dir die Codes für die Zeichen in dem String ausgeben lassen. Ein Leerzeichen hat den Code 32.

Code:

Sub aru()
Dim strProdukt As String, count As Integer
strProdukt = Range("A1").Value
For count = 1 To Len(strProdukt)
MsgBox "Zeichen :" & Mid(strProdukt, count, 1) & vbNewLine & _
"Code :" & Asc(Mid(strProdukt, count, 1))
Next
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Die Range-Anweisung mußt du natürlich anpassen.

Bördeländer · 10. Juli 2007

btw..sorry....stimmt, immer wenn ich nichts sage ist alles bestens.

Nee..denk dir die sterne als [leer]zeichen

chris-kaiser · 10. Juli 2007

hiho

suche mal nach chr(160)

vielleicht sind es diese Dinger

sowosamma · 10. Juli 2007

Du kannst Dir auch den Ascii-Code jedes Zeichen mit folgendem Code anzeigen lassen:
Code:

Sub zeichen()
Dim strText As String
strText = "*****Produktkatalog BTW"

Dim i As Integer
For i = 1 To Len(strText)
Debug.Print Mid(strText, i, 1), Asc(Mid(strText, i, 1))
Next i
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Dann weißt Du nach was Du suchen mußt

Office: Code erkennt Zeichenkette (leerzeichen nicht)

Code erkennt Zeichenkette (leerzeichen nicht)

Code erkennt Zeichenkette (leerzeichen nicht)

Code erkennt Zeichenkette (leerzeichen nicht)

Code erkennt Zeichenkette (leerzeichen nicht) - Similar Threads - Code erkennt Zeichenkette

Per Hyperlink ausgeblendetes Blatt einblenden

Code wird nicht komplett ausgeführt

Rabat Codes in einen Serienbrief einfügen

Combobox einbinden

VBA Code für Zeilen ausblenden einblenden mit JA/Nein

VBA Code ohne ergebnis

Bild löschen auch wenn es nicht vorhanden ist?! Code funktioniert nicht mehr..