Dropdownlist-Parsing values to various ContentControls

macropod · #4 03-07-2016, 03:21 AM

Perhaps you could explain why you're using a userform to solicit data that then gets input into "into the combobox in my document." The code is designed for direct input into a dropdown content control, not for indirect input into a combobox content control. Indirect input means the content control's 'on exit' event never fires, so you'd have to add code to do that as well.

As for the "multiple values separated by the "|" symbol," what are you trying to do with them? The code you're using was written around the idea that all the output would go into a single text content control, with line breaks between the values. If you want the various values separated by the "|" symbol to be output to different text content controls, rather different code would be needed. For example:

Code:

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
Dim i As Long, StrDetails As String
With ContentControl
  If .Title = "Client" Then
    For i = 1 To .DropdownListEntries.Count
      If .DropdownListEntries(i).Text = .Range.Text Then
        StrDetails = .DropdownListEntries(i).Value
        Exit For
      End If
    Next
    For i = 0 To UBound(Split(StrDetails, "|"))
      ActiveDocument.SelectContentControlsByTitle("Value" & i)(1).Range.Text = Split(StrDetails, "|")(i)
    Next
  End If
End With
End Sub

where the output content controls are titled 'Value0' - 'Value#', where # is the number assigned to the last control to be updated.

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
VBA ppt ComboBox behaivor: 1.OnFocus change value 2. get dropdownlist doesn't disappear after mousec	janism22	PowerPoint	2	03-26-2015 12:35 AM
ActiveDocument.ContentControls(ID) not working	Tejas.T	Word VBA	3	03-09-2015 06:50 PM
Updating grouped ContentControls in Word 2010	MGerhard	Word VBA	3	08-04-2014 02:34 AM
Parsing 'FullName' column - help needed text to column	ScottA	Excel Programming	3	05-06-2014 12:49 PM
XML parsing & Object variable not set (Error 91)	tinfanide	Excel Programming	0	12-29-2011 08:43 AM