Thread: [Solved] Assigning Currency values to checkbox with sum presented as part of paragraph
View Single Post
 
Old 07-20-2018, 01:16 PM
macropod's Avatar
macropod macropod is online now Windows 7 64bit Office 2010 32bit
Administrator
  
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,387
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default
It's all in the macro code. Open the document and press Alt-F11 to access the VBA Editor. There you'll see:
Code:
            Case 2 'The 1st row of formfields
              Select Case c  'The columns of formfields
                Case 2: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 9000
                Case 4: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 4500
                Case 6: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 6000
                Case 8: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 3000
              End Select
            Case 3 'The 2nd row of formfields
              Select Case c  'The columns of formfields
                Case 2: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 8000
                Case 4: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 6000
                Case 6: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 4000
                Case 8: If .Range.FormFields(1).CheckBox.Value = True Then i = i + 2000
Simply edit the values to suit (no formatting).
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote