Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Incremento Cella Excel

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Incremento Cella Excel

Postdi duska » 03/05/11 10:19

Salve a tutti,
sono nuovo e non so se sto scrivendo nella sezione giusta.
Vi spiego il mio problema sperando che qualcuno di voi possa aiutarmi usando excel:

Ho 37 numeri che vanno da 0 a 36, ora inserendo un numero compreso in questo range vorrei che ci sia un contatore che mi calcoli quante volte non è presente.
In buona sostanza per farla più semplice e seguendo uno schema logico il funzionamento che dovrei ottenere è questo:

Inserisco a mano il numero 32 ---> la funzione riconosce il numero ( numero inserito diverso da 32) ----> incremanta contatore di 1.

Appena il numero esce ( quindi in questo caso il 32, il contatore si azzera).

Vi faccio un esempio che 3 numeri per rendere chiaro il tutto:

numeri in tabella:

32, 15 , 3

numeri estratti:

5,9,4,32,0,3

il risultato dovrebbe essere questo:

32 = contattore a 2 in quanto è stato azzerato alla 4° estrazione
15 = contatore a 6 in quanto mai uscito e quindi sempre incrementato
3= contatore a 0 in quanto uscito all'ultima estrazione.

Non so se sono stato molto chiaro, ma mi sono sforzato al massimo per esserlo.

Potete aiutarmi a realizzarlo?
Grazie.
duska
Newbie
 
Post: 3
Iscritto il: 03/05/11 10:06

Sponsor
 

Re: Incremento Cella Excel

Postdi Statix » 03/05/11 11:46

Ciao duska,
devi usare questa formula,che devi adattare ai tuoi riferimenti
Codice: Seleziona tutto
=SE(CONTA.SE($A1:$E1;L$1)>0;0;L2+1)


in L1: AV1 scrivi i numeri da 0 a 36
la formula adattata va scritta in L2 e copiata fino a AV2 e poi tiri giù per quante righe hai dei dati.
Statix
Windows 7,
Office 2010,
Statix
Utente Senior
 
Post: 1078
Iscritto il: 12/05/06 21:55
Località: Provincia di Caserta

Re: Incremento Cella Excel

Postdi duska » 03/05/11 14:38

Ciao Statix grazie per la risposta,
ma il problema è diverso, nel senso che l'incrementazione deve avvenire quando io manualmente inserisco un numero.

Cerco di spiegarmi meglio:

Ho in tabella i numeri 0,1,2,3
ora manualmente devo inserire un numero compreso tra questi e incremetare di uno tutti quelli non uguali, mentre il numero uguale si deve azzerare.

Quindi supponiamo che nella prima estrazione esce il numero 1, dovrò avere la seguente situazione:

tabella: 0 1 2 3
incrementati: 1 0 1 1

Poi alla seconda estrazione esce nuovamente il numero 1:

tabella: 0 1 2 3
incrementati: 2 0 2 2

Alla terza estrazione esce il numero 2, quindi:

tabella: 0 1 2 3
incrementati: 3 1 0 3

Alla quarta estrazione esce ancora il numero 2:

tabella: 0 1 2 3
incrementati: 4 2 0 4

Quelle che io chiamo estrazioni sono in realtà i numeri che io di volta in volta inserirò manualmente uno alla volta e sempre nella stessa cella.

Spero di essere stato più chiaro.
duska
Newbie
 
Post: 3
Iscritto il: 03/05/11 10:06

Re: Incremento Cella Excel

Postdi Anthony47 » 03/05/11 23:37

Ciao duska, benvenuto nel forum.

Ad esempio:
I tuoi dati sono in A2:F2, e il numero che inserisci a mano e' in J2.
Tasto dx sul tab col nome del foglio, scegli Visualizza codice, copia questa macro e incollala nel frame di dx.
Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$J$2" Then Exit Sub    '<<< la cella dove scrivi
CheckArea = "A2:F2"                     '<<<< le celle con i numeri
Application.EnableEvents = False
For Each Cella In Range(CheckArea)
    If Cella = Range("J2").Value Then
        Cella.Offset(1, 0) = 0
        Else: Cella.Offset(1, 0) = Cella.Offset(1, 0) + 1
    End If
Next Cella
Application.EnableEvents = True
End Sub
Adatta le istruzioni marcate <<< al tuo layout dati, rispettando la sintassi.

Il contatore di cui parli sara' costruito sulla riga successiva a quella dei dati; nell' esempio quindi in A3:F3.

Ciao, fai sapere
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Incremento Cella Excel

Postdi duska » 04/05/11 09:06

Grandissimo, è perfetto proprio come dicevo io!
Ora devo solo adattarlo per più celle, ma questo posso farlo io da solo senza problemi.
Grazie ancora!
duska
Newbie
 
Post: 3
Iscritto il: 03/05/11 10:06


Torna a Applicazioni Office Windows


Topic correlati a "Incremento Cella Excel":


Chi c’è in linea

Visitano il forum: Nessuno e 16 ospiti