[Risolto]Inserimento data
Inviato: giovedì 19 maggio 2016, 17:52
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
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