............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

AGREGAR UN TEXTO ANTES O DESPUES DE OTRO EN EXCEL

Ver el tema anterior Ver el tema siguiente Ir abajo

AGREGAR UN TEXTO ANTES O DESPUES DE OTRO EN EXCEL

Mensaje por JONATHAN el Vie Ago 08, 2008 12:22 am

Hola a todos necesito crear una macro que me permita agregar un mismo texto a unas celdas que yo seleccione, ejemplo: si la palabra que yo deseo agregar es CASA a un rango de celdas que seleccione, si una de ellas dice: ZAPATO, ahora diga CASAZAPATO, me interesa colocarle tanto texto al principio como al final, por lo que me figuro que deben usarse dos codigos de concatenación (para antes y para después), yo tengo la idea de que debo primero seleccionar las celdas y despues iniciar con un "For Ech celda In Selection..."pero no se que mas ponerle ¿Alguien me puede ayudar? Saludos a todos y Gracias de cualquier modo.

Jonathan

JONATHAN

Cantidad de envíos : 24
Fecha de inscripción : 28/04/2008

Volver arriba Ir abajo

Re: AGREGAR UN TEXTO ANTES O DESPUES DE OTRO EN EXCEL

Mensaje por ioyama el Vie Ago 08, 2008 3:41 am

Hola Jonathan

En el adjunto tienes dos macros que podrían servirte.

La segunda te va pidiendo los datos.

Revísalas y tú mismo

Archivo adjunto

Un saludo desde Vitoria

ioyama
Moderador
Moderador

Masculino Cantidad de envíos : 128
Edad : 53
Ciudad - Pais : Vitoria (España)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: AGREGAR UN TEXTO ANTES O DESPUES DE OTRO EN EXCEL

Mensaje por JONATHAN el Vie Ago 08, 2008 5:32 pm

Gracias, me sirvió de mucho, he modificado el codigo, te envio el archivo, solo ayudame con dos cosas si puedes:
Modificar el código de manera que al pulsar en "incliuir celdas ocultas" lo haga y si no esta activada, que deje las ocultas como estan
Así mismo cuando tilde en "ignorar celdas vacias" no me ponga nada en las vacias y si no esta activa si me ponga el texto.

De cualquier modo muchas gracias

el archivo esta en el siguiente link

[Tienes que estar registrado y conectado para ver este vínculo]

Saludos a todos

Atte. Jonathan Gutierrez

JONATHAN

Cantidad de envíos : 24
Fecha de inscripción : 28/04/2008

Volver arriba Ir abajo

Re: AGREGAR UN TEXTO ANTES O DESPUES DE OTRO EN EXCEL

Mensaje por ioyama el Dom Ago 10, 2008 1:36 pm

Hola Jonathan

Prueba con esta macro

Private Sub CommandButton1_Click()
For Each x In Selection
If TextBox1.Value <> "" Then
If CheckBox1.Value = False Then If Rows(x.Row & ":" & x.Row).EntireRow.Hidden = True Then GoTo Salto
If CheckBox2.Value = True Then If x.Value = "" Then GoTo Salto
x.Value = TextBox1.Value & x.Value
If TextBox2.Value <> "" Then
x.Value = x.Value & TextBox2.Value
End If
End If
Salto:
Next
End Sub

El tema de las celdas ocultas está seleccionado para el caso de filas ocultas.

Sugerencia: Podrías hacer que el CheckBox2 aparezca marcado por defecto (en el editor de VBA selecciona el citado checkbox y en la ventana de propiedades cambia Value a True.

Un saludo desde Vitoria

ioyama
Moderador
Moderador

Masculino Cantidad de envíos : 128
Edad : 53
Ciudad - Pais : Vitoria (España)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: AGREGAR UN TEXTO ANTES O DESPUES DE OTRO EN EXCEL

Mensaje por Contenido patrocinado Hoy a las 12:37 pm


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.