|
|
Si necesitas una macro, esta te servirá que se ejecuta una vez que hayas seleccionado el rango:
Sub redondeo()
For Each celdita In Selection
[b]valor = Mid(celdita.Value, 1, 3) + 1[/b] 'toma la cifra de 5 caracteres y la transforma en 3
celdita.Value = valor
Next
End Sub
'si aún tiene 2 letras delante reemplazá la línea de [b]valor=......[/b] por esta otra:
[b]valor = Mid(celdita.Value, 3, 3) * 1 + 1[/b]
Saludos
Elsa
[i]Tus mejores opciones en manuales [b]Excel [/b]desde:[/i]
[url=http://es.geocities.com/lacibelesdepunilla/manuales]http://es.geocities.com/lacibelesdepunilla/manuales[/url]
|