| | Post: 1 | Registrato il: 05/12/2003
| Utente Junior | 2007 | | OFFLINE | |
|
06/06/2017 19:04 | |
Ciao a tutti,
faccio parte di una onlus e stiamo cercando di migliorare la gestione dei ns volontari.
Mi spiego:
Ho un database degli associati nel quale dovremmo aggiungere delle specializzazioni. C'è un modo per visualizzare un elenco delle specializzazioni in questione, spuntarle man mano e infine visualizzarle in anagrafica?
Dato che non capisco come si inseriscono le img cerco di spiegare:
Nome Caio
Specializzazione Pompiere - Patente C
Nome Sempronio
specializzazione Pompiere
Nome Tizio
Specializzazione Patente C - Brevetto Sub
Tutte le specializzazione vorrei elencarle in un foglio della cartella di lavoro e visualizzarle mediante un elenco di spunta, quel quadratino con la spunta a V per capirci.
Scusate se non so spiegarmi meglio abbiate pietà! :)
[Modificato da demo911 06/06/2017 19:11] |
|
| | Post: 3.266 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
06/06/2017 21:31 | |
Ciao Demo
Aiutaci ad aiutarti.
Allega un file di esempio con dati fittizi, spiegazione con riferimento ai dati ed inserisci a mano il risultato che vuoi ottenere.
Alfredo |
| | Post: 1 | Registrato il: 05/12/2003
| Utente Junior | 2007 | | OFFLINE | |
|
07/06/2017 09:14 | |
Vi metto 2 img vediamo se da lì possiamo partire a capirci.
Nel foglio associati c'è il riepilogo, nel foglio specializzazioni c'è la lista delle stesse.
In pratica vorrei "costruire" un form di inserimento associati dove la lista delle specializzazioni siano spuntabili in modo che se un volontario ha, per esempio 6/7 specializzazioni queste vengano elencate nella stessa cella.
Mi son spiegato un pò meglio?
Grazie del vostro aiuto :) |
| | Post: 1.390 | Registrato il: 06/04/2013
| Utente Veteran | 2010 | | OFFLINE |
|
07/06/2017 09:36 | |
Ciao
dovresti utilizzare una userform con una listbox in multiselect, cioè che ti permette di selezionare più specializzazioni per poi riportarle sul tuo foglio.
Questo si fa con delle macro.
Hai qualche conoscenza del vb?
Comunque sarebbe meglio che tu allegassi un file di esempio (non immagini) per evitare di doversi ricostruire la tua situazione.
saluti
Domenico
Win 10 - Excel 2016 |
| | Post: 2 | Registrato il: 05/12/2003
| Utente Junior | 2007 | | OFFLINE | |
|
07/06/2017 12:27 | |
dodo47, 07/06/2017 09.36:
Hai qualche conoscenza del vb?
Sto facendomi una cultura online con tutti voi generosi dispensatori di sapere. :)
Comunque sarebbe meglio che tu allegassi un file di esempio (non immagini) per evitare di doversi ricostruire la tua situazione.
Hai ragione provvedo subito
Ho iniziato a mettere su qualcosa ma per quanto riguarda codice vba ancora niente, quello devo ancora iniziare a vederlo :)
[Modificato da demo911 07/06/2017 12:28] |
| | Post: 3 | Registrato il: 05/12/2003
| Utente Junior | 2007 | | OFFLINE | |
|
07/06/2017 13:00 | |
dodo47, 07/06/2017 09.36:
Ciao
dovresti utilizzare una userform con una listbox in multiselect, cioè che ti permette di selezionare più specializzazioni per poi riportarle sul tuo foglio.
Questo si fa con delle macro.
Questo il file aggiornato con l'aggiunta delle listbox che dicevi.
Sono sulla strada giusta?
|
| | Post: 3.270 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
07/06/2017 13:30 | |
Ciao Demo
Ti riallego il tuo file con le seguenti macro inserite nella userform Anagrafica
La prima serve a "pulire" la maschera dai dati in precedenza immessi e la seconda (abbinata al pulsante Inserisci ad immettere i dati sul foglio Associati
vb Private Sub UserForm_Initialize()
Dim i As Integer
Me.Cognome.Value = ""
Me.Nome.Value = ""
Me.Cellulare.Value = ""
Me.Email.Value = ""
For i = 1 To 6
Me.Controls("checkbox" & i).Value = False
Next i
End Sub
vb Private Sub CommandButton1_Click()
Dim ur As Long
Dim i As Integer
Dim specializzazioni As String
ur = Sheets("Associati").Cells(Rows.Count, 1).End(xlUp).Row
Cells(ur + 1, 1).Value = Now
Cells(ur + 1, 2).Value = Me.Cognome.Value
Cells(ur + 1, 3).Value = Me.Nome.Value
Cells(ur + 1, 4).Value = Me.Cellulare.Value
Cells(ur + 1, 5).Value = Me.Email.Value
For i = 1 To 6
If Me.Controls("checkbox" & i).Value = True Then
specializzazioni = specializzazioni & ", " & Me.Controls("checkbox" & i).Caption
End If
Next i
Cells(ur + 1, 6).Value = Mid(specializzazioni, 2, 50)
End Sub
Poi c'è la macro per visualizzare la maschera abbinata ad un pulsante presente sul foglio Associati
vb Public Sub Inizia()
anagrafica.Show
End Sub
Fai sapere.
Alfredo |
| | Post: 3.271 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
07/06/2017 13:32 | |
Ho visto che hai allegato un nuovo file diverso dal primo.
Ma le specializzazioni di un nominativo possono essere diverse da comune e regione Lazio o no?
Alfredo |
| | Post: 4 | Registrato il: 05/12/2003
| Utente Junior | 2007 | | OFFLINE | |
|
07/06/2017 13:36 | |
Il comune ha una lista di specializzazioni, ad esempio 100, di cui 20 di queste (sempre per esempio) alla regione non interessano. Per cui avrò due liste di specializzazioni che pur essendo uguali sono inevitabilmente da dividere. Perdonatemi ma man mano che ci lavoro aggiungo cose o scopro altro...
[Modificato da demo911 07/06/2017 13:36] |
| | Post: 3.272 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
07/06/2017 13:44 | |
Sulla base dell'esempio che ti ho fatto riesci ad applicarlo al tuo file reale?
E poi i file di esempio devono essere strutturalmente uguali all'originale altrimenti si va avanti a spizzichi e bocconi. [Modificato da alfrimpa 07/06/2017 13:45]
Alfredo |
| | Post: 5 | Registrato il: 05/12/2003
| Utente Junior | 2007 | | OFFLINE | |
|
07/06/2017 13:47 | |
Ora ci provo semmai mali che vada torno qua e continuo a rompervi ahahahah
Cmq vista la grande quantità di specializzazioni credo che la listbox sia più pratica alla fine.
Bon procedo a vari tentativi, vi tengo aggiornati.
Grazie mille dell'aiuto :) |
| | Post: 3.273 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
07/06/2017 13:49 | |
Invece io credo che la strada delle checkbox sia la più semplice da gestire (anche dal punto di vista del codice) anche perché comunque qualcosa devi cliccare Listbox o Checkbox
Alfredo |
| | Post: 6 | Registrato il: 05/12/2003
| Utente Junior | 2007 | | OFFLINE | |
|
07/06/2017 14:05 | |
... non lo so... considera che l'anagrafica dei volontari del Comune di Roma riconosce 107 specializzazioni mentre la regione 80...
|
| | Post: 3.274 | Registrato il: 21/06/2013
| Città: NAPOLI | Età: 70 | Utente Master | Excel 365 | | OFFLINE |
|
07/06/2017 14:20 | |
demo911, 07/06/2017 14.05:
... non lo so... considera che l'anagrafica dei volontari del Comune di Roma riconosce 107 specializzazioni mentre la regione 80...
Se così non credo che la Listbox, da questo punto di vista sia più agevole rispetto alle checkbox.
Riesci a fare avere un elenco completo delle specializzazioni per comune e regione?
Comunque nel mio file hai tutto quel che serve per fartelo da solo con tutte le specializzazioni di cui occorre tener conto.
Alfredo |
|
|