Excel e gli applicativi Microsoft Office PROGRAMMAZIONE CONTROLLI

Login Registrati
Stai vedendo 25 articoli - dal 1 a 25 (di 27 totali)
  • Autore
    Articoli
  • #2520 Score: 0 | Risposta

    thunder
    Partecipante
       Ciao,
      di seguito il mio quesito.
      Dati:
      Dentro una cartella windows ho diverse cartelle di lavoro, una per ogni condominio.
      Ogni cartella di lavoro contiene 12 fogli, uno per ogni mese.
      Dentro ad ogni foglio, sono riportate in una colonna gli elementi che devono essere controllati mentre su una riga i giorni del mese impostati come valore di data.
      Obiettivo:
      Devo predisporre dei controlli che devono essere poi automaticamente programmati nei vari giorni  dell'anno secondo le seguenti casistiche:
      A (annuale) - S (semestrale) - T (trimestrale) - B (bimestrale) - M (mensile) - ST (settimanale)
      Facendo degli esempi pratici nel file che ho allegato:
      - Cantina: Il giorno 2 gennaio immetto la stringa ST. Da qui in poi per tutto l'anno, ogni sette giorni deve essere riportata la stessa stringa ST.
      - Garage: il giorno 6 febbraio immetto la stringa S. Devo contare 180 giorni e reimmettere nuovamente S. In questo caso cadrebbe il 5 di agosto ma essendo una    domenica viene spostato al lunedì 6.
      -Scale: il giorno 4 gennaio immetto la stringa B. Da qui in poi ogni 60 giorni devo immettere nuovamente la stringa B.
      Variabili:
      La mensilità è di 30 giorni. Quindi se ho un controllo bimestrale dovrò contare 60 giorni.
      Se il controllo ricade di sabato o domenica o festività deve essere spostato al primo giorno utile successivo.
      Vorrei potere organizzare la cosa per almeno 5 anni così da poter gestire poi anche i controlli ad esempio annuali.Spero di essere stato il più chiaro possibile. Grazie in anticipo
      Allegati:
      You must be logged in to view attached files.
      #2522 Score: 0 | Risposta

      Luca73
      Partecipante
        58 pts
        Ciao
        Domande:
        1)
        Si potrebbe cambiare i nomi dei foglio aggiungendo il numero davati
        Esempio Gennaio in 01_Gennaio?
        Semplificherebbe la vita.
        2)
        Tutte le operazioni vanno posticipate se di domenica? Solo di domenica?
        L'anno è 2018
        Vero?
        Ciao
        #2529 Score: 0 | Risposta

        thunder
        Partecipante
          Ciao,
          1) si non c'è nessun problema
          2) se il controllo ricade di sabato, domenica o festività deve essere spostato al primo giorno lavorativo utile.
          L'anno che ho riportato nell'esempio è il 2018. Vorrei poter organizzare il flusso dei controlli anche per gli anni successivi.
          #2611 Score: 0 | Risposta

          Luca73
          Partecipante
            58 pts
            Quali giorni consideri festivi?
            Avevo buttato giù due righe ma non li ho salvate.
            Io procederei così:
            - una macro che crea il calendario (sei sicuro che lo vuoi in orizzonrtale e non in verticale?
            - la macro scrive i sabati le domeniche i i festivi
            - Una seconda macro che compila come vuoi tu
            Dammi qualche giorno che ci lavoro,.
            Come sei messo tu a VBA e macro?
            #2612 Score: 0 | Risposta

            thunder
            Partecipante
              Ciao,
              i giorni festivi sarebbero tipo pasqua, natale, I° maggio... Potrebbe esserci, ipotizzo, una maschera dove definirli anno per anno? L'ordine con cui procedere direi che è l'ideale, correlare poi le varie cartelle excel nei successivi anni immagino non sia semplice. Il calendario purtroppo deve rimanere in orizzontale.
              A VBA e macro sono un principiante. Mi aiuto molto con il registratore.
              Per il tempo figurati, neanche a dirlo!
              Grazie intanto
              #2691 Score: 0 | Risposta

              Luca73
              Partecipante
                58 pts
                Ci sto lavorando non mi sono dimentaicato. domani spero di poterti inviare il file.
                Ciao
                Luca
                #2702 Score: 0 | Risposta

                thunder
                Partecipante
                  Ma figurati, grazie anzi.
                  #2721 Score: 0 | Risposta

                  Luca73
                  Partecipante
                    58 pts
                    Ho provato a buttare giù qualcosa.
                    Ho inserito un foglio in cui i programma scrive la prima azione per l'anno dopo.
                    L'idea può essere quella che con l'anno nuovo azzeri tutto, cambi l'anno e riparti sulla base del precedente.
                    Ad oggi se scrivi una delle lettere previste nel mese ti parte in automatico il programma.
                    Se ti va bene poi ci sono un paio di cose da migliorare.
                    Fai qualche prova e dimmi se OK
                    Come da tua indicazione mese = 30 giorni
                    2 mesi = 60 giorni
                    6 mesi = 180 giorni
                    1 anno = 1 anno solare
                    inoltre se trova sabato domenica o festa allora cerca il primo libero dopo e poi riparte da qullo
                    ovvero un settimanale di lunedì trova pasquetta e poi passa al martedì.
                    Come feste ho inserito
                    01/01, 06/01, Pasqua, Pasquetta, 25/04,  01/05, 02/06, 15/08, 01/11, 08/12, 25/12, 26/12 31/12
                    Altre si possono inserire.
                    Fai qualche prova e dammi un feedback
                    Ciao
                    Luca
                    Allegati:
                    You must be logged in to view attached files.
                    #2722 Score: 0 | Risposta

                    Luca73
                    Partecipante
                      58 pts
                      Ho provato a buttare giù qualcosa.
                      Ho inserito un foglio in cui i programma scrive la prima azione per l'anno dopo.
                      L'idea può essere quella che con l'anno nuovo azzeri tutto, cambi l'anno e riparti sulla base del precedente.
                      Ad oggi se scrivi una delle lettere previste nel mese ti parte in automatico il programma.
                      Se ti va bene poi ci sono un paio di cose da migliorare.
                      Fai qualche prova e dimmi se OK
                      Come da tua indicazione mese = 30 giorni
                      2 mesi = 60 giorni
                      6 mesi = 180 giorni
                      1 anno = 1 anno solare
                      inoltre se trova sabato domenica o festa allora cerca il primo libero dopo e poi riparte da qullo
                      ovvero un settimanale di lunedì trova pasquetta e poi passa al martedì.
                      Come feste ho inserito
                      01/01, 06/01, Pasqua, Pasquetta, 25/04,  01/05, 02/06, 15/08, 01/11, 08/12, 25/12, 26/12 31/12
                      Altre si possono inserire.
                      Fai qualche prova e dammi un feedback
                      Ciao
                      Luca
                      Allegati:
                      You must be logged in to view attached files.
                      #2749 Score: 0 | Risposta

                      thunder
                      Partecipante

                        Ciao,

                        ho fatto delle prove e funziona alla grande! Per le ferie quelle che hai inserito  ( il calcolo della Pasqua è una finezza!) vanno bene.

                        Ho visto che ci  sono 4 macro ,ti anticipo qualche domanda se posso:

                         

                        • resetta : pulisce tutti i fogli tranne il 12_Dicembre; è possibile con il reset eventualmente  pulire anche 13_Annodopo?
                        • Attiva e prva devono essere eseguite?
                        • ho visto che basta aggiungere righe di testo nella colonna B e la funzione automaticamente viene espansa, corretto?
                        Grazie ancora.
                        #2750 Score: 0 | Risposta

                        Luca73
                        Partecipante
                          58 pts
                          Resetta, Attiva e Prova le avevo fatte per uso debug. Non servono.
                          Riguardo alla pulizia del 13_Annodopo era legata al fatto di una potenziale macro che servisse per riempire l'anno successivo.
                          Se ti serve cancellare basta modificare
                          la riga
                          If Left(FoglioP.Name, 2) * 1 < 12 Then
                          come
                          If Left(FoglioP.Name, 2) * 1 < 13 Then
                          Ciao
                          Luca
                        #2752 Score: 0 | Risposta

                        thunder
                        Partecipante
                          Lo trovavo utile nel caso servisse eliminare tutto per un qualsiasi motivo... Prima avevi scritto che ci sarebbero delle cose da sistemare a cosa ti riferivi? Se fosse possibile riempire l'anno successivo sarebbe perfetto.
                          #2855 Score: 0 | Risposta

                          thunder
                          Partecipante
                            aggiungo un altra cosa se possibile. Sto cercando di individuare l'intervallo in cui la macro scrive perché dovrei farla partire da una determinata cella (nelle precedenti devo mettere delle intestazioni). Sono riuscito a modificare solo resetta. Come posso fare?
                            #2863 Score: 0 | Risposta

                            thunder
                            Partecipante
                              Ti allego un esempio per capire... Ho colorato in giallo le celle su cui devo mettere valori, tipo di intestazioni, che non interessano la scrittura della macro...
                              Allegati:
                              You must be logged in to view attached files.
                              #2928 Score: 0 | Risposta

                              Luca73
                              Partecipante
                                58 pts
                                Ciao
                                La prossima volta parti subito con il file giusto, altrimenti poi bisogna riguardare tutto
                                Mi sembra che ora sia tutto OK con il tuo nuovo formato.
                                Ti ho aggiunto alcune funzioni Nel foglio legenda e nel foglio anno dopo.
                                Spera sia tutto OK
                                Ciao
                                Luca
                                #2929 Score: 0 | Risposta

                                Luca73
                                Partecipante
                                  58 pts
                                  Allegati:
                                  You must be logged in to view attached files.
                                  #2940 Score: 0 | Risposta

                                  thunder
                                  Partecipante
                                    Ciao,
                                    scusa per l'errore. Ho fatto un pò di prove.
                                    - rispetto al file precedente, facendo la prova che è nel primo post, "Garage ho immesso nel giorno 6 febbraio la lettera  S. La nuova stringa S dovrebbe ricomparire dopo 180 giorni, il 5 di agosto ma essendo una  domenica va al lunedì 6.  Su questo nuovo file ricade invece il giorno 7 agosto.
                                    - Inserendo una nuova attività nel foglio Legenda, viene mantenuto il progressivo( ne ho aggiunta una dopo giardino ed è comparso il n° è 8), ma nel foglio 13, Anno_dopo, viene riportata come n°15
                                    -sul foglio 13 Anno_dopo che mi hai allegato le prime date sono 04/01/1900 ( non so se c'entra)
                                    -ho provato ad usare prepara anno nuovo (prima ho resettato il foglio anno nuovo e resetta mesi, poi ho messo ST sul 2 gennaio per fare una prova). Nella box ho inserito 2019 e la stringa ST viene riportata solo sulla cella  F14, del foglio 01_Gennaio. Il file viene salvato poi come Condominio_2020.
                                    Grazie ancora per il tempo che mi stai dedicando.
                                    un saluto
                                    #2945 Score: 0 | Risposta

                                    Luca73
                                    Partecipante
                                      58 pts
                                      Prova a vedere mi sembra di aver corretto gli errori
                                      Come prima cosa fai partire la macro per creare un nuovo anno e genera il 2018
                                      la macro  prepara anno nuovo in automatico resetta tutto
                                      Ciao
                                      Luca
                                      Allegati:
                                      You must be logged in to view attached files.
                                      #2959 Score: 0 | Risposta

                                      thunder
                                      Partecipante
                                        Ciao,
                                        ho fatto i passaggi indicati.  Il primo errore, quello dei 180 giorni è risolto come quello del nome dell'anno nel salvataggio.
                                        Il problema di prima invece, del progressivo della legenda rimane invariato.... Mi sono inoltre accorto che, anche per  le attività già presenti nel foglio 13_AnnoDopo, il progressivo aumenta invece di rispettare quello previsto in Legenda ( es. ho messo ST in "Ascensore" ed in 13_AnnoDopo il Num attività è 10).
                                        Anche per la preparazione dell'anno successivo, in base ai valori dell'anno precedente, viene popolata  solo la colonna F del foglio 01_gennaio
                                        #2991 Score: 0 | Risposta

                                        Luca73
                                        Partecipante
                                          58 pts
                                          Ciao
                                          Prova adesso
                                          ho introdotto anche il tasto che elimina una attività.
                                          Ciao
                                          Luca
                                          Allegati:
                                          You must be logged in to view attached files.
                                          #2993 Score: 0 | Risposta

                                          thunder
                                          Partecipante
                                            Ciao,
                                            le attività funzionano adesso, grazie! Ho provato di nuovo ad utilizzare il tasto Prepara anno nuovo per generare l'anno successivo in base a quello precedente ma mi continua a popolare solo la colonna F del foglio 01_gennaio. Forse sto sbagliando le operazioni?
                                            #3017 Score: 0 | Risposta

                                            Luca73
                                            Partecipante
                                              58 pts

                                              Ciao
                                              Errori corretti
                                              Verifica e fammi sapere

                                              Allegati:
                                              You must be logged in to view attached files.
                                              #3052 Score: 0 | Risposta

                                              thunder
                                              Partecipante
                                                Ciao!
                                                la funzione prepara anno successivo funziona grazie!! Sto facendo gli ultimi test e nel provare ad eliminare le attività da questo errore: "Metodo range dell'oggetto '_Worksheet' non riuscito"
                                                presso:[pastacode lang="markup" manual="%20.Range(Range(%22M12%22).Offset(Attivit%C3%A0DaElim%20-%201%2C%200)%2C%20Range(%22M12%22).Offset(Attivit%C3%A0DaElim%20-%201%2C%2035)).Delete%20Shift%3A%3DxlUp" message="" highlight="" provider="manual"/]

                                                #3063 Score: 0 | Risposta

                                                Luca73
                                                Partecipante
                                                  58 pts
                                                  Prova a modificare con
                                                  .Range(.Range("M12").Offset(AttivitàDaElim - 1, 0), .Range("M12").Offset(AttivitàDaElim - 1, 35)).Delete Shift:=xlUp
                                                  Aggiungendo un punto (.) prima dei due Range dentro la parentesi
                                                  Ciao
                                                  Luca
                                                  #3204 Score: 0 | Risposta

                                                  thunder
                                                  Partecipante
                                                    Ciao Luca,
                                                     
                                                    scusa il ritardo. Ho provato ad inserire le modifiche ma continua a darmi lo stesso errore
                                                    Login Registrati
                                                    Stai vedendo 25 articoli - dal 1 a 25 (di 27 totali)
                                                    Rispondi a: PROGRAMMAZIONE CONTROLLI
                                                    Gli allegati sono permessi solo ad utenti REGISTRATI
                                                    Le tue informazioni: