Solved

How do I hide certain text until a Text Content Control box is Modified?

Posted on 2009-04-10
8
672 Views
Last Modified: 2012-05-06
I am creating a customized form for printing labels.  I have 5 cells on the page.  On the bottom of each cell there is a Line of Text that I want to display for each label (footer for each cell).  However I would not like to waste a label should the Text controls are not used.  Is there any way to have conditions where if the Text Controls are not modified, their respective "footer" line is not displayed?
0
Comment
Question by:cgsolutions
  • 4
  • 3
8 Comments
 
LVL 19

Expert Comment

by:dlc110161
ID: 24138763
Could you post an example form for me to test with?

Thanks.

Dawn Bleuel
Word MVP
0
 

Author Comment

by:cgsolutions
ID: 24142266
Here you go... Thanks.
0
 

Author Comment

by:cgsolutions
ID: 24142757
I guess ee doesn't like dotx files...
sample.docx
0
Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 
LVL 19

Expert Comment

by:dlc110161
ID: 24148877
Is there a reason you have 6 content controls per label? You can set it so that it allows multiple paragraphs.

Hiding the text would be much easier if two things are done. 1. Only one content control per label. 2. The text to be hidden is a unique style - preferably using the same prefix incremented with a number ie. Label1, Label2, etc.

Dawn Bleuel
Word MVP
0
 

Author Comment

by:cgsolutions
ID: 24148985
The reason I have 6 content controls is because I want to limit the amount of lines the user can have to 6 and also have the text in a specific position.  Would there be a way to have one content label while acheiving the same results?  Labeling the content controls is not a problem, they can be whatever name that will suit the needs for this.
0
 
LVL 19

Accepted Solution

by:
dlc110161 earned 500 total points
ID: 24151489
I'll let you test this out. I've tested, but I'm not sure how you are going to use it, so you will need to execute the macro to test. At some point, I am sure that you will want to attach the code to some event such as the Print command.

Anyway, give it a whirl and let me know.

If you need help installing the macro, see http://word.mvps.org/FAQs/MacrosVBA/CreateAMacro.htm

Dawn Bleuel
Word MVP
Sub HideCell()
Dim rDcm As Range
Set rDcm = ActiveDocument.Range
Dim cc As ContentControl
Dim oRowe As Integer
Dim i As Integer
On Error GoTo EH
 
Selection.HomeKey Unit:=wdStory
With Selection
    If .Information(wdWithInTable) Then
        oRowe = .Information(wdEndOfRangeRowNumber)
        For Each cc In ActiveDocument.ContentControls
            If cc.Range.Text <> cc.PlaceholderText Then
                rDcm.Tables(1).Rows(oRowe).Select
                i = i + 1
                Debug.Print oRowe
            Else
                rDcm.Tables(1).Rows(oRowe).Select
                Debug.Print oRowe
                If i = 1 Then .Font.Hidden = True
                i = i + 1 'Increment cc
                    If i = 6 Then
                        i = 1 'Reset cc
                        oRowe = oRowe + 1
                    End If
            End If
        Next
        oRowe = oRowe + 1
    End If
End With
 
'Handle Errors Gracefully
Exit_EH:
    Exit Sub
 
EH:
    Select Case Err.Number
        Case 5941
            Resume Exit_EH
        Case Else
            MsgBox Err.Number & ": " & Err.Description
            Resume Exit_EH
    End Select
 
End Sub

Open in new window

0
 

Author Comment

by:cgsolutions
ID: 25117039
Thanks will try it out.
0

Featured Post

Free Tool: Port Scanner

Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
add more styles to my code 2 52
List of 'object codes' used by Find/Replace in Word 4 33
Copy cell to another cell in another table 5 63
Microsoft Word startup Issue 7 35
When creating Microsoft Word-based forms there may be a need to have a form field repeated throughout the whole document. For instance, with a company name, you may want this information repeated automatically throughout the document rather than man…
A few years ago I was very much a beginner at VBA, and that very much remains the case today.  I'll do my best to explain things as I go in the hope that other beginners can follow.  If you just want to check out a tool that creates a Select Case fu…
This video teaches the viewer how to align pictures around text while keeping the text properly aligned in the document.
Learn how to create and modify your own paragraph styles in Microsoft Word. This can be helpful when wanting to make consistently referenced styles throughout a document or template.

830 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question