Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 5 su 5

sommare bookmark in word

  1. #1
    marco61 non è in linea Scolaretto
    Post
    124
    Like Inviati  
    0
    Like Ricevuti  
    0
    Ciao a tutti, sto lavorando ad un questionario creato in Word, per ogni domanda vi sono tre possibili risposte; ho usato, per ogni risposta, tre option button raggruppati con lo stesso GroupName.
    A seconda della risposta che si da, ho creato questo codice che va ad inserire, tramite Bookmarks, il valore 0 o 1 in una tabella riepilogativa;
    Private Sub OptionButton1_Click()
     Bookmarks("A11").Select
     Selection.TypeText Text:="1"
     Bookmarks("B11").Select
     Selection.TypeText Text:="0"
     Bookmarks("C11").Select
     Selection.TypeText Text:="0"
    End Sub
    
    Private Sub OptionButton2_Click()
     Bookmarks("B11").Select
     Selection.TypeText Text:="1"
     Bookmarks("A11").Select
     Selection.TypeText Text:="0"
     Bookmarks("C11").Select
     Selection.TypeText Text:="0"
    End Sub
    
    Private Sub OptionButton3_Click()
     Bookmarks("C11").Select
     Selection.TypeText Text:="1"
     Bookmarks("A11").Select
     Selection.TypeText Text:="0"
     Bookmarks("B11").Select
     Selection.TypeText Text:="0"
    End Sub
    
    questo per ogni singola risposta.
    Lo scopo della tabella riepilogativa e quello di sommare le tre colonne per la valutazione finale.
    Ora, tramite un pulsante, vorrei inserire la somma delle tre colonne in tre differenti celle, il problema è che non sono riuscito a trovare il sistema di prendere i valori dei bookmark e sommarli.
    Grazie per l'aiuto

  2. #2
    L'avatar di willy55
    willy55 non è in linea Scribacchino
    Post
    730
    Like Inviati  
    0
    Like Ricevuti  
    0

  3. #3
    roccolamann non è in linea Scribacchino
    Post
    519
    Like Inviati  
    0
    Like Ricevuti  
    0
    Ciao Marco61
    Ho visto il tuo quesito; non ci ho capito molto, ma penso che forse il problema dipende dal fatto che
    quando selezioni il segnalibro all'interno del documento WORD con l'istruzione
    Bookmarks("A11").Select
    
    e poi vi inserisci il dato:
    Selection.TypeText Text:="1"
    
    per recuperare il dato scritto per inserirlo nella tabella
    devi conservare il segnalibro
    Io proverei così:
    Selection.GoTo What:=wdGoToBookmark, Name:="A11"                                  'seleziono il segnalibro
      Selection.Delete Unit:=wdCharacter, Count:=1
        Selection.InsertAfter "1"                                                                            'Inserisco la cifra
     ActiveDocument.Bookmarks.Add Range:=Selection.Range, Name:="A11"        'Conservo il segnalibro per l'uso successivo
    
    Saluti.

  4. #4
    marco61 non è in linea Scolaretto
    Post
    124
    Like Inviati  
    0
    Like Ricevuti  
    0
    Grazie mille per le risposte, ho risolto in questo modo:
    ho sostituito il codice per inserire il dato nella singola casella
     Bookmarks("A11").Select
    FormFields("A11").Result = 1
    
     Bookmarks("B11").Select
     FormFields("B11").Result = 0
    
     Bookmarks("C11").Select
     FormFields("C11").Result = 0
    
    (ho dovuto utilizzare dei moduli perchè il documento è protetto), poi per effettuare la somma delle tre colonne, in un pulsante ho inserito
    Bookmarks("SBA").Select
    FormFields("SBA").Result = Val(FormFields("A31").Result) + Val(FormFields("A41").Result) + Val(FormFields("A51").Result) ........
    
    Bookmarks("SBB").Select
    FormFields("SBB").Result = Val(FormFields("B31").Result) + Val(FormFields("B41").Result) + Val(FormFields("B51").Result) .......
    
    Bookmarks("SBC").Select
    FormFields("SBC").Result = Val(FormFields("C31").Result) + Val(FormFields("C41").Result) + Val(FormFields("C51").Result) ........
    
    dove SBA, SBB e SBC sono i subtotali della colonna A, B e C, flaggando "calcola in uscita" nelle opzioni del campo testo

  5. #5
    roccolamann non è in linea Scribacchino
    Post
    519
    Like Inviati  
    0
    Like Ricevuti  
    0
    Perfetto.
    Sono contento che tu abbia risolto il problema.

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Da ACCESS a BookMark Word
    Da fabinger nel forum Microsoft Access
    Risposte: 3
    Ultimo Post: 30-10-2020, 04:08
  2. Problemi con popolamento bookmark word da access
    Da Endar nel forum Microsoft Access
    Risposte: 1
    Ultimo Post: 30-03-2019, 19:11
  3. utilizzare bookmark in VBA excel per importare in Word
    Da andrealbg nel forum Microsoft Excel
    Risposte: 2
    Ultimo Post: 14-04-2015, 14:09
  4. Utilzzare i Bookmark all'interno di Word con vb 2010
    Da GRANDEANTONIO nel forum Visual Basic .Net
    Risposte: 4
    Ultimo Post: 06-05-2011, 17:55
  5. [Word] Cambiare il bookmark di un formfield
    Da tinde19 nel forum Microsoft Word
    Risposte: 1
    Ultimo Post: 17-02-2009, 12:36