kamirotemi

Eduard Caballero respondió: Prueba esto a ver si hace lo que quieres Sub entero() Dim numero As Integer Sheets(1).Range("A1").Select Do While Not IsEmpty(ActiveCell) numero = Right(ActiveCell, 1) If numero = 0 Then ActiveCell.Select With Selection.Interior .Color = 255...

calvuch respondió: Veamos, no me quedo muy claro el tema. Hoja1 ColA =valor hoja1ColB= ?? Hoja2 ColA="=Hoja1!A1/1000000" ¿En Hoja3 y hoja4 deseas los mismos valores? Indica : ¿Hay una forma de que al cargar los valores en Col A l de que hoja? ¿La hoja 1? Por que si...