ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   VBA SPLIT FUNCTION (https://www.excelbanter.com/excel-programming/295297-vba-split-function.html)

PCC

VBA SPLIT FUNCTION
 
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"

Tim Zych[_7_]

VBA SPLIT FUNCTION
 
Dim str As String
str = "Duck, Donald"
MsgBox Left(str, InStr(str, ",") - 1)

"PCC" wrote in message
...
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"




Frank Kabel

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

end sub

--
Regards
Frank Kabel
Frankfurt, Germany


PCC wrote:
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"


Dana DeLouis[_3_]

VBA SPLIT FUNCTION
 
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

--
Dana DeLouis
Using Windows XP & Office XP
= = = = = = = = = = = = = = = = =


"PCC" wrote in message
...
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"




TH[_3_]

VBA SPLIT FUNCTION
 
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

On 4/16/04 8:38, in article , "PCC"
wrote:

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"



PCC

VBA SPLIT FUNCTION
 
My first time using this passport.
It's great and so is your response
thanx a lot
-----Original Message-----
Dim str As String
str = "Duck, Donald"
MsgBox Left(str, InStr(str, ",") - 1)

"PCC" wrote in

message
...
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"



.


PCC

VBA SPLIT FUNCTION
 
My first time using this passport.
It's great and so is your response
thanx a lot
-----Original Message-----
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

--
Dana DeLouis
Using Windows XP & Office XP
= = = = = = = = = = = = = = = = =


"PCC" wrote in

message
...
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"



.


PCC

VBA SPLIT FUNCTION
 
My first time using this passport.
It's great and so is your response
thanx a lot
-----Original Message-----
Hi
try
sub foo()
Dim str As String
v_str = "Duck, Donald - 8765"
MsgBox Left(v_str, InStr(v_str, ",") - 1)

end sub

--
Regards
Frank Kabel
Frankfurt, Germany


PCC wrote:
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"

.


PCC

VBA SPLIT FUNCTION
 
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

On 4/16/04 8:38, in article 1d7f601c423c0$7bc11180

, "PCC"
wrote:

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"


.


Dave Peterson[_3_]

VBA SPLIT FUNCTION
 
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.


TH wrote:

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

On 4/16/04 8:38, in article , "PCC"
wrote:

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"


--

Dave Peterson



All times are GMT +1. The time now is 04:26 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com