incremento numero

Hai un problema con Excel?

Nuova discussione

incremento numero
di milena (utente non iscritto) data: 17/06/2016 17:49:30
Buongiorno,
ho una cartella composta da 3 fogli.
Quelli che interessano sono il "Foglio1" e il "Mod.Fattura"
Nel "Foglio1", cliccando sulla macro "Ricerca" ed inserendo una stringa di 16 lettere e numeri, si va a creare un nuovo foglio, nell'esempio chiamato "BelliniAngelo", dove viene copiato il "ModFattura", che comprende anche un pulsate, "Numero Fattura", che, nel caso in questione, cliccandolo, genera il numero "1" che sarà quello della prima fattura.
Inserendo con la" ricerca" del "Foglo1, un nuovo nominativo, va a copiare la stessa macro, con lo stesso pulsante "Numero Fattura" che non tiene però conto però del numero della fattura precedente e quindi, cliccandolo, genera ancora il numero 1, anzichè il 2, in cella J9.(come si vede nell'allegato)
Bisognerebbe che questo pulsante abbia una memoria e ricordi sempre il numero precedente!!
Con le mie scarse cognizioni di visual basic, non rieco a risolvere il problema.
Se qualcuno mi potesse dare un aiuto, sarei molto felice!!
Ringraziando, saluto cordialmente.

milena
Sub incrementa() With Selection .Value = .Value + 1 End With End Sub
di patel data: 17/06/2016 18:00:47
Secondo me devi adibire una colonna del foglio1 a contenere i numeri delle fatture ed ogni volta che vai a farne una nuova leggere l'ultimo valore della colonna e crearne uno nuovo, quindi via il pulsante e creazione della nuova fattura già col numero corretto
incremento numero
di milena (utente non iscritto) data: 17/06/2016 19:46:00
Grazie per la tempestiva risposta.
Se ho ben capito, devo usare una colonna del "fFoglio1" ad esempio la "D" e in "D1" con il pulsante macro "Numero Fattura" in D1 creare il nunero 1 per la prima ricerca e poi, via via, per le altre.2,3,4,5,6.....
Però questo numero "1" in cella D1, va inserito nel nuovo foglio "BelliniAngelo" nella cella "J9", ma in che modo ?
Manualmente o meglio con qualche collegamento, che però non ho idea di come si possa fare ?
Manualmente, non mi sembra una soluzione da visual basic.
Mi puoi dare qualche dritta, su come fare questo collegamento sul nuovo foglio ?
Ringraziando, saluto cordialmente
milena
incremento numero
di milena (utente non iscritto) data: 17/06/2016 20:09:54
Ho fatto un tentativo.
Con questa aggiunta, funziona bene per i nominativo.
Proseguendo con un altro nominativo, ritorna sempre sol foglio "BelliniAngelo"
Mi puoi aiutare ?
Ringraziando, saluto cordialmente.

milena
Sheets("Foglio1").Select Range("D1").Select Selection.Copy Sheets("zaraantonio").Select Range("J9").Select ActiveSheet.Paste
di patel data: 17/06/2016 20:39:29
ti allego il file modificato.
Perché tutti quei moduli ? ne basta uno solo con tutte le sub
di milena (utente non iscritto) data: 18/06/2016 10:14:17
Grazie mille, complimenti!!! è tutto OK.
Da sola non ci sarei mai arrivata.
Ho ancora tanta strada da fare !!!
Cordiali saluti e un buon fine settimana
Milena

Vuoi Approfondire?