Luis Mondelo

En el siguiente enlace te dejo un ejemplo de lo que solicitas para que lo uses en tus ejemplos. http://es.tbox.ws/2BFNKC No olvides finalizar la consulta

Esta sería la otra parte que necesitas para hacer lo del rango A1 Sub ejemplo() 'por luismondelo Sheets("hoja2").Select Range("a65000").End(xlUp).Offset(1, 0).Select Do While ActiveCell.Offset(0, 2).Value <> "" ActiveCell.Value =...

No puedo ver bien la imagen. Mándame el archivo con un ejemplo para poder ayudarte. [email protected]

¿Cuándo dices si es igual te refieres a esto? Por ejemplo: si E2 de hoja1 = E2 de hoja2 (mismas coordenadas) ó Si el contenido de E2 de hoja1 está en cualquier celda de la columna E de la hoja2

Te mando mi solución: -Escribe ese dato en la celda A1 -Después ejecuta esta macro y todo resuelto (puedes seguir ejecutándola sucesivamente) Sub ejemplo() Range("a65000").End(xlUp).Select Selection.AutoFill Destination:=Range(ActiveCell,...

Tu problema se puede solucionar implantando un formato condicional en dichas celdas. ¿Sabes usarlo? Si quedó conforme recuerda finalizar la consulta

Copia esta macro dentro del objeto ThisWorkbook y todo solucionado. Ya no funcionará el click derecho del ratón. Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean) Cancel = True End Sub no olvides...

Mándame el archivo con un ejemplo hecho a mano de lo que quieres hacer [email protected]

Ya te he enviado la modificación por mail Recuerda finalizar la consulta

Te mando mi solución, sigue mi ejemplo: Me imagino que tenemos los datos en la hoja1 y ocupando el rango A1:¿E? (En la fila 1 está en encabezado) Ejecuta esta macro y problema resuelto Sub EJEMPLO() 'por luismondelo Sheets("hoja1").Select...