VBA SPLIT FUNCTION

P

PCC

I need to get the left portion of a variable length string
up to the comma delimiter. I tried the Split function but
apparently I'm not getting it right.
For Example:

Ex1:
The string: "Duck, Donald - 8765"
I want to get "Duck"

Ex2:
The String: "Mouse, Mickey - 3456"
I want to get "Mouse"
 
F

Frank Kabel

Hi
try
sub foo()
Dim str As String
v_str = "Duck, Donald - 8765"
MsgBox Left(v_str, InStr(v_str, ",") - 1)

end sub
 
D

Dana DeLouis

If you wish to use the Split function, here is one way...

Sub Demo()
Dim s As String
s = "Duck, Donald - 8765"
Debug.Print Split(s, ",")(0)

s = "Mouse, Mickey - 3456"
Debug.Print Split(s, ",")(0)
End Sub

returns:
Duck
Mouse
 
T

TH

Don't know what the split function is except to split windows.

One way is to use InStr and search for the comma to get it's position, then
use the LEFT function to extract that many characters - 1.

TH
 
P

pcc

It works
thank you...thank you...thank you... alot
-----Original Message-----
Don't know what the split function is except to split windows.

One way is to use InStr and search for the comma to get it's position, then
use the LEFT function to extract that many characters - 1.

TH



.
Click to expand...
 
D

Dave Peterson

xl2k added Split, join, round (and more??) to its vba arsenal.

Split takes a text string and splits it up based on a chosen character and
returns an array with each piece as a different element.
 
Top