Enrique Bernal

Para mi ejemplo estoy considerando que en A tienes los valores que pagan o deben, en la columna B tienes la observación que define si el valor corresponde a algún pago En C1 Coloco la palabra Monto adeudado, en C2 coloco la palabra Monto Pagado. Por...

Prueba con este cambio en tu código: En lugar de :Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Pon: Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _ xlNone,...

Imagino que dependiendo del código, necesitas que la macro ordene en la forma que tienes en la segunda parte de tu código, pero lo que no entiendo es que indicas que todo esta en una celda, es decir, en la primera parte, toda la info esta en A1 o la...

Como le dices a la macro, cuando es la primera vez que mandas a copias, y cuando es la segunda.?

Esto debería hacer lo que necesitas, prueba y me avisas. Sub SEND_EMAIL() 'Crear un mensaje de alerta pidiendo una contraseña Entrada = InputBox("Password Please", "Restricted Accessssss") If Entrada = "123456789"...

Espero que la siguiente rutina te sirva: 1) Para mi ejemplo los datos repetidos están en la columna B 2) En A2 coloca la siguiente formula: =SI(ESERROR(BUSCARV(B3,$B$1:B2,1,0))=VERDADERO,CONTAR.SI(B:B,B3),"") y copio esta formula para el resto de...

Esta rutina me sirvió a mi, la copie de la red. Paso 1: Haz clic en inicio -> ejecutar Teclea lo siguiente cmd <ENTER> Se abrirá una ventana del Símbolo de sistema Paso 2: Teclea: edit /70 <ENTER> Paso 3: Selecciona tu archivo y lo abres. Nota...

Dentro de tu código antes de insertar la imagen puedes desactivar el bloqueo ActiveSheet. Unprotect "1234" Y lueego de ya insertada la imagen vuelves a bloquearlo: ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True,...

Basado en tu ejemplo te dejo esta macro que a mi entender hace lo que necesitas: Para la macro he considerado que la matriz de la Hoja 2 tiene el nombre en la columna A, y los datos de C6 y C7 están en B y C respectivamente. Tu debes modificar la...

Yo hice los cambios que tu mencionas y a mi si me funciono la macro, te paso los códigos con los cambios realizados, espero te sirva porque yo lo corro y funciona. Sub Traer() Application.ScreenUpdating = False Sheets("hoja2").Select...