Pagina 1 di 1

[Risolto]Inserimento data

Inviato: giovedì 19 maggio 2016, 17:52
da epico
Salve mi servirebbe una macro che digitando solo il giorno mi inserisca la data nel formato “GG NN”
Il file è formato da 14 fogli (12 mesi + 2 di servizio)
Quindi l'inserimento avviene nei primi 12 fogli nel range (“B4:B45” , “B57:B98”)

oSheets = oDoc.Sheets()
For index=0 to oSheets.getCount() -2

Range = Sheet.getCellRangeByName("B4:B45", "B57:B98")


DATA codice formato “GG NN”

Anno = I2 ' cella di ogni foglio da dove prende l'anno
Anno = $Totale.$D$2 ' è uguale a sopra

Mese = SHEET() 'foglio corrente
Giorno = Target.String 'la cella in cui stò digitando

grazie

Re: Inserimento data

Inviato: sabato 21 maggio 2016, 10:35
da patel
io non ho capito, ma a giudicare dall'assenza di risposte credo anche gli altri

Re: Inserimento data

Inviato: sabato 21 maggio 2016, 11:02
da Gaetanopr
Ti allego file con macro che si aziona al modificarsi del valore nelle celle da te indicate, è associata all'evento "contenuto modificato", l'associazione deve essere fatta su ogni foglio interessato facendo tasto dx sulla linguetta di ognuno di esso.
Ogni foglio va chiamato con le prime 3 lettere dei nomi dei mesi in maiuscolo come hai fatto per i primi due.

Re: Inserimento data

Inviato: sabato 21 maggio 2016, 13:29
da epico
OTTIMO :super:

Mi chiedevo se è meglio inserire in ogni foglio associato all'evento "contenuto modificato"
o eventualmente un Listener (che non sono in grado) associato all'apertura documento

Re: Inserimento data

Inviato: lunedì 23 maggio 2016, 9:23
da Gaetanopr
Ad associare la macro a 12 fogli si ci impiega un attimo, per il listener la macro andrebbe in gran parte cambiata.

Re: Inserimento data

Inviato: lunedì 23 maggio 2016, 21:13
da epico
Ok grazie