Assigning Values to content control checkboxes and calculating results

nuraish · #1 08-17-2021, 10:59 PM

Hi, need to assign values to the checked boxes (5-1 as the rating points) and calculate the sum of total performance evaluation. How do i assign using macro?

gibra · #2 08-18-2021, 03:14 AM

I'm not sure what you intend with SUM, because Checkboxes are True o False.Did you mean Count, instead?

However you can discovery the value of each checkbox with this code:

Code:

Option Explicit


Sub Esamina()
    Dim n As Long
    Dim s As ContentControl
    For Each s In ActiveDocument.ContentControls
        n = n + 1
        Debug.Print n, s.ID, s.Checked
    Next
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Assigning Macro to Drop Down list Content Control	aussiew	Word VBA	5	03-10-2019 02:55 PM
Assigning values to form fields and calculating results	AustralianKate	Word Tables	10	05-15-2018 10:53 PM
Content Control Checkboxes	wlcdo2	Word VBA	3	01-05-2017 05:52 PM
Assigning values to formfield checkboxes in a table	mammiano	Word Tables	13	01-12-2015 06:27 AM
Assigning Values to content control checkboxes and calculating results	creative cathy	Word Tables	13	10-07-2012 08:52 PM