You are here:--[RISOLTO] Impostare nomi in base alle date
[RISOLTO] Impostare nomi in base alle date 2018-12-04T19:00:55+00:00

Home Forum Domande su Excel Generale [RISOLTO] Impostare nomi in base alle date

  • Autore
    Articoli
  • tenace55
    Partecipante
      Post totali: 23
      #7445 |

      Ciao  a tutti
      ma mi rivolgo direttamente a Sal prendendo spunto da

      https://www.freeforumzone.com/discussione.aspx?idd=10481311
      si potrebbe ordinare la turnazione di operatori nelle combobox 2, 3 e 4 in base alla data (combobox1) ed inserirla nelle celle adiacenti  b2, c2,d2  come nel foglio “prospetto”, esempio inserendo la data 28/11/2018 andrebbero nelle celle b3,c3,d3 e cosi via . Allego file. Spero in un aiuto. Grazie

      http://www.filedropper.com/partiredadata-

      Saluti

       

      • Questo argomento è stato modificato 2 settimane fa da  tenace55.
      • Questo argomento è stato modificato 1 settimana, 3 giorni fa da BySalv BySalv.
    • BySalvBySalv
      Amministratore del forum
        Post totali: 336

        Ciao prova a cambiare i codice del CommandButton con questo:

        Private Sub CommandButton1_Click()
        Dim idx, x
        
        idx = ComboBox1.ListIndex + 1
        With Sheets("Prospetto")
            .Cells(idx, 2) = ComboBox2
            .Cells(idx, 3) = ComboBox3
            .Cells(idx, 4) = ComboBox4
        End With
        For x = 1 To 4
            Controls("Combobox" & x) = ""
        Next x
        ComboBox1.SetFocus
        End Sub

        se ho compreso bene il problema

        Ciao By Sal :bye:

      • tenace55
        Partecipante
          Post totali: 23

          Ciao a tutti,  è ciò che cercavo ma se aggiungiamo un’altra combobox per definire un altro tipo di evento?

          Comunque la disquisizione sul topic da cui ho preso spunto è semplicemente fantastica. Allego file

          http://www.filedropper.com/partiredadata-2

          Ciao e grazie

        • BySalvBySalv
          Amministratore del forum
            Post totali: 336

            Ciao il discorso è sempre lo stesso, basta aggiungere una riga nel codice con il prossimo elemento.

            Private Sub CommandButton1_Click()
            Dim idx, x
            
            idx = ComboBox1.ListIndex + 1
            With Sheets("Prospetto")
                .Cells(idx, 2) = ComboBox2
                .Cells(idx, 3) = ComboBox3
                .Cells(idx, 4) = ComboBox4
                .Cells(idx, 5) = ComboBox5
            End With
            For x = 1 To 5
                Controls("Combobox" & x) = ""
            Next x
            ComboBox1.SetFocus
            End Sub

            Ciao By Sal :bye:

          • tenace55
            Partecipante
              Post totali: 23

              Ciao a tutti,  Sal non sono riuscito a spiegarmi bene ciò che mi servirebbe è
              1°) partire dalla data
              2°) con una combobox scegliere il tipo di evento
              3°) aggiungere gli operatori sempre con celle adiacenti ma diverse
              dalle colonne a,b,c,un pò come era nel topic
              https://www.freeforumzone.com/discussione.aspx?idd=10481311
              dove c’e settimana (a me data), dimostratrice1,2ecc (a me evento1,2 ecc).
              Spero di essere stato chiaro. Grazie Ciao
              Allego file

              http://www.filedropper.com/partiredadata-2_1

              Saluti

            • BySalvBySalv
              Amministratore del forum
                Post totali: 336

                Ciao ecco la modifica, non avevo capito il problema degli eventi, non c’era nel tuo file.

                questa la modifica del CommandButton

                Private Sub CommandButton1_Click()
                Dim idx, c, x, Ev
                
                idx = ComboBox1.ListIndex + 1
                Ev = ComboBox5
                Select Case Ev
                    Case "Evento1": c = 2
                    Case "Evento2": c = 5
                    Case "Evento3": c = 8
                End Select
                With Sheets("Prospetto")
                    .Cells(idx, c) = ComboBox2
                    .Cells(idx, c + 1) = ComboBox3
                    .Cells(idx, c + 2) = ComboBox4
                End With
                For x = 1 To 5
                    Controls("Combobox" & x) = ""
                Next x
                ComboBox1.SetFocus
                End Sub

                ti ho modificato anche il rowsource dei combobox2-3-4, perche mi trovavo sempre alla fine della ricerca, anche il nome degli Eventi in maiuscolo.

                il link al file

                https://mega.nz/#!oNlxhCYY!xmM6YZuzGBeWT4yM6K-agvLbNA3dydTlFx4mhmy0w0M

                Ciao By Sal :bye:

              • tenace55
                Partecipante
                  Post totali: 23

                  Ciao, Sal OK risoltissimo,  potete mettere  [Risolto], a  me non lo fa fare

                  Saluti :good:

                • BySalvBySalv
                  Amministratore del forum
                    Post totali: 336

                    Ciao ti ho riaperto la discussione, ma non è chiara la tua spiegazione, hai il primo elenco con gli eventi, dalla colonna “A”.

                    poi un altro elenco colonna “P” che chiami “Evento1” a questo Evento1, ci sono di nuovo “Evento1-2-3”, cosa ci andrebbe?.

                    Ciao By Sal

                  • tenace55
                    Partecipante
                      Post totali: 23

                      Cia Sal chiedo scusa ieri ero veramente nel pallone, nella colonna P ci sono : Date 2 con i tre eventi. Nelle userform si dovrà scegliere  una delle due date , i vari eventi collegati alle date e quindi gli operatori (che fatica, scusami).

                      http://www.filedropper.com/partiredadatagiuroultimo—-

                      Ciao e  mille grazie

                      :cry:

                       

                    • BySalvBySalv
                      Amministratore del forum
                        Post totali: 336

                        Ok, 2 serie di date, prendiamo il 27/11/18, esiste solo nella seconda serie colonna P.

                        ma quando esiste in entrambe le serie, come il 28/11/18, i tre operatori vanno scritti in entrambe le serie per lo stesso evento?.

                        come li gestisce poi se gli eventi sono in punti differenti.
                        oppure ammettendo che siano gli stessi operatori e nella prima serie vedono l’evento1 e nella seconda serie vedrebbero l’evento2, hanno anche un ordine di tempo cioè l’evento1 della prima serie alle 10:00 e l’evento2 della seconda serie alle 15:00.

                        mi sembra che manchi qualcosa, asp… se mi ricordo bene già ho trattato un argomento simile, vedo se trovo il file.

                        trovato, vedi immagine, questo gestisce gli eventi, per sale, con data ed orario

                        Eventi
                        online image host
                        .

                        Comunque fammi sapere la prima parte, di come gestire gli eventi posso anche far scrivere lo stesso evento nelle 2 serie per la stessa data.

                        Ciao By Sal :bye:

                      • tenace55
                        Partecipante
                          Post totali: 23

                          Ciao,  se le due date corrispondono ovviamente gli operatori non possono essere negli stessi eventi, non hanno un ordine di tempo è per tutto l’evento. Si, va bene scrivere lo stesso evento nelle 2 serie  per la stessa data.

                          Grazie, ciao

                        • BySalvBySalv
                          Amministratore del forum
                            Post totali: 336

                            Ciao, allora le posizioni sono quelle del file?, faccio scrivere i dati in quelle posizioni?

                            fai sapere, non vorrei fare altre correzioni, Ciao By Sal

                          • tenace55
                            Partecipante
                              Post totali: 23

                              Ciao, confermo tutto

                               

                            • BySalvBySalv
                              Amministratore del forum
                                Post totali: 336

                                Ciao, ecco il file con la modifica

                                http://www.filedropper.com/partiredadatagiuroultimo—-_1

                                Ciao By Sal :bye:

                              • tenace55
                                Partecipante
                                  Post totali: 23

                                  Ciao, scusa Sal   sicuramente mi spiego male.  Provando a cliccare la prima data—>evento(1,2 o 3) più gli operatori va tutto bene vengono nelle colonne predisposte.

                                  Se però prendi solo data2 (colonnap)  –>evento(1,2 o 3)—>operatori mi viene errore.

                                  [/url]

                                  Ciao

                                • BySalvBySalv
                                  Amministratore del forum
                                    Post totali: 336

                                    Ciao ecco la modifica

                                    http://www.filedropper.com/partiredadata2

                                    Ciao By Sal :bye:

                                  • tenace55
                                    Partecipante
                                      Post totali: 23

                                      Ciao, non va

                                      Comunque credo di aver dato moltissimo fastidio, chiedo ancora scusa.

                                      Ciao

                                    • BySalvBySalv
                                      Amministratore del forum
                                        Post totali: 336

                                        Ciao Cosa non va?, fai sapere

                                        Ciao By Sal

                                      • tenace55
                                        Partecipante
                                          Post totali: 23

                                          Ciao,  mettendo solo la seconda data–>eventi(qualsiasi dei 3)–>operatori viene l’errore di cui sopra

                                        • BySalvBySalv
                                          Amministratore del forum
                                            Post totali: 336

                                            Ciao ho commesso un errore nella macro, ecco quella giusta

                                            Private Sub CommandButton1_Click()
                                            Dim idx1, idx2, c, cc, x, Ev
                                            
                                            Ev = ComboBox5
                                            Select Case Ev
                                                Case "Evento1": c = 2: cc = 18
                                                Case "Evento2": c = 5: cc = 21
                                                Case "Evento3": c = 8: cc = 24
                                            End Select
                                            idx1 = ComboBox1.ListIndex
                                            If idx1 = -1 Then GoTo 1
                                            idx1 = idx1 + 2
                                            With Sheets("Prospetto")
                                                .Cells(idx1, c) = ComboBox2
                                                .Cells(idx1, c + 1) = ComboBox3
                                                .Cells(idx1, c + 2) = ComboBox4
                                            End With
                                            1:
                                            idx2 = ComboBox6.ListIndex
                                            If idx2 = -1 Then Exit Sub
                                            idx2 = idx2 + 2
                                            With Sheets("Prospetto")
                                                .Cells(idx2, cc) = ComboBox2
                                                .Cells(idx2, cc + 1) = ComboBox3
                                                .Cells(idx2, cc + 2) = ComboBox4
                                            End With
                                            For x = 1 To 6
                                                Controls("Combobox" & x) = ""
                                            Next x
                                            ComboBox1.SetFocus
                                            End Sub

                                            http://www.filedropper.com/partiredadata2_1

                                            Ciao By Sal

                                          • tenace55
                                            Partecipante
                                              Post totali: 23

                                              Ciao Sal, OK  ora è a posto, avevo trovato una soluzione sicuramente meno elegante ma per me (il mio capo) ottima .

                                              Per me andava benissimo quella che mi ha fatto chiudere il topic. La mia (povera ma funzionale)soluzione era quella di unire le due date (col. A e B) in un unica colonna  (C) con la matriciale    ={MIN(SE($A$1:$B$500>OGGI()-1;$A$1:$B$500))} in C1, ;     ={MIN(SE($A$1:$B$500>C1;$A$1:$B$500))} in C2 e tirare giu con il mouse. Che ne pensi?

                                              Ciao

                                            • BySalvBySalv
                                              Amministratore del forum
                                                Post totali: 336

                                                Ciao, va bene, il capo ha sempre ragione.

                                                Però se posso dire la mia, l’impostazione credo sia sbagliata, una migliore gestione potrebbe essere l’esempio che ti allego, senza formule, userform o altro.

                                                Catturaimage upload

                                                basta scrivere solo il numero 1-2-3-4-5 dell’evento sotto il nominativo, ho previsto 5 eventi, ma il numero può aumentare.

                                                per cambiare basta modificare o cancellare il numero nella cella.

                                                le date sono Progressive con una formula, se cambi la prima le altre si modificano

                                                In questo modo si ha subito visibile quale persona è assegnata a quell’evento.

                                                http://www.filedropper.com/partiredadata2_2

                                                Ciao By Sal :bye:

                                              • tenace55
                                                Partecipante
                                                  Post totali: 23

                                                  Ciao Sal , è l’uovo di Colombo semplice e funzionale. Grazie ancora stavolta è [Risoltissimo] giuro.

                                                  Ciao :good:

                                                • tenace55
                                                  Partecipante
                                                    Post totali: 23

                                                    Ciao a tutti, chiedo veramente scusa perché non so se si può riaprire il topic,  vi autorizzo a fucilarmi ma al mio capo non va bene niente.

                                                    Nel topic risolto stamane (per me era ottimo) si potrebbe inserire un’altra variabile cioè un’altra serie di date.

                                                    Quindi si deve tener conto delle due serie di date e gli eventi. E’ sicuramente l’ultima, poi lo mando a quel p…

                                                    Allego file

                                                    http://www.filedropper.com/partiredadatagiuroultimo

                                                    Chiedo di nuovo scusa . Ciao :cry:

                                                  La discussione ‘[RISOLTO] Impostare nomi in base alle date’ è chiusa a nuove risposte.

                                                  Utilizzando il sito, accetti l'utilizzo dei cookie da parte nostra. maggiori informazioni

                                                  Questo sito utilizza i cookie per fornire la migliore esperienza di navigazione possibile. Continuando a utilizzare questo sito senza modificare le impostazioni dei cookie o cliccando su "Accetta" permetti il loro utilizzo.

                                                  Chiudi