Marleny Medina

Mi Quiero Dante En base a esta macro que me creaste Sub Trasladar() 'Por.Dante Amor Application.ScreenUpdating = False Set h1 = Sheets("Hoja1") Set h2 = Sheets("Hoja2") If h1.[F1] = "" Or Not IsDate(h1.[F1]) Then MsgBox "Escribe una fecha correcta en...

Tengo la siguiente tabla en la hoja1. Quisiera una macro que al ejecutarse me pregunte la fecha que deben tener los productos que quiero trasladar a la hoja2. Cuando yo le estipule la fecha entonces tome esa fecha y verifique otra condición que es...

Tengo una tabla con items por filas desde la fila 2 en adelante. En la columna "A" tengo el código de cada producto (Este es el que deseo analizar a través de una fórmula que se pueda colocar en la columna "F", si en las filas siguientes es decir en...

Dante amor Siguiendo con nuestro ejemplo, que tal si por ejemplo entonces hacemos lo siguiente en base a la macro del que estábamos hablando: Sub Macro1() 'Act.Por.Dante Amor Dim FileWsh As Object Set FileWsh =...

Dante Amor ¿Me podrías mejorar la siguiente macro según mis requerimientos? Gracias, aquí te la envío Sub Macro1() ' Dim FileWsh As Object Set FileWsh = CreateObject("Scripting.FileSystemObject") MiVolumen = Hex$( _ FileWsh.Drives("C").SerialNumber)...

Hola DANTE Quería saber si me puedes ayudar con lo siguiente. Me gustaría una macro que validara si en la celda D10 hay 4 palabras. Ejemplo: CARRO MOTO AVIÓN TREN (Separadas por 1 solo espacio entre ellas). Si hay las 4 palabras la macro pone "OK" en...

Hola DANTE Quería averiguar si sabes alguna solución con respecto al siguiente inconveniente que se me esta presentando. Resulta que manejo muchos archivos en excel al mismo tiempo. 4 ó 5 abietos al mismo tiempo. Cuando ejecuto una macro en alguno de...

Hola DAM Que pena molestarte, es que se me olvido darte 2 acciones más en la anterior macro que me dijiste Sub copiarcelda() 'Por.Dante Amor Workbooks("Programa Pacientes.xlsm").Sheets("Inscripcion_Paciente").Range("C8").Copy Workbooks("Programa...

Hola DANTE Me gustaria saber si hay alguna macro que copie el contenido de una celda de un archivo a otro. Tengo un libro llamado "Programa Pacientes.xlsm" en el tengo una hoja llamada "Inscripcion_Paciente" En la celda "C8" coloco el ID del paciente...

Hola Dante Tengo la siguiente macro Sub GrabarPacienteNuevo() Range("D10") = UCase(Range("D10")) Range("D13") = UCase(Range("D13")) Range("D18") = UCase(Range("D18")) Range("D16") = LCase(Range("D16")) Application.ScreenUpdating = False Set h1 =...