How to Display Text on Multiple dropdown content control result

macropod · #1 03-25-2022, 02:46 PM

Quote:

Originally Posted by philip.anthony

I've gone thru those. But not as what I expect. I want to have the coding as follow. But this for single dd content control.

The code in the first link I provided shows how to output to a single content control. If you want to have the same output displayed in multiple content controls, either:
• map those content controls; or
• use VBA code to loop through your "Seats " collection. For example, using the approach in that link:

Code:

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
Dim i As Long, Seats As String
With ContentControl
  If .Title = "Room" Then
    For i = 1 To .DropdownListEntries.Count
      If .DropdownListEntries(i).Text = .Range.Text Then
        Seats = .DropdownListEntries(i).Value
        Exit For
      End If
    Next
    With ActiveDocument.SelectContentControlsByTag("Seats ")
      For i = 1 To .Count
        .Item(i).Range.Text = Seats
      Next
    End With
  End If
End With
End Sub

philip.anthony · #2 03-26-2022, 11:28 PM

Hi Paul,

This approach is good. But, it limits to 255 char. I want to display more than 255 chars. However, I am able to do that. What I need is base on the value of 2nd Drop down & 4th Dropdown, I it to be display in the text box.

I need each selection for Level 3 and value select from level 1, and display text in the text box
eg.
Case "Microsoft Windows"
' I need a validation and Display text differently according to the Brand
' For Each CCtrl In ActiveDocument.ContentControls
' If CCtrl.Tag = "Brand" Then
' Select Case CCtrl.Range.Text
' Case "IBM"
' StrDetails = "IBM Windows"
' Case "DELL"
' StrDetails = "DELL Window"
' Case "HP"
' StrDetails = "HP Windows"
' End Select

I've Attached my Work also. Please review and guide me if the coding is ok.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Content Control values NOT display name	silverspr	Word VBA	9	09-30-2020 07:53 AM
Auto populate a text field based on Content Control Dropdown List	matthias92701	Word VBA	2	05-02-2019 03:54 PM
Content Control DropDown List	gabster	Word VBA	4	04-30-2019 09:53 PM
Dropdown content control and tables	hrzagi	Word	1	12-17-2017 09:38 PM
Content Control Dropdown Dependencies	asteinroeder	Word VBA	5	10-28-2015 03:56 PM