Results 1 to 18 of 18

Thread: Word Optionbutton Calculations

Threaded View

Previous Post Previous Post   Next Post Next Post
  1. #4
    VBAX Regular
    Joined
    Apr 2018
    Posts
    50
    Location
    Quote Originally Posted by gmaxey View Post
    One of Paul's suggestions, but if you really want to use option buttons then something like this:

    Private Sub OptionButton0_Click()
      If OptionButton0 Then
        Selection.Tables(1).Cell(1, 1).Range.Text = "Scorre = 0"
      End If
    End Sub
    Private Sub OptionButton1_Click()
      If OptionButton1 Then
        Selection.Tables(1).Cell(1, 1).Range.Text = "Scorre = 25"
      End If
    End Sub
    Private Sub OptionButton2_Click()
      If OptionButton2 Then
        Selection.Tables(1).Cell(1, 1).Range.Text = "Scorre = 50"
      End If
    End Sub
    Private Sub OptionButton3_Click()
      If OptionButton3 Then
        Selection.Tables(1).Cell(1, 1).Range.Text = "Scorre = 75"
      End If
    End Sub

    Yes thanks. what if i add one more table and rows and columns to this table and a different number say like 20. will it be such as:
    Private Sub OptionButton3_Click()
    If OptionButton3 Then
    Selection.Tables(2).Cell(1, 1).Range.Text = "Scorre = 20"
    End If
    End Sub


    like Selection.Table (2). Cell(2,2) = "Score = 20"

    and last but not least what to do if i want to get the total of both tables at the bottom of the tables.

    thank u so much this helps me out a whole lot
    Last edited by Ladyj205; 04-04-2018 at 07:52 AM.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •