Display of lastname, firstname

[Lars Thomsen Nielsen]

Outlook2000. I have programmed some VBA code that adds names
to the Contacts. My problem is that when I display the
contacts, it is diplayed this way: Lastname, Firstname. I
wish have it displayed: Firstname Lastname.

Here is some of my code. Is it possible to put in a line so
that I get the right display of the contact?

Sub TestContact()
Dim objApp As Outlook.Application
Dim objContact As Outlook.ContactItem

Set objApp = CreateObject("Outlook.Application")
Set objContact = objApp.CreateItem(olContactItem)
With objContact
.FirstName = "Firstname"
.LastName = "Lastname"
.Email1Address = "(e-mail address removed)"
.Save
.Display
End With

Set objContact = Nothing
Set objApp = Nothing
End Sub

 

[Tyler]

You can change the display options of the contacts in
Tools->Options->Contact Options. Change the Default File As to
firstname lastname

 

[Lars Thomsen Nielsen]

"Tyler" <[email protected]> skrev i en meddelelse
| You can change the display options of the contacts in
| Tools->Options->Contact Options. Change the Default File
As to
| firstname lastname

Thanks Tyler. I didn't think of it as a general option, but
that works fine. I thought that I could program it for each
contact I have, but unfortunately not. However I can survive
with the general setting ;-)

Lars