Javier Sanchez Antonio

Hola experto tengo una pequeña duda Tengo este código en cada una de las celdas son vínculos que tomo de otros libros ='K:\Subdireccion de Operacion\PROGRAMACION DE LA PRODUCCION\GPP\Reportes\COSOLEACAQUE\MARZO\[BALANCE 020309.xls]Reporte'!$D$36 son...

Hola amigo experto Tengo una pequeña duda Tengo valores en un libro de excel relacionados con vínculos de otros libros y deseo que los valores se conviertan en 0, o estén limpias las celdas pero sin afectar los vínculos establecidos. Por ejemplo:...

Olaaa experto Tengo una duda El programa que estoy realizando es de remplazo de datos pero antes de remplazarlos tengo que seleccionar la columna que deseo remplazar pero quiero poner una condición de que si la columna no esta seleccionada que me...

Hola amigo experto Tengo una pequeña duda Tengo valores en un libro de excel relacionados con vínculos de otros libros y deseo que los valores se conviertan en 0, o estén limpias las celdas pero sin afectar los vínculos establecidos. Por ejemplo:...

Olaaa experto, antes que nada t agradezco por el código que me mandaste me esta sirviendo de mucho tengo otra pequeña duda este es el código con el que estoy trabajando Private Sub CommandButton2_Click() fecha1 = InputBox("Fecha que desea...

Hola amigo! Tengo una duda habrá una función en visual para convertir de letras a números lo que pasa es que estoy realizando una validación de fechas con hojas de excel . Ejemplo: ='K:\Subdireccion de Operacion\PROGRAMACION DE LA...

Hola amigo! Tengo una duda habrá una función en visual para convertir de letras a números lo que pasa es que estoy realizando una validación de fechas con hojas de excel . Ejemplo: ='K:\Subdireccion de Operacion\PROGRAMACION DE LA...

Hola amigo! Tengo una duda habrá una función en visual para convertir de letras a números lo que pasa es que estoy realizando una validación de fechas con hojas de excel . Ejemplo: ='K:\Subdireccion de Operacion\PROGRAMACION DE LA...

Reporte 1 Private Sub CommandButton4_Click() fecha1 = InputBox("Fecha que desea sustituir?", "ORIGEN", Now()) If fecha1 = Empty Then Exit Sub 'mejorar con revisión validez fecha fecha2 = InputBox("Fecha nueva?", "DESTINO", Now()) If fecha2 = Empty...

Olaaa Private Sub CommandButton1_Click() Columns("J:J").Select Selection.Replace What:="[BALANCE 040309", Replacement:="[BALANCE 040309", _ LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:= _ False, ReplaceFormat:=False End Sub...