Macro que modifique la celda actual

¡Importante!: Colabora con el grupo.Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias.

Puesto en un botón el código puede ser el siguiente:

Sub Botón1_AlHacerClic()
ActiveCell.Value = Left(ActiveCell.Value, -3 + Len(ActiveCell))
End Sub


SALUDOS.
Julián-Valencia-España
http://ijulian.iespana.es/


"Ubaldo" escribió en el mensaje
news:

Hola a todos

Podeis ayudarme a crear una Macro que cuando yo la ejecute esta coja el
contenido de la celda actual la edite para quitarle tres caracteres del
final
y vuleva a dejar el nuevo valor en la celda.

Por ejemplo si me situo en una celda que pone Barcelona y ejecuto la
macro,
me cambie la ceda y ponga Barcel, o sea le quite las 3 finales.

Gracias

Me ha funcionado perfectamente,
Muchas Gracias por tu colaboración

Un abrazo

"julian-vlc-sp" escribió:

> ¡Importante!: Colabora con el grupo.Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias.
>
Puesto en un botón el código puede ser el siguiente:

Sub Botón1_AlHacerClic()
ActiveCell.Value = Left(ActiveCell.Value, -3 + Len(ActiveCell))
End Sub


SALUDOS.
Julián-Valencia-España
http://ijulian.iespana.es/


"Ubaldo" escribió en el mensaje
news:
> Hola a todos
>
> Podeis ayudarme a crear una Macro que cuando yo la ejecute esta coja el
> contenido de la celda actual la edite para quitarle tres caracteres del
> final
> y vuleva a dejar el nuevo valor en la celda.
>
> Por ejemplo si me situo en una celda que pone Barcelona y ejecuto la
> macro,
> me cambie la ceda y ponga Barcel, o sea le quite las 3 finales.
>
> Gracias

ola amores, no me apetece solucionar vuestros problems, xq ya tengo bastante
con los mios...si soys burricos no es mi problemasjajaajajjaja, no o lo
tomeis mal q es un bromic, jajjajajajjaja
"Ubaldo" escribió en el mensaje
news:

Hola a todos

Podeis ayudarme a crear una Macro que cuando yo la ejecute esta coja el
contenido de la celda actual la edite para quitarle tres caracteres del

final

y vuleva a dejar el nuevo valor en la celda.

Por ejemplo si me situo en una celda que pone Barcelona y ejecuto la

macro,

me cambie la ceda y ponga Barcel, o sea le quite las 3 finales.

Gracias