Rudy Quispe

Tengo un libro POR que tiene la macro Private Sub Worksheet_Calculate(), al ejecutar la secuencia de la macro de otro libro Y no se porque motivo se dirige a la macro que esta compuesta por Private Sub Worksheet_Calculate() como si perteneciera a ese...

Pido su apoyo en una macro que me guarde el usuario, fecha y hora que se realizo la modificación al un libro estos siempre y cuando hubiera realizado la modificación, y guardarlo en la Hoja Auditor en forma histórico.

Tengo la siguiente macro: Sub CopiaFechaVencimientoC() Application.Calculation = xlCalculationAutomatic CUO = Hoja8.Range("AR1") - 1 ActiveSheet.Range("$A$8:$BP$59").AutoFilter Field:=7, Criteria1:="<>" Range("G9:G" & CUO).Select With...

Tengo dos Private Sub Worksheet_Change que cada vez que modifique el valor de una celda especifica me debe ejecutar la macro. La primera Private Sub Worksheet_Change es el siguiente: Private Sub Worksheet_Change(ByVal Target As Range) If...

Quisiera su apoyo en la siguiente macro, no se si es posibles realizarlo: 1.- En la hoja Data se tiene la información de mes y año 2.- En la hoja Registro, se ingresa la información del mes y esto dependerá en qué mes se encuentra la hoja Data, cada...

Tengo la siguiente macro: Sub ExportarCompleto() Dim UltimaFila As Long Dim dir As FileSystemObject Set dir = New FileSystemObject Dim Archivo As String Dim Linea As String Dim Origen As Long Archivo = Range("D_DISCO") & ":\CARGA MASIVA PLAME" If...

Tengo la siguiente macro que cada vez que ingreso un dígito y se repite lo sombrea, quisiera en vez de sombrearse hay forma que me de una Alerta o mensaje que ya existe el dato registrado, a la vez me puedan ayudar en reducir la ejecución de las...

Como hago para cargar ese macro Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Column = 1 Then dato = Target.Value contarsi = Application.WorksheetFunction.CountIf(Columns(1), dato) If contarsi > 1 Then MsgBox "el...