Risultati da 1 a 7 di 7

Discussione: Ricettario con Scarico e Carico



  1. #1
    L'avatar di Lety88
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Brindisi
    Età
    29
    Messaggi
    131
    Versione Office
    Office 2013
    Likes ricevuti
    0
    Likes dati
    7

    Ricettario con Scarico e Carico

    Buonasera

    Sto cercando di realizzare un ricettario in Excel. Creando in A2 un campo convalida dati dove posso selezionare il nome della ricetta, desideravo che nella colonna C (Ricetta) mi comparissero gli ingredienti presenti nel foglio Ricettario.

    Se seleziono Pane01, mi compaiono gli ingredienti per fare il pane, se seleziono Frisella03 mi compaiono nella colonna C gli ingredienti per fare le friselle.

    Successivamente desideravo salvarle tramite pulsante sul foglio (Salvate) effettuando lo scarico delle quantità dal foglio (Scarico) colonna E.

    Dopo aver salvato N ricette, se uno o più valori nella colonna E foglio(Scarico) assumono valore 0 o rischiano di scendere sotto lo 0, quindi diventare negativi, si devono bloccare al valore 0 e il resto lo si deve sottrarre dalla colonna D foglio(Carico).

    Successivamente nel foglio(Scarico) il record di riferimento che ha come quantità rimanente valore 0, deve essere sovrascritto il fornitore,Scadenza e Quantità Rimanente con i rispettivi valori fornitore, scadenza e quantità tot presenti nel foglio Carico.
    File Allegati File Allegati

  2. #2
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2133
    Ciao Lety88, per quanto riguarda la parte che interessa il foglio "Ricetta" copia le seguenti:
    Foglio "Ricetta":

    In C2:
    =SE.ERRORE(CERCA.VERT($A$2;Ricettario!$A$2:$F$7;RIGHE($C$2:$C3);FALSO);"")

    In D2:
    =SE.ERRORE(CERCA.VERT($C2;Scarico!$A$2:$G$7;CONFRONTA(Ricetta!$A$2;DESTRA(Scarico!$A$1:$G$1;LUNGHEZZA(Scarico!$A$1:$G$1)-TROVA(" ";Scarico!$A$1:$G$1;1));0);FALSO);"")
    formula matrice da attivare con i tasti CTRL+MAIUSCOLO+INVIO

    In E2:
    =SE.ERRORE(CERCA.VERT($C2;Scarico!$A$2:$G$7;CONFRONTA(Ricetta!E$1;Scarico!$A$1:$G$1;0);FALSO);"")

    In F2:
    =SE.ERRORE(CERCA.VERT($C2;Scarico!$A$2:$G$7;CONFRONTA(Ricetta!F$1;Scarico!$A$1:$G$1;0);FALSO);"")

    Tutte e quattro le formule da tirare giù alla bisogna.

    Allego il file di prova.
    Ciao, fa sapere.
    File Allegati File Allegati

  3. I seguenti 2 utenti hanno dato un "Like" a pkrome59 per questo post:


  4. #3
    L'avatar di Lety88
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Brindisi
    Età
    29
    Messaggi
    131
    Versione Office
    Office 2013
    Likes ricevuti
    0
    Likes dati
    7
    La convalida dati funziona benissimo, ti ringrazio pkrome59 per il tuo tempo e per la soluzione che mi hai allegato. Non ho compreso la formula matrice, va attivata ad ogni apertura del file?
    Lo scarico delle quantità volevo che avvenisse nel momento in cui clicco sul pulsante salva, mi copia la tabella sul foglio salvate e mi effettua lo scarico? è possibile come soluzione?
    Ancora Grazie.

  5. #4

    L'avatar di ges
    Clicca e Apri
    Data Registrazione
    Jun 2015
    Località
    Como
    Età
    53
    Messaggi
    7142
    Versione Office
    2011MAC 2016WIN
    Likes ricevuti
    2063
    Likes dati
    1300
    Ciao, per questa seconda tua richiesta serve il vba; riporto di seguito il codice e allego il file.
    Codice: 
    Sub salva()
        Dim wks1 As Worksheet, wks2 As Worksheet
        Set wks1 = Worksheets("Ricetta")
        Set wks2 = Worksheets("Scarico")
        Application.ScreenUpdating = False
        y = wks2.Range("A" & Rows.Count).End(xlUp).Row + 1
        For x = 2 To 20
            If wks1.Range("C" & x) <> "" Then
                wks1.Range("C2" & ":C" & x).Copy
                wks2.Range("A" & y).PasteSpecial Paste:=xlValues
                If wks1.Range("D" & x) <> "" Then
                    wks1.Range("D2" & ":D" & x).Copy
                    wks2.Range("D" & y).PasteSpecial Paste:=xlValues
                    If wks1.Range("E" & x) <> "" Then
                        wks1.Range("E2" & ":E" & x).Copy
                        wks2.Range("B" & y).PasteSpecial Paste:=xlValues
                        If wks1.Range("F" & x) <> "" Then
                            wks1.Range("F2" & ":F" & x).Copy
                            wks2.Range("C" & y).PasteSpecial Paste:=xlValues
                        End If: End If: End If: End If
        Next
        wks2.Range("A1").Select
        Set wks1 = Nothing
        Set wks2 = Nothing
        Application.CutCopyMode = False
        Application.ScreenUpdating = True
    End Sub
    File Allegati File Allegati
    Quando si scartano tutte le ipotesi possibili, quella che resta, anche se può sembrare improbabile, non può che essere quella giusta!

  6. I seguenti utenti hanno dato un "Like"


  7. #5
    L'avatar di pkrome59
    Clicca e Apri
    Data Registrazione
    Sep 2015
    Località
    Reggio Calabria
    Età
    58
    Messaggi
    1188
    Versione Office
    Office 2013
    Likes ricevuti
    1198
    Likes dati
    2133
    Ciao, la formula matrice va attivata una sola volta, salvo modifiche successive della formula stessa.
    Per il resto ci ha pensato Ges, che cordialmente saluto.

  8. #6
    L'avatar di Lety88
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Brindisi
    Età
    29
    Messaggi
    131
    Versione Office
    Office 2013
    Likes ricevuti
    0
    Likes dati
    7
    Ciao ges ti ringrazio per il file che mi hai inoltrato, posso chiederti se è possibile quando clicco su pulsante salva la tabella me la copia su foglio Salvate e successivamente mi effettua lo scarico dalla colonna Quantità Rimanenti nel foglio Scarico?

    Perché cliccando su Salva mi va scrivere la tabella in Scarico. Ho ricaricato il file aggiornato con l'intestazione creata su foglio Salvate.
    File Allegati File Allegati

  9. #7
    L'avatar di Lety88
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Brindisi
    Età
    29
    Messaggi
    131
    Versione Office
    Office 2013
    Likes ricevuti
    0
    Likes dati
    7
    Salve ho dato un'occhiata alle discussioni simili a questa tipo "Scarico e carico con memoria". Qualcosa di simile sto cercando di realizzare, pensavo all'utilizzo degli array, che prendessero i valori dalle celle, effettuata l'operazione andavano a sovrascrivere la colonna delle rimanenze con i nuovi valori.

Discussioni Simili

  1. carico e scarico
    Di Mauro L nel forum Domande su Excel in generale
    Risposte: 7
    Ultimo Messaggio: 12/09/16, 10:11
  2. Scarico e Carico delle Quantità
    Di Lety88 nel forum Domande su Excel VBA e MACRO
    Risposte: 1
    Ultimo Messaggio: 26/03/16, 11:28
  3. File carico scarico in ordine di data scadenza
    Di wifi75 nel forum Domande su Excel in generale
    Risposte: 2
    Ultimo Messaggio: 10/03/16, 11:24
  4. carico e scarico con memoria
    Di giampag nel forum Domande su Excel in generale
    Risposte: 26
    Ultimo Messaggio: 09/03/16, 15:12
  5. Carico e scarico magazzino cucina
    Di Pino Farina nel forum Domande su Excel in generale
    Risposte: 13
    Ultimo Messaggio: 19/01/16, 23:20

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
  •