Questionario con elenchi a discesa

Hai un problema con Excel?

Nuova discussione

Questionario con elenchi a discesa
di RossiMax (utente non iscritto) data: 14/01/2014 17:55:17
Buongiorno, sono nuovo; devo realizzare un questionario con una parte fissa e 2 parti che si escludono in base all'ultima domanda della parte fissa. Vorrei realizzarlo con delle celle a convalida su un form molto brutale con un pulsante che vada a inserire i valori su un terzo foglio chiamato "database". Non so come inserire il pulsante. Ci sarebbe un altro piccolo problema che alcuni quesiti comportano una risposta multipla da valorizzare (eventualmente però penso di replicare il quesito per tante possibili risposte.
Qualcuno mi può dare una mano. Allego un fac simile del questionario (in verde e azzurro le due porzioni che si escludono)

Avanzamento lavoro
di RossiMax data: 20/01/2014 18:42:34
Sono andato avanti nel lavoro prendendo spunto da codici che ho visto in rete. Ho aggiunto un pulsante che implementa il foglio Database; ho aggiunto alcuni fogli di appoggio. Il codice del pulsante lo allego nel campo codice.

Come lo implemento per far sì che una volta inseriti i dati nel foglio "Database" mi ripulisca i dati della colonna B ???.

Allego nuova versione del questionario.

Public Sub mCopiaTrasponi()

    Dim shQuestionario As Worksheet
    Dim shDatabase As Worksheet
    Dim lRiga As Long
    Dim lng As Long
   
    With ThisWorkbook
        Set shQuestionario = .Worksheets("Questionario")
        Set shDatabase = .Worksheets("Database")
    End With
   
    With shDatabase
        lRiga = .Range("A" & .Rows.Count).End(xlUp).Row + 1
        For lng = 3 To 25
            .Cells(lRiga, lng - 2).Value = shQuestionario.Cells(lng, 2).Value
        Next
    End With
   
   
    Set shQuestionario = Nothing
    Set shDatabase = Nothing
   
 End Sub

di patel data: 21/01/2014 08:07:03
shQuestionario.range("B:B").ClearContents

Vuoi Approfondire?