Inser text automaticly based on a selection is a Drop Down Active X Control

[PointCheck]

I have a 2 questions:

1. How do I add the following selections (Akron Cincinnati, Columbus, Dayton , Youngstown) to a Combo Box(ActiveX Control)?
2. Based on a selection in the above Combo Box(ActiveX Control of either Akron, Cincinnati, Columbus, Dayton, Youngstown. Populate five different Text Box(ActiveX control)?

For example, If I select "Akron" in the Combo Box(ActiveX Control)? The following Text Boxes(ActiveX controls) would populate. see below

Combo Box 1 = Akron
Text Box 1 = Kim Lee
Text Box 1 = 123 No Name Street
Text Box 1 = Cols, Oh 45623
Text Box 1 = 214-567-8954
Text Box 1 = klee@msn.com



Any assistance would be great.

[macropod]

One would have to ask why you're using an ActiveX Control for this. Unlike content controls and formfields, ActiveX Controls require a macro to populate them every time the document is opened. For a content control solution, see:
https://www.msofficeforums.com/word-...html#post46903
and, for different elements from a selected item to be output to different content controls, see:
https://www.msofficeforums.com/word-...tml#post120392

[PointCheck]

I put the example in my form. When I add new dropdown boxes and select the example I get am error in the code (Orange section). Can you assist?

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
Dim i As Long, StrDetails As String
With ContentControl
If .Title = "MBACRegion" Then
For i = 1 To .DropdownListEntries.Count
If .DropdownListEntries(i).Text = .Range.Text Then
StrDetails = Replace(.DropdownListEntries(i).Value, "|", Chr(11))
Exit For
End If
Next
ActiveDocument.ContentControls(2).Range.Text = StrDetails
End If
End With
End Sub

[macropod]

Do you have a second (text) content control in the document for the output to go to?