Foros del Web » Soporte técnico » Ofimática »

Excel: Copiar y pegar texto

Estas en el tema de Excel: Copiar y pegar texto en el foro de Ofimática en Foros del Web. Hola colegas, tengo un inconveniente con el copiado y pegado de texto: Supongamos que tengo la hoja1 toda protegida salvo la celda A1, con un ...
  #1 (permalink)  
Antiguo 14/10/2009, 15:12
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 11 meses
Puntos: 11
Excel: Copiar y pegar texto

Hola colegas, tengo un inconveniente con el copiado y pegado de texto:

Supongamos que tengo la hoja1 toda protegida salvo la celda A1, con un solo permiso activo: "seleccionar celdas desbloqueadas"

Copio texto de un email y lo pego (Ctrl+V) en la celda A1:

- me cambio el formato de texto (tamaño letra, negrita, tipo de letra etc) y me bloquea la celda...

por que ocurre esto? si no activo el permiso de cambio de formato ni que se bloquee la celda?

Algun codigo de visual como solucionarlo? muchas gracias
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #2 (permalink)  
Antiguo 14/10/2009, 20:04
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 11 meses
Puntos: 11
Respuesta: Excel: Copiar y pegar texto

Encontre que al pegar un texto en el angulo inferior derecho de la celda me sale un pequeño menu con "Coincidir con formato de destino" que mantiene el formato como de excel. Al grabarlo con la grabadora de macro da:

ActiveSheet.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:= _
False, NoHTMLFormatting:=True

Como podria hacer para que por defecto mantenga el formato de destino?
__________________
-- Nunca te des por vencido, aún vencido -- Web
  #3 (permalink)  
Antiguo 14/10/2009, 23:23
Avatar de Pablus00  
Fecha de Ingreso: diciembre-2003
Ubicación: A un click de distancia
Mensajes: 1.044
Antigüedad: 20 años, 11 meses
Puntos: 11
Respuesta: Excel: Copiar y pegar texto

lo que pude encontrar en la web, al copiar un texto html de la web e intentar pegar pegar (ctrl+v), tiene que pegar con texto plano

quiero poner algo asi:

Application.OnKey "^{V}", ActiveSheet.PasteSpecial = False

pero no funciona, alguna sujerencia?
__________________
-- Nunca te des por vencido, aún vencido -- Web
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 22:21.