Jump to content

COPIAR EN EL PORTAPALES UN DATO DESDE UN LISTBOX


Recommended Posts

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

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

Privacy Policy