di geri21 » 06/02/11 13:27
Ciao Anthony,
tutto risolto, responsabile la macro sotto copiata, che pur confezionata correttamente copiava ed incollava non la colonna riportata nel codice bensì la colonna immediatamente a sx.
Ho provato i codici descritti, opportunamente modificati, ed entrambi non producono alcun effetto.
In sostanza si ripropone che la macro di cui sotto, si attivasse allorché venga digitato nella cella Z1 del foglio ("Cls.Trn.”) lo stesso valore visualizzato dalla cella B4 del foglio “TORNEO” contenente la funzione “OGGI ()”. In tal modo la copia avviene solo digitando in Z1 la data visualizzata dalla funzione “OGGI()”.
Sub Macro61()
' Macro61 Macro
' Seconda Settimana
Sheets("TORNEO").Select
Range("AD8:AD57").Select
Selection.Copy
Sheets("Cls.Trn.").Select
Range("AG3:AG52").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False 'incollo solo i valori, non eventuali formule
Application.CutCopyMode = False 'elimina il tratteggio delle celle copiate
Sheets("TORNEO").Select
Range("AE8:AF57").Select
Selection.Copy
Sheets("Cls.Trn.").Select
Range("AE3:AF52").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False 'incollo solo i valori, non eventuali formule
Application.CutCopyMode = False 'elimina il tratteggio delle celle copiate
End Sub