[Risolto]Inserimento data

[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

[patel]

io non ho capito, ma a giudicare dall'assenza di risposte credo anche gli altri

[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.

[epico]

OTTIMO

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

[Gaetanopr]

Ad associare la macro a 12 fogli si ci impiega un attimo, per il listener la macro andrebbe in gran parte cambiata.

[epico]

Ok grazie