Condividi:        

Help con 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

Help con Excel

Postdi Calimero2008 » 14/04/12 17:49

Innanzi tutto voglio congratularmi con lo staf per il servizio che danno, vorrei porvi il mio problema che mi sta affliggendo se nella cella A5 metto un nome vorrei che nella cella D8 mi venisse in automatico un numero progressivo so che con VBA si può fare io non lo so fare, mi date un aiuto?
Vi ringrazio anticipatamente
Calimero2008
Newbie
 
Post: 5
Iscritto il: 14/04/12 17:43

Sponsor
 

Re: Help con Excel

Postdi Zer0Kelvin » 14/04/12 23:10

SE ho capito bene quello che vuoi fare questo è un metodo per incrementare una cella ogni volta che modifichi la cella A5:
- entra nell'editor VBA con ALT-F11
- nella finestra PROGETTO (a sinistra) fai doppio click sul nome del foglio che ti interessa
- nella finestra del codice (a destra) incolla questo codice:
Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
    If (Target.Address = "$A$5") And ([A5] <> "") Then
        [D8] = [D8] + 1
    End If
End Sub

adesso torna in Excel e prova a inserire un nome in A5.
In bocca al lupo, ciao! :D
[Win7,Office2010]
Condividere la conoscenza aumenta la ricchezza di tutti(Z0°K)
Dai ad un uomo un pesce e lo avrai sfamato per un giorno;insegnagli a pescare e lo avrai sfamato per sempre(Confucio)
Il sonno della ragione genera mostri(Francisco Goya)
Avatar utente
Zer0Kelvin
Utente Senior
 
Post: 388
Iscritto il: 08/04/12 11:23

Re: Help con Excel

Postdi Calimero2008 » 15/04/12 16:21

Purtroppo ho provato la tua soluzione ma non funziona, manca qualche pass?
Calimero2008
Newbie
 
Post: 5
Iscritto il: 14/04/12 17:43

Re: Help con Excel

Postdi Flash30005 » 15/04/12 16:27

La soluzione di Zer0elvin soddisfa la tua richiesta
magari manca qualcosa nella tua spiegazione

Il codice postato va nel foglio e non nel modulo
ad ogni scrittura in A5 la cella D8 incrementa di 1
cos'altro dovrebbe fare la macro?

ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Help con Excel

Postdi Calimero2008 » 15/04/12 16:54

Scusa, sono 2h che ci provo ho rivisto il foglio che m'interessa la cella in questione e la B6 dove scrivo az100 e la numerazione progressiva si trova in G2 avendo scritto 10 mi aspettavo che riscrivendo in B6 un altra sigla il contatore aumentasse di 1
Io ho copiato il codice come descritto pur sostituendo le celle dell esempio messaggio precedente con quelle che a me servono, il VBA mi da errore di sintassi
Calimero2008
Newbie
 
Post: 5
Iscritto il: 14/04/12 17:43

Re: Help con Excel

Postdi Flash30005 » 15/04/12 17:14

Se cambi gli indirizzi devi cambiare anche i riferimenti nella maco
dici che lo hai fatto e ti dà errore?
evidentemente hai sbagliato a modificare le celle
prova questa macro modificata secondo le tue ultime specifiche
Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
    If (Target.Address = "$B$6") And ([B6] <> "") Then
        [G2] = [G2] + 1
    End If
End Sub


Fai sapere
ciao
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Help con Excel

Postdi Calimero2008 » 15/04/12 17:38

Ho copiato il tuo ultimo passaggio, mi da errore di fine istruzione non capisco come mai, e pure e quello che mi hai mandato
Calimero2008
Newbie
 
Post: 5
Iscritto il: 14/04/12 17:43

Re: Help con Excel

Postdi Flash30005 » 15/04/12 17:45

Hai per caso il foglio protetto?
se si devi sproteggerlo

la macro l'ho testata e funziona
ad ogni scrittura in B6 aggiunge 1 al valore precedente di G2

allego il file funzionante
Flash
Win10 + Office 2010 Ita
"Fotografica" al servizio dell'immagine
Avatar utente
Flash30005
Moderatore
 
Post: 8517
Iscritto il: 27/09/07 11:44
Località: Roma +o-

Re: Help con Excel

Postdi Calimero2008 » 15/04/12 18:27

Sei stato grande dimenticavo di chiudere il progetto, ti ringrazio tanto davvero e ancora complimenti per l'aiuto paziente che mi avete dato
Demi
Calimero2008
Newbie
 
Post: 5
Iscritto il: 14/04/12 17:43


Torna a Applicazioni Office Windows


Topic correlati a "Help con Excel":


Chi c’è in linea

Visitano il forum: Nessuno e 34 ospiti

cron