Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Magazzino

Ultimo Aggiornamento: 15/04/2018 13:29
11/04/2018 18:54

Buona sera spero che qualcuno possa aiutarmi
vorrei che quando nel foglio scarico seleziono un articolo e la quantità mi venisse aggiornato nel foglio magazzino la quantità restante e viceversa quando nel foglio carico inserisco la quantità
Post: 3.334
Registrato il: 28/06/2011
Città: AGORDO
Età: 70
Utente Master
2013
OFFLINE
11/04/2018 22:52

Valida per 1000 righe, in Magazzino cella ...EDIT D3, non D2...EDIT
=SE(B3="";"";MATR.SOMMA.PRODOTTO((CARICO!B$3:B$1000=B3)*(CARICO!D$3:D$1000))-MATR.SOMMA.PRODOTTO((SCARICO!B$3:B$1000=B3)*(SCARICO!D$3:D$1000)))
[Modificato da raffaele1953 12/04/2018 15:28]
Excel 2013
Post: 3.702
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
12/04/2018 11:10

Ciao Enrica ed un saluto a Raffaele.

Volendo si può fare anche con il VBA

Questo codice va nel modulo del foglio "SCARICO"

vb
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ur As Long
Dim rng As Range
Dim cel As Range
If Not Intersect(Target, Range("D:D")) Is Nothing Then
    ur = Sheets("MAGAZZINO").Cells(Rows.Count, 2).End(xlUp).Row
    Set rng = Sheets("MAGAZZINO").Range("B2:B" & ur)
    For Each cel In rng
        If cel.Value = Target.Offset(0, -2).Value Then
            cel.Offset(0, 2).Value = cel.Offset(0, 2).Value - Target.Value
        End If
    Next cel
End If
End Sub


e questo nel modulo del foglio "CARICO"

vb
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ur As Long
Dim rng As Range
Dim cel As Range
If Not Intersect(Target, Range("D:D")) Is Nothing Then
    ur = Sheets("MAGAZZINO").Cells(Rows.Count, 2).End(xlUp).Row
    Set rng = Sheets("MAGAZZINO").Range("B2:B" & ur)
    For Each cel In rng
        If cel.Value = Target.Offset(0, -2).Value Then
            cel.Offset(0, 2).Value = cel.Offset(0, 2).Value + Target.Value
        End If
    Next cel
End If
End Sub

Ti allego il file.
[Modificato da alfrimpa 12/04/2018 11:12]

Alfredo
12/04/2018 20:58

GRAZIE A ENTRAMBI MI AVETE DATO UN GROSSO AIUTO ,GRAZIE DI CUORE
14/04/2018 13:24

SCUSATE PER IL DISTURBO MA SONO RIUSCITA A CREARE IL MAGAZZINO MA MI SONO FERMATA QUI, VORREI CHE NEL FOGLIO DIPENDENTI MI FACESSE UNA LISTA IN BASE HAI NOMI SELEZIONATI NEL FOGLIO ATTREZZATURA DOVE CE IL MENU A TENDINA
[Modificato da EnricaBabbini 14/04/2018 13:24]
14/04/2018 13:25

Post: 2.813
Registrato il: 03/04/2013
Utente Veteran
Excel 2000 - 2013
OFFLINE
14/04/2018 17:09

Buona sera, Enrica;
in attesa di una soluzione più professionale potresti considerare il File in allegato.



Buona serata.

Giuseppe

Windows XP - Excel 2000
Windows 10 - Excel 2013
14/04/2018 18:41

GRAZIE GIUSEPPE MA VOLEVO ALLEGARTI TUTTO IL FILE MAGAZZINO ATTUALMENTE I FOGLI ATTREZZATURA E DIPENDENTI NON SONO COLLEGATI CON ALTRI FOGLI TI RINGRAZIO IN ANTICIPO PER LA TUA DISPONIBILITÀ
Post: 2.817
Registrato il: 03/04/2013
Utente Veteran
Excel 2000 - 2013
OFFLINE
14/04/2018 19:08

Buona sera, Enrica;
nel File allegato in Risposta #8 ci sono alcuni problemi:
-    Riferimento a File esterno    ATTREZZATURA ='C:\Users\Acer\Downloads\[1904670754.xlsm]ATTREZZATURA'!$B$3:$B$9
-    Manca il Codice VBA      Sub Analizza()
-    Contestulamente l'estensione deve essere .xlsm; attualmente è .xlsx

Credo dovresti:
-    Modificare il NomeZona ATTREZZATURA in     =ATTREZZATURA!$B$3:$B$9
-    Copiare il Codice VBA proposto nel File allegato in Risposta #7
-    Collegare il Pulsante "Analizza" al Codice VBA Sub Analizza()
-    Salvare il File con estensione .xlsm

Dovrebbe, il condizionale è d'obbligo, funzionare.




A disposizione.

Buona serata e buon fine settimana.

Giuseppe

Windows XP - Excel 2000
Windows 10 - Excel 2013
14/04/2018 22:32

NON HO CAPITO BENE COSA FARE NON SONO MOLTO ESPERTA IN MATERIA MA RINGRAZIO PER L'AIUTO
Post: 3.355
Registrato il: 28/06/2011
Città: AGORDO
Età: 70
Utente Master
2013
OFFLINE
14/04/2018 23:24

Ciao a tutti ed un saluto a GiuseppeMN
Non desidero creare problemi, però per me questo file "non sa da fare"

Secondo me ci sono diverse problematiche con le formule. Faccio alcuni esempi...
1) La formula in post 2 funziona (perchè poi matriciale?), e quando arriva un nuovo "CARICO"? Cosa fai in carico, aggiungi il quantitativo alla riga o inserisci nuova riga?
Oppure quando inserisci un nuovo "SCARICO"? Va bene puoi aggiungere un'altra riga, mà le 1000 righe predisposte nella formula, prima o poi finiscono e farla per 1000000 diventa lenta.
2) Viene inserito un nuovo dipendente, fornitore ci sono diverse cose da verificare/modificare
3) Viene inserito un nuovo articolo? In Gestione Nomi bisognerà modificare i range prima o poi...

Nel post 5, fai una richiesta (vedi allegato, DIPE), mà a cosa serve se c'è già il tutto in attrezzatura?

Se d'accordo GiuseppeMN, dò anche la mia disponibilità nel farlo col VBA
Per esempio avrai un DB che indica ogni giorno tutto quello che arriva/parte pesando poco.

Solo ad una condizione, che spieghi bene il "tutto". Intendo dire come intendi farlo/usarlo.
Ex Oggi arrivano 100 paia di GUANTI e li carichi OK, mà vedere adesso che il giorno 12 hai venduto 8 articoli e riempito 8 righe non va bene. Se per caso ci sono 50 dipendenti/fornitori, si calcolerà per 100/150 mà sopra quel numero non funzionerà più nulla.
Idem per gli Articoli, sono 500 si calcolerà per 1000/1500.
NB. Sia un files con le formule può rovinarsi dall'oggi e domani. Fatto in VBA pesa di meno, mà sono "quasi" certo che non riuscirai a mettergli mano nel futuro.

Excel 2013
Post: 2.819
Registrato il: 03/04/2013
Utente Veteran
Excel 2000 - 2013
OFFLINE
14/04/2018 23:37

Buona sera, Enrica;
anche se non è una mia prerogativa, permettimi una considerazione:

@EnricaBabbini, scrive;


NON HO CAPITO BENE COSA FARE NON SONO MOLTO ESPERTA IN MATERIA MA RINGRAZIO PER L'AIUTO


-    il mio concetto di "Forum" è un ambiente di dialogo tra tutti i Partecipanti; chiedere una soluzione "chiavi in mano" esce da questa logica.
Ma questa è una mia oppinione molto personale e, come tale, opinabile.

Ad ogni buon conto, visto che la tua è la prima richiesta, cerco di aiutarti per quel poco che posso.

Premesso che non ho messo mano ai Fogli di lavoro protetti:
-    MAGAZZINO
-    SCARICO
-    CARICO
-    DATI
In ogni caso credo per questi Fogli di lavoro tu abbia già risolto.

Quello che puoi verificare è la consegna dellle attrezzature ad ogni Collaboratore (Foglio di lavoro "DIPE") e il riepilogo delle attrezzature consegnate (Foglio di lavoro "ATTREZZATURA"); nel Foglio di lavoro "DIPE" puoi provare ad assegnare alcune attrezzatura ai vari Collaboratori, poi, premendo il Pulsante "Analizza" presente nel Foglio di lavoro "ATTREZZATURA", potrai avere un Report di tutte le attrezzature consegnate.




Con amicizia.

Giuseppe

N.B. Leggo solo ora la risposta #11 di @raffaele1953 con il quale mi scuso per la sovrapposizione.
        Raffaele, appena ho un momento di tempo, guarderò con molto interesse il tuo File.

[Modificato da GiuseppeMN 14/04/2018 23:45]

Windows XP - Excel 2000
Windows 10 - Excel 2013
15/04/2018 07:55


GRAZIE raffaele1953E PER LA TUA DISPONIBILITÀ QUELLO CHE VOLEVO FARE ERA AVERE UN MAGAZZINO PER AVERE SOTTO CONTROLLO LE ENTRATE E USCITE ANCHE PER VERIFICARE UN SINGOLO DIPENDENTE IL MATERIALE CHE CONSUMA E DI CONSEGUENZA SAPERE DOVE E L'ATTREZZATURA E SAPERE CHI LA USATA ,IO NON SONO ESPERTA E MI SONO AFFIDATA AL FORUM CERCANDO UNA SOLUZIONE
E VI RINGRAZIO PER LA VOSTRA DISPONIBILITÀ
Post: 3.357
Registrato il: 28/06/2011
Città: AGORDO
Età: 70
Utente Master
2013
OFFLINE
15/04/2018 10:38

Per prima cosa, scrivere in maiuscolo in "qualsiasi" forum, significa urlare.
Per seconda, se le Tue spiegazioni sono tutto qui, lasciamo stare
Excel 2013
15/04/2018 13:29

non volevo essere scortese con nessuno e non mi permetto di urlare con nessuno ,grazie per l'aiuto che mi e stato dato GRAZIE Di tutto
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 05:55. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com