Saltar al contenido

COPIAR EN EL PORTAPALES UN DATO DESDE UN LISTBOX

publicado

Hola.

 

Tengo un listbox desde el cual quiero copiar un item seleccionado con doble click. El contendfio lo copia bien pero al pegarlo siempre me pega "??", dos interrogantes. He utilizado varios codigos y siempre ma pasa. Alguien podria decirme que hago mal?. Este es el codigo que utilizo:

Private Sub ListBox_CONCEPTO_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim DMyData As New MSForms.DataObject
'Dim MyData As DataObject
Dim copia As String
Set MyData = New DataObject
copia = ListBox_CONCEPTO.Text
MsgBox copia
MyData.Clear
MyData.SetText copia

MyData.PutInClipboard

End Sub

Gracias.

 

MJ

 

Featured Replies

publicado

Tu macro funciona perfectamente.

Es evidente que hay algo que no vemos, por lo que va a ser necesario que subas tu archivo y expliques lo que pretendes hacer.

publicado
  • Autor

Hola Antoni.

Adjunto el archivo. Se copia el dato del cuadro de texto con un DobleClick. A ver si le ves qué es lo que falla. ?

Muchas Gracias.

CONCEPTOS.xlsm

publicado

No se que te puede suceder, he probado tu formulario y copia/pega sin problemas.

publicado
  • Autor

Hola Antoni.

Es curioso, en casa tambien me funciona, en el trabajo no... No sé a qué pude ser debido ?

 

Muchas gracias

 

MJ

 

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.