Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

copiar varios TextBox a Clipboard

ObiWan

New member
Registrado
11 Nov 2020
Mensajes
22
Hola!, pregunta... Tengo esta macro:

Private Sub Copiar_Click()
Dim dtDt As DataObject
Set dtDt = New DataObject
dtDt.SetText "Saldo:" & "$" & Me.Textsaldosq.Text '(texbox1)...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Solución
Buenas,

Ten en cuenta lo que te comenta Héctor Miguel, pero prueba esto a ver, por curiosidad:
Código:
Private Sub Copiar_Click()
    Dim dtDt As DataObject
    Dim strText As String
    Set dtDt = New DataObject
    strText = "Saldo:" & "$" & Me.Textsaldosq.Text & vbLf & "N° de Cuotas:" & Me.Textcuotaspurassq.Text
    dtDt.SetText strText
    dtDt.PutInClipboard
End Sub
Y nos dices que tal.

Un saludo.
Volver
Arriba