How to remove leading space for values converted to strings

Support for Office 2003 has ended

Microsoft ended support for Office 2003 on April 8, 2014. This change has affected your software updates and security options. Learn what this means for you and how to stay protected.

This article was previously published under Q290359
This article has been archived. It is offered "as is" and will no longer be updated.
The Microsoft Visual Basic for Applications Str() function returns thestring representation of a numeric value represented as (n). Positivenumbers and zeros are converted to a string with a leading space character.

This article discusses methods that can be used to remove the leadingspace for values converted to strings.
Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. The following macro code sample converts a numeric value to a stringvalue. The variable "lastName" is then joined with "empcode" and stored inthe variable "license":
lastName = "Peterson"empcode = Str(1234)license = lastName & empcode 'Result is: Peterson 1234				
The following macro code sample converts a numeric value to a stringvalue, and then removes the leading space that was automatically added byStr() using the LTrim$() function. The variable "lastName" is then joinedwith "empcode" and stored in the variable "license":
lastName = "Peterson"empcode = Str(1234)empcode = LTrim$(empcode)license = lastName & empcode 'Result is: Peterson1234				
In Visual Basic for Applications, you can convert numeric valuesto string values with the Visual Basic for Applications CStr() function.The function drops the leading space automatically without the need forusing the Trim$() function, as in the following example:
lastName = "Peterson"empcode = CStr(1234)license = lastName & empcode 'Result is: Peterson1234				
The Str() function is used to convert a numeric value to a string. Thiscan be useful when you use the MsgBox statement to concatenate text and anumeric variable. Note that the leading space that is generated by theStr() function makes it unnecessary to add an extra space between the twovalues in the MsgBox statement. For example:
sValue = Str(457)MsgBox "Total sales equal" & sValue' Result is: Total sales equal 457				
The correct syntax for concatenating text and the contents of a numericvariable is as follows:
MsgBox "Total sales equal " & 457' Result is: Total sales equal 457				
MsgBox "Total sales equal" & Str(457)' Result is: Total sales equal 457				
MsgBox "Total sales equal " & CStr(457)' Result is: Total sales equal 457				
OfficeKBHowTo offcon vba vbe vb inf OFFXP

Article ID: 290359 - Last Review: 12/06/2015 00:47:32 - Revision: 5.5

Microsoft Office Excel 2003, Microsoft Excel 2002 Standard Edition, Microsoft Excel 2000 Standard Edition, Microsoft Excel 97 Standard Edition, Microsoft Excel 2004 for Mac, Microsoft Excel X for Mac, Microsoft Excel 2001 for Mac, Microsoft Excel 98 for Macintosh, Microsoft Office Word 2003, Microsoft Word 2002, Microsoft Word 2000, Microsoft Word 97 Standard Edition, Microsoft Word 2004 for Mac, Microsoft Word X for Mac, Microsoft Word 2001 for Mac, Microsoft Word 98 for Macintosh, Microsoft Office PowerPoint 2003, Microsoft PowerPoint 2002 Standard Edition, Microsoft PowerPoint 2000 Standard Edition, Microsoft PowerPoint 97 Standard Edition, Microsoft PowerPoint 2004 for Mac, Microsoft PowerPoint 2001 for Mac, Microsoft PowerPoint X for Mac, Microsoft PowerPoint 98 for Macintosh, Microsoft Office Access 2003, Microsoft Access 2002 Standard Edition, Microsoft Access 2000 Standard Edition, Microsoft Access 97 Standard Edition

  • kbnosurvey kbarchive kbhowto KB290359