Necesito MACRO que se ejecute el día 1 de cada mes
Un saludo muy fuerte.
al escribir " < " este signo en una celda se ejecuta :
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Union(Target, [D488]).Address = [D488].Address Then
If Target = "<" Then
Range("F482:M485").Copy
Range("F488:M491").Select
ActiveSheet.Paste
Range("F482:M485").Select
Selection.ClearContents
End If
End If
End Sub
Tambien tengo esta macro :
Sub Macro1()
Sheets("Listado").Select
Range("F482:M485").Select
Selection.Copy
Range("F488:M491").Select
ActiveSheet.Paste
Range("F482:M485").Select
Selection.ClearContents
End Sub
Y no se como programarlas para el dia 1 de cada mes, que lo haga automaticamente.
Gracias
1 Respuesta
Que es lo que ocupas si me das mas detalles podría ayudarte
que se ejecuten el 1 de cada mes automáticamente cualquiera de los dos códigos.
Me gustaría subir un archivo de ejemplo y no se como subirlo.
Gracias por contestar
No qui no se puede subir archivos en todo caso seria enviármelo al correo
Te he mandado un correo
Gracias
Mándamelo a este
te lo he mandado ya.
Un saludo
Ya te respondi
