Replies

Hi Hans

Thanks for your reply. The search on this site is much better than the MSDN Library CD I have.

Mary

Hi Hans

Thanks for your reply. The search on this site is much better than the MSDN Library CD I have.

Mary

Hi Laura

I don’t know if this will help you. It is in VB6 but should be adaptable to VBA in Excel if it won’t work as is.

Private Function GetLastName(CCUSNM as string)
‘Get last name from CCUSNM
Dim intCommaPosition As Integer

‘Find the comma
intCommaPosition = InStr(1, CCUSNM, “,”)
‘Take left characters up to comma
GetLastName = Left(CCUSNM, intCommaPosition – 1)
End Function

Private Function GetFirstName(CCUSNM as string)
‘Get first name from CCUSNM
Dim intLength As Integer
Dim intCommaPosition As Integer

‘Find the comma
intCommaPosition = InStr(1, CCUSNM, “,”)
‘Length of first name is length of full name – up to comma plus one for space
intLength = Len(CCUSNM) – (intCommaPosition + 1)
‘First name is to the right of the comma
GetFirstName = Right(CCUSNM, intLength)
End Function

Good Luck

Mary

Hi Laura

I don’t know if this will help you. It is in VB6 but should be adaptable to VBA in Excel if it won’t work as is.

Private Function GetLastName(CCUSNM as string)
‘Get last name from CCUSNM
Dim intCommaPosition As Integer

‘Find the comma
intCommaPosition = InStr(1, CCUSNM, “,”)
‘Take left characters up to comma
GetLastName = Left(CCUSNM, intCommaPosition – 1)
End Function

Private Function GetFirstName(CCUSNM as string)
‘Get first name from CCUSNM
Dim intLength As Integer
Dim intCommaPosition As Integer

‘Find the comma
intCommaPosition = InStr(1, CCUSNM, “,”)
‘Length of first name is length of full name – up to comma plus one for space
intLength = Len(CCUSNM) – (intCommaPosition + 1)
‘First name is to the right of the comma
GetFirstName = Right(CCUSNM, intLength)
End Function

Good Luck

Mary

Thanks Rory

That works.

Mary

Caught it . Thanks

Mary

Just what I needed. Thanks a lot.

It Works! Thanks

Mary

Bryon

Almost but not quite.

It is now printing the checkbox window first then the selected sheet.

Mary

Hi Rob,

I tried your changes and found that only sheet 3 will print regardless of what is checked.

Mary

Here is a text file of the above code.

Hey, it worked!

Thanks

Hi Jefferson

Thanks very much for the quick reply. I’ll give it a try.

Mary