From Listbox to Word

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • esperanto234
    New Member
    • Sep 2009
    • 14

    From Listbox to Word

    Hi, Im using alistbox to insert names in a word document, im' using the following code but it only inserts the first name.


    Code:
    Dim strList1 As String
    strList1 = PODERES.ListBox 1.List(PODERES. ListBox1.ListIn dex)
    ActiveDocument. Bookmarks("p91" ).Range.Text = strList1


    My question is, how can i do to insert ALL items in the listbox in word, the thing is i need them to be separated by comas and the last one by "and". Ex:
    ITEM1, ITEM2, ITEM3 and ITEM4,

    Of course, if theres only 1 item i need the "and" to be deleted. Ex:
    ITEM1

    THANK YOU VERY VEERY MUCH!!
Working...