Risultati da 1 a 6 di 6

Discussione: Inserire formula relativa ad una cella in vba



  1. #1
    L'avatar di Rosaria79
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    Ferrara
    Messaggi
    36
    Versione Office
    Excel 2016
    Likes ricevuti
    0
    Likes dati
    0

    Inserire formula relativa ad una cella in vba

    Ciao a tutti,
    ho bisogno di scrivere in VBA la seguente formula di excel relativa alle celle "J7:J37" dei vari mesi della cartella di lavoro in allegato:

    "=SE(O(B7=$Z$27;B7=$Z$28;B7=$Z$29;B7=$Z$30);0;SE(GIORNO.SETTIMANA(B7;1)=1;OreDom1;SE(GIORNO.SETTIMANA(B7;1)=2;OreLun1;SE(GIORNO.SETTIMANA(B7;1)=3;OreMar1;SE(GIORNO.SETTIMANA(B7;1)=4;OreMerc1;SE(GIORNO.SETTIMANA(B7;1)=5;OreGio1;SE(GIORNO.SETTIMANA(B7;1)=6;OreVen1;OreSab1)))))))"

    In pratica, quando inserisco un nuovo orario settimanale nello specchio riportato nel foglio "impostazioni", la colonna J7:J37 del foglio "gennaio" si aggiorna automaticamente. Il problema sorge però quando, per motivi interni d'azienda, ho necessità di modificare l'orario di lavoro di un dipendente inerente ad una sola settimana nell'arco del mese. (Ad es. orario di servizio mensile di agosto è 08:00 -14:00, ma dal 8 al 14 agosto deve effettuare orario 08:00-16:00). Al momento lo faccio manualmente andando a cancellare tutte le formule dalle celle interessate all'occorrenza, ma questo è un problema perchè ogni volta dovrei ricordarmi di reinserirle.
    Per questo motivo vorrei scrivere la formula in vba.
    Ho provato ad inserire un codice nel modulo1 in combinazione con la macro "estrai mese", in modo che alla rilevazione timbrature venisse aggiornato anche l'orario di servizio, ma non ci sono riuscita.

    Spero di essere stata comprensiva e che possiate aiutarmi.

    Grazie a tutti

    P.S. il programma è work in progress e sto lavorando solo col il foglio relativo al mese di gennaio. Se tutto ciò può essere fatto anche per gli altri mesi in array tanto di guadagnato.

    https://www.dropbox.com/sh/7ahd1ah9k...iGfMc5dIa?dl=0

  2. #2
    L'avatar di Alessandro
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Roma
    Età
    45
    Messaggi
    851
    Versione Office
    2010 64 bit
    Likes ricevuti
    113
    Likes dati
    61

    Re: Inserire formula relativa ad una cella in vba

    Citazione Originariamente Scritto da Rosaria79 Visualizza Messaggio
    Ciao a tutti,
    ho bisogno di scrivere in VBA la seguente formula di excel relativa alle celle "J7:J37" dei vari mesi della cartella di lavoro in allegato:

    "=SE(O(B7=$Z$27;B7=$Z$28;B7=$Z$29;B7=$Z$30);0;SE(GIORNO.SETTIMANA(B7;1)=1;OreDom1;SE(GIORNO.SETTIMANA(B7;1)=2;OreLun1;SE(GIORNO.SETTIMANA(B7;1)=3;OreMar1;SE(GIORNO.SETTIMANA(B7;1)=4;OreMerc1;SE(GIORNO.SETTIMANA(B7;1)=5;OreGio1;SE(GIORNO.SETTIMANA(B7;1)=6;OreVen1;OreSab1)))))))"
    ho provato semplicemente con il registratore di macro...ma temo che ti occorra anche altro:

    Codice: 
    ActiveCell.FormulaR1C1 = _ "=IF(OR(R[-4]C[-5]=R27C26,R[-4]C[-5]=R28C26,R[-4]C[-5]=R29C26,R[-4]C[-5]=R30C26),0,IF(WEEKDAY(R[-4]C[-5],1)=1,OreDom1,IF(WEEKDAY(R[-4]C[-5],1)=2,OreLun1,IF(WEEKDAY(R[-4]C[-5],1)=3,OreMar1,IF(WEEKDAY(R[-4]C[-5],1)=4,OreMerc1,IF(WEEKDAY(R[-4]C[-5],1)=5,OreGio1,IF(WEEKDAY(R[-4]C[-5],1)=6,OreVen1,OreSab1)))))))"
    ciao
    ale

  3. #3
    L'avatar di Rosaria79
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    Ferrara
    Messaggi
    36
    Versione Office
    Excel 2016
    Likes ricevuti
    0
    Likes dati
    0

    Re: Inserire formula relativa ad una cella in vba

    Ciao ale,
    purtroppo non funziona.
    Grazie lo stesso

    Ciao @Rubik72,
    ti chiedo se sarebbe possibile aggiungere all'interno del codice vba che abilita la macro "estrai mese", la formula scritta sopra relativa alla colonna J7:J37 del foglio "gennaio", qualora dovessi modificare manualmente l'orario, in modo che, premendo la macro, oltre alla rilevazione presenze, si ripristini automaticamente l'orario predefinito.

    Se non è possibile quale potrebbe essere un'altra soluzione?
    Grazie mille

  4. #4

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2833
    Versione Office
    Excel 2013
    Likes ricevuti
    1027
    Likes dati
    983

    Re: Inserire formula relativa ad una cella in vba

    Citazione Originariamente Scritto da Rosaria79 Visualizza Messaggio
    Ciao ale,
    purtroppo non funziona.
    Grazie lo stesso

    Ciao @Rubik72,
    ti chiedo se sarebbe possibile aggiungere all'interno del codice vba che abilita la macro "estrai mese", la formula scritta sopra relativa alla colonna J7:J37 del foglio "gennaio", qualora dovessi modificare manualmente l'orario, in modo che, premendo la macro, oltre alla rilevazione presenze, si ripristini automaticamente l'orario predefinito.

    Se non è possibile quale potrebbe essere un'altra soluzione?
    Grazie mille
    Ciao @Rosaria79, ma la macro "EstraiMese" già lo fa quello che richiedi, in questa riga:
    Codice: 
    Range("J7:J37").FormulaLocal = "=SE(O(B7=$Z$27;B7=$Z$28;B7=$Z$29;B7=$Z$30);0;SE(GIORNO.SETTIMANA(B7;1)=1;OreDom1;SE(GIORNO.SETTIMANA(B7;1)=2;OreLun1;SE(GIORNO.SETTIMANA(B7;1)=3;OreMar1;SE(GIORNO.SETTIMANA(B7;1)=4;OreMerc1;SE(GIORNO.SETTIMANA(B7;1)=5;OreGio1;SE(GIORNO.SETTIMANA(B7;1)=6;OreVen1;OreSab1)))))))"
    P.S. Nel file allegato sono saltati i riferimenti all'anno che dovrebbe essere "='Impostazioni '!B2" e non "='Impostazioni '!G3:J3"

  5. #5
    L'avatar di Rosaria79
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    Ferrara
    Messaggi
    36
    Versione Office
    Excel 2016
    Likes ricevuti
    0
    Likes dati
    0

    Re: Inserire formula relativa ad una cella in vba

    Ciao @Rosaria79, ma la macro "EstraiMese" già lo fa quello che richiedi, in questa riga

    Ciao Rubik,
    sì lo so, provando e riprovando sono riuscita a farlo da sola ieri sera tardi.
    Devo dire che a furia di leggervi sto imparando tante cose.


    Volevo mettere Discussione RISOLTA ma ogni volta mi dimentico come si fa

    Grazie mille comunque della disponibilità.

  6. #6

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2833
    Versione Office
    Excel 2013
    Likes ricevuti
    1027
    Likes dati
    983

    Re: Inserire formula relativa ad una cella in vba

    Citazione Originariamente Scritto da Rosaria79 Visualizza Messaggio
    [...]
    Volevo mettere Discussione RISOLTA ma ogni volta mi dimentico come si fa
    [...]
    Purtroppo per un problema tecnico non è più possibile.

    Grazie del riscontro. Torna quando vuoi.

Discussioni Simili

  1. [Risolto] Inserire formula DATA.DIFF e SE nella stessa cella
    Di Arianna nel forum Domande su Excel in generale
    Risposte: 6
    Ultimo Messaggio: 12/01/17, 16:20
  2. inserire formula se cella è colorata
    Di Kiter nel forum Domande su Excel VBA e MACRO
    Risposte: 9
    Ultimo Messaggio: 05/01/17, 19:05
  3. inserimento in automatico della via e relativa zona di appartenenza
    Di ClaudioPrimo nel forum Domande su Excel in generale
    Risposte: 7
    Ultimo Messaggio: 22/11/16, 13:39
  4. Inserire il valore di una cella filtrata in una cella di un'altra pagina
    Di ortofrutta_palladino nel forum Domande su Excel in generale
    Risposte: 3
    Ultimo Messaggio: 02/08/16, 12:36
  5. Inserire in testo presente nella cella un valore ricavato da un altra cella
    Di Bestpaul nel forum Domande su Excel in generale
    Risposte: 5
    Ultimo Messaggio: 07/12/15, 17:05

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •