Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Scadenza Farmaci

596 views
Skip to first unread message

Pino

unread,
Oct 19, 2009, 12:18:40 PM10/19/09
to
Sto elaborando un foglio per il controllo della scadenza farmaci nel
mio reparto.
Le voci sono:
Nome prodotto, Tipologia; Codice, Data Carico, Data Apertura, Giorni
Apertura, Data Scadenza, Data Smaltimento.

Avrei bisogno di:
- Calcolare i giorni trascorsi dalla Data Apertura ad oggi in Giorni
Aperetura -per ora risolto con =INT((OGGI()-E3))-
- Associare un "alert" (tipo colorazione cella Giorni Apertura) al
Nome Prodotto, ovvero le gocce XXERRT 20 mg sono da ritenersi scadute
dopo 15 giorni dall'apertura......
- Far comparire un avviso un tot di giorni prima dalla scadenza
- Fare in modo che, una volta inserita la data di smaltimento, la riga
relativa venga NASCOSTA, o meglio non più visibile ma reperibile per
eventuali controlli.

E' possibile?
Grazie

Scossa

unread,
Oct 20, 2009, 2:14:45 AM10/20/09
to
On 19 Ott, 18:18, Pino <postmas...@spaziogiovanimartesana.org> wrote:
>
> E' possibile?

Se ti va bene avere le righe dei medicinali scaduti col carattere
"barrato" e se aggiungi una colonna "Max giorni apertura" puoi fare
tutto con la formattazione condizionale.

RPSV

Bye!
Scossa

Pino

unread,
Oct 20, 2009, 1:50:09 PM10/20/09
to
Grazie Scossa.....
Intuisco ma non capisco
Va bene anche il "barrato", ma non riesco a comprendere come risolvere
TUTTO con la formattazione condizionale.
In effetti la prima parte

- Associare un "alert" (tipo colorazione cella Giorni Apertura) al
Nome Prodotto, ovvero le gocce XXERRT 20 mg sono da ritenersi scadute
dopo 15 giorni dall'apertura......
già funziona in questo modo e quindi, intelligentemente, basterebbe
aggiungere la colonna MAX Giorni....

Ma il resto....non ci arrivo........?????

Scossa

unread,
Oct 20, 2009, 2:06:34 PM10/20/09
to
In article <30c593c2-dfc3-4481-8696-b300dc34abf6
@j9g2000vbp.googlegroups.com>, postm...@spaziogiovanimartesana.org
says...

>
> Grazie Scossa.....
> Intuisco ma non capisco
> Va bene anche il "barrato", ma non riesco a comprendere come risolvere
> TUTTO con la formattazione condizionale.
> In effetti la prima parte
> - Associare un "alert" (tipo colorazione cella Giorni Apertura) al

Ho buttato giù un foglio al volo, vedi se può andarti bene come base:

http://rapidshare.de/files/48553801/Farmaci.xls?killcode=999670708

Ovviamente non so come sono espressi i codici etc. per cui devi
adattare.

Fai sapere se hai risolto, grazie.

--

Bye!

Scossa

Scossa

unread,
Oct 20, 2009, 2:11:45 PM10/20/09
to

Scossa

unread,
Oct 20, 2009, 3:43:48 PM10/20/09
to
In article <MPG.25481bcc2...@news.individual.net>,
inv...@gmai.com says...
>
>
> http://rapidshare.de/files/48553838/Farmaci.xls.html

Piccola correzione:

http://rapidshare.de/files/48554445/Farmaci.xls.html

Qualche riga di spiegazione:

la colonna "scaduto" vale:

0 (in bianco quindi invisibile), per default;

n con n che va -4 a 0 (in realtà -0,1 ma il formato senza decimali
mostra 0) su fondo giallino quando mancano meno di 5 giorni alla
scadenza;

1 se è stata superata la data di scadenza;

2 se è stato superato il limite di giorni di apertura;

se viene inserita una data di smaltimento il carattere delle celle
diventa grigio e barrato.


--

Bye!

Scossa

Pino

unread,
Oct 21, 2009, 3:02:56 AM10/21/09
to
Grazie Scossa, in effetti assomiglia a ciò che avevo iniziato a
creare.
Stavo pensando ad una semplificazione, se possibile: associare (magari
in un foglio a parte se non ci sono altre possibilità) già a PRIORI la
data max di apertura al farmaco, in modo che inserendo in elenco
(colonna A) il solo nome del farmaco, in Max Giorni Apertura (colonna
G) appaia in automatico il tempo max così da velocizzare la
procedura.....

In ogni caso grazie mille......è bello trovare chi ti aiuta ad
imparare....

Scossa

unread,
Oct 21, 2009, 7:39:57 AM10/21/09
to
On 21 Ott, 09:02, Pino <postmas...@spaziogiovanimartesana.org> wrote:
> G) appaia in automatico il tempo max così da velocizzare la
> procedura.....

Premesso che lo strumento più adatto per questo genere di cose sarebbe
(per stare in Office) Access, e premesso che ho cercato di limatare al
minimo l'uso del VBA .....


http://rapidshare.de/files/48556909/Farmaci.xls.html


Ho aggiunto un foglio "BaseDati" che fa da "database farmaci" nel
quale viene cercato, tramite cerca.vert, il "nome prodotto" che
inserisci in cella A del foglio "InUso" e restituiti al foglio "InUso"
gli altri campi.
Pertanto è necessario che il prodotto che dovrai inserire nel foglio
"InUso" sia preventivamente inserito nel "database".

Per evitare:

1) di dovere predisporre un numero imprecisato di righe già formattate

2) che le formule nelle varie celle vengano accidentalmente
cancellate

ho protetto il foglio (tranquillo, senza password) e ho aggiunto, in
ciascun foglio, una macro (attivata facendo doppio-click dove
indicato) per poter aggiungere "alla bisogna" una nuova riga.

Nel foglio "BaseDati" questa macro permette, inoltre, di mantenere
automaticamente il range del nome "Farmaci" (utilizzato dal
cerca.vert) sempre allineato alle righe del database.

Nel foglio "InUSo" questa macro produce uno di due effetti:

- se la cella "A" soprastante il "riquadro" del doppio click NON E'
VUOTA, aggiunge una riga vuota (con tutte le formule/formattazioni già
predisposte) per inserire una nuova "confezione";

- se invece la cella "A" soprastante il "riquadro" del doppio click
E' VUOTA, elimina l'intera riga (quindi se vuoi eleminare l'ultima
riga, anche se completa, ti basta cancellare la cella "A" e poi fare
doppio click).

> In ogni caso grazie mille......è
> bello trovare chi ti aiuta ad imparare....

Direi che di spunti da studiare ne hai ... se hai bisogno chiedi.

Fai sapere come si evolve :-)

Bye!
Scossa

Pino

unread,
Oct 21, 2009, 8:43:56 AM10/21/09
to
"Combinazione" avevo già abbozzato qualcosa in access....
http://www.fileden.com/files/2008/5/4/1895747/farmaci.rar......ma,
ovviamente, mi è sembrato meno immediato diun foglio excel, anche se
sicuramente più funzionale.

Il tuo sistema è bellissimo, ma c'è il problema che io ho diverse
confezioni dello stesso prodotto (che so? 30 confezioni di valium 50
mg) ma con codice identificativo differente quindi la corrispondenza
codice nel foglio base dati non è necessaria, mentre è indispensabile
nel foglio in uso, ma va benissimo anche l'inserimento manuale.....
A parte ciò mi sembra perfettto, grazie Scossa....

Pino

unread,
Oct 21, 2009, 8:46:33 AM10/21/09
to

Scossa

unread,
Oct 21, 2009, 1:33:31 PM10/21/09
to
In article <8714f824-8557-486c-bc26-4dd841df5011
@u13g2000vbb.googlegroups.com>, postm...@spaziogiovanimartesana.org
says...

> Il tuo sistema è bellissimo, ma c'è il problema che io ho diverse
> confezioni dello stesso prodotto (che so? 30 confezioni di valium 50
> mg) ma con codice identificativo differente quindi la corrispondenza
> codice nel foglio base dati non è necessaria, mentre è indispensabile
> nel foglio in uso, ma va benissimo anche l'inserimento manuale.....

Ok, quindi basta che togli le formule nella colonna "C" e che togli il
"blocco" alle relative celle (menù formato -> celle -> protezione)

> A parte ciò mi sembra perfettto, grazie Scossa....

Grazie a te per il riscontro.

--

Bye!

Scossa

Pino

unread,
Nov 8, 2009, 9:41:46 AM11/8/09
to
On 21 Ott, 18:33, Scossa <inva...@gmai.com> wrote:
> In article <8714f824-8557-486c-bc26-4dd841df5011
> @u13g2000vbb.googlegroups.com>, postmas...@spaziogiovanimartesana.org

> says...
>
> > Il tuo sistema è bellissimo, ma c'è il problema che io ho diverse
> > confezioni dello stesso prodotto (che so? 30 confezioni di valium 50
> > mg) ma con codice identificativo differente quindi la corrispondenza
> > codice nel foglio base dati non è necessaria, mentre è indispensabile
> > nel foglio in uso, ma va benissimo anche l'inserimento manuale.....
>
> Ok, quindi basta che togli le formule nella colonna "C" e che togli il
> "blocco" alle relative celle (menù formato -> celle -> protezione)
>
> > A parte ciò mi sembra perfettto, grazie Scossa....
>
> Grazie a te per il riscontro.
>
> --
>
> Bye!
>
> Scossa

Ciao Scossa....non so riuscirai a vedere questo mio post dopo tanto
tempo.
Ma ci provo.
Del file su in questione vorrei capire se c'è la possibilità di
inserire nelle celle corrispondenti a Nome Prodotto del foglio InUso
un menù a "tendina" che elenchi in farmaci inseriti nelle celle Nome
Prodotto del foglio BaseDati.....
Cioè: inserisco i farmaci sul foglio BaseDati e poi li seleziono (così
come già scritti) dalle celle del foglio InUso....
Grazie per la disponibilità....

Pino

unread,
Nov 8, 2009, 12:13:38 PM11/8/09
to
> Ciao Scossa....non so riuscirai a vedere questo mio post dopo tanto
> tempo.
> Ma ci provo.
> Del file su in questione vorrei capire se c'è la possibilità di
> inserire nelle celle corrispondenti a Nome Prodotto del foglio InUso
> un menù a "tendina" che elenchi infarmaciinseriti nelle celle Nome
> Prodotto del foglio BaseDati.....
> Cioè: inserisco ifarmacisul foglio BaseDati e poi li seleziono (così

> come già scritti) dalle celle del foglio InUso....
> Grazie per la disponibilità....- Nascondi testo citato
>
> - Mostra testo citato -

Risolto......forse prima di scrivere......Inserisci> Nome nel primo
foglio e Dati>Convalida>Elenco sul secondo.....
Giusto? (pare di sì perchè funziona)

Pino

unread,
Nov 8, 2009, 12:27:04 PM11/8/09
to

Invece mi si crea un altro problema.......
Il farmaco può essere presente, cioè caricato, ma non ancora aperto e,
ovviamente, con data di scadenza.
Attualmente, quando inserisco la data di scadenza, mi diventa tutto
rosso e mi segnala scaduto 2.....
Non capisco...

fernando cinquegrani

unread,
Nov 8, 2009, 12:42:07 PM11/8/09
to
"Pino" <postm...@spaziogiovanimartesana.org> ha scritto nel messaggio
news:a28972a1-ec2d-46ec...@v30g2000yqm.googlegroups.com...

Invece mi si crea un altro problema.......

----

ciao pino, la tua prima richiesta � molto datata.
forse � il caso che tu la riprenda in un nuovo post.
� sicuramente opportuno in questi casi richiamare il thread:
http://groups.google.it/group/microsoft.public.it.office.excel/browse_thread/thread/ed20df89cf05adfe
.f

Scossa

unread,
Nov 8, 2009, 1:14:29 PM11/8/09
to
On 8 Nov, 18:27, Pino <postmas...@spaziogiovanimartesana.org> wrote:
> On 8 Nov, 18:13, Pino <postmas...@spaziogiovanimartesana.org> wrote:
>
>
>
> > > Ciao Scossa....non so riuscirai a vedere questo mio post dopo tanto
> > > tempo.

Ciao Pino,

> > Risolto......forse prima di scrivere......Inserisci> Nome nel primo
> > foglio e Dati>Convalida>Elenco sul secondo.....
> > Giusto? (pare di sì perchè funziona)
>

Non è così semplice.
Devi variare il range del nome ogni volta che inserisci un farmaco.

Vedi qui una possibile soluzione:

http://netload.in/datei4qWPWXu9Gb/Farmaci2.xls.htm

> Invece mi si crea un altro problema.......
> Il farmaco può essere presente, cioè caricato, ma non ancora aperto e,
> ovviamente, con data di scadenza.
> Attualmente, quando inserisco la data di scadenza, mi diventa tutto
> rosso e mi segnala scaduto 2.....

Vedi il file sopra (a me funziona) e fammi sapere.

Bye!
Scossa

Pino

unread,
Nov 10, 2009, 5:53:35 AM11/10/09
to
Intanto sempre grazie......

>Non è così semplice.
>Devi variare il range del nome ogni volta che inserisci un farmaco

Io avevo risolto dando un range =BaseDati!$A$3:$A$10000....ma il tuo
sistema è sicuramente migliore perchè a me, nell'elenco, ovviamente
appariva anche "doppio click per inserire....."

L'altro problema lo vedi anche sul tuo se per esempio alla riga 8 TAU
inserisci la scadenza 1/1/2011.......diventa tutto rosso....Per
evitare ciò devo inserire la stessa data identica in Data di
apertura.......
Va bene anche così, per carità.....
Questo è il mio elaborato
http://www.fileden.com/files/2008/5/4/1895747/FarmaciMio.rar
anche per farti vedere che "studio" oltre che a chiedere......
Ho tolto l'inserimento codice in BaseDati perchè è necessario solo
InUso, ora però devo togliere la protezione SOLO nelle celle Codice su
InUso.......
Grazie grazie grazie

Scossa

unread,
Nov 10, 2009, 8:06:53 AM11/10/09
to
In article <67b7d1fc-ab6c-445a-9348-c7e25a3d6837
@l13g2000yqb.googlegroups.com>, postm...@spaziogiovanimartesana.org
says...

> L'altro problema lo vedi anche sul tuo se per esempio alla riga 8 TAU
> inserisci la scadenza 1/1/2011.......diventa tutto rosso....Per
> evitare ciò devo inserire la stessa data identica in Data di
> apertura.......

Al volo, da testare bene, puoi risolverlo sostituendo nella formula in F
(qui F8) "" con 0:
quindi

=SE(E8<>"";OGGI()-E8;"")

diventa

=SE(E8<>"";OGGI()-E8;0)

e di conseguenza in colonna I (qui I8):

=SE(O(H8<>"";F8<>"");SE(F8>G8;2;SE(OGGI()>H8;1;SE((H8-OGGI())<5;-(H8-
OGGI())-0,1;0)));0)

con

=SE(O(H8<>"";F8<>0);SE(F8>G8;2;SE(OGGI()>H8;1;SE((H8-OGGI())<5;-(H8-OGGI
())-0,1;0)));0)


> Questo è il mio elaborato
> http://www.fileden.com/files/2008/5/4/1895747/FarmaciMio.rar
> anche per farti vedere che "studio" oltre che a chiedere......

Ottimo, vedrai che è una soddisfazione constatare i propri progressi!


Bye!
Scossa

carlo.zunc...@gmail.com

unread,
Feb 6, 2015, 1:36:22 PM2/6/15
to
Ciao, ho bisogno del file farmaciMio.rar
impossibile scaricarlo dal link indicato.
sono un medico e avrei bisogno di aiuto.
la mia email: carlo.zunc...@gmail.com

Giuseppe Floridia

unread,
Feb 9, 2015, 3:18:41 AM2/9/15
to
Questo è quello che mi è rimasto di quel progetto..... vedi se ti va bene!

https://drive.google.com/file/d/0B3FpwVv2BhP_YmRmZGRuU29iMVZJNFhpWmNkb0IwYU5yTS1V/view?usp=sharing
0 new messages