MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

2 participantes

    [Resolvido]Enviar texto de variável String para a área de transferência

    fsouza32
    fsouza32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 132
    Registrado : 22/01/2013

    [Resolvido]Enviar texto de variável String para a área de transferência Empty [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  fsouza32 Qua 10 Nov - 14:48

    Olá a todos dos fórum!
    Em meu projeto tenho a necessidade de enviar um texto que fica armazenado em uma variável do tipo string, enviar de um textbox eu sei que da para utilizar o comando docmd.RunCommand acCmdCopy após mover o foco para o campo, mas não sei como fazer para que seja o texto que está na variável. Tem como fazer isso?

    Obrigado
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2605
    Registrado : 13/12/2016

    [Resolvido]Enviar texto de variável String para a área de transferência Empty Re: [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  Alexandre Fim Qua 10 Nov - 15:21

    Olá Fabio,

    Pelo que eu entendi acredito que seja isso:
    Código:


    Private Sub NomeDoSeuCampo_GotFocus()
        Me.NomeDoSeuCampo.Value = SuaVariavel
    End Sub


    É isso

    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Enviar texto de variável String para a área de transferência Setinf11
    Sistemas e Tecnologia Ltda
    fsouza32
    fsouza32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 132
    Registrado : 22/01/2013

    [Resolvido]Enviar texto de variável String para a área de transferência Empty Re: [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  fsouza32 Qua 10 Nov - 15:37

    Caro Alexandre, não é isso que preciso, enviar o texto de uma variável para uma textbox eu sei, o que preciso é enviar o texto que esta armazenado na variável para a Área de Transferência do Windows. Seria um Ctrl+c mas do conteúdo da variável.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2605
    Registrado : 13/12/2016

    [Resolvido]Enviar texto de variável String para a área de transferência Empty Re: [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  Alexandre Fim Qua 10 Nov - 16:13

    Ok...entendi.

    Tente isso:

    Código:


    Dim clipboard As New MSForms.DataObject
    Dim strContents As String

    Set clipboard = New MSForms.DataObject
    clipboard.GetText = strContents
    clipboard.GetFromClipboard



    Não esqueça de marcar a referencia:

    [Resolvido]Enviar texto de variável String para a área de transferência Fm2210


    Acho que é isso!!

    []'s

    FIM





    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Enviar texto de variável String para a área de transferência Setinf11
    Sistemas e Tecnologia Ltda
    fsouza32
    fsouza32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 132
    Registrado : 22/01/2013

    [Resolvido]Enviar texto de variável String para a área de transferência Empty Re: [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  fsouza32 Qui 11 Nov - 9:08

    Caro Alexandre eu fiz como me passou mas deu o erro abaixo:

    Como ficou meu código

    Código:
    Dim clipboard As New MSForms.DataObject
    Dim strContents  As String

    strContents = "Olá " & "*" & Me.txtNomeSocio & "*" & "! Esta mensagem de *CONFIRMAÇÃO* é referente a reserva efetuada em nossa Colônia de Férias de nº: " & "*" & Format(Date, "yyyy") & Me.idReserva & "*" & ". Efetuada dia: " & "*" & Me.txtDataReserva & "*" & _
            ", com Check-In para o dia: " & "*" & Me.txtDataEntrada & "*" & ", saída para o dia: " & "*" & Me.txtDataSaída & "*"

    Set clipboard = New MSForms.DataObject
    clipboard.GetText = strContents
    clipboard.GetFromClipboard

    Mensagem de erro:
    [Resolvido]Enviar texto de variável String para a área de transferência Screen10
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2605
    Registrado : 13/12/2016

    [Resolvido]Enviar texto de variável String para a área de transferência Empty Re: [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  Alexandre Fim Qui 11 Nov - 9:37

    Bom dia,

    Substitua a linha do erro pelas

    clipboard.SetText ""& strContents &""
    clipboard.PutInClipboard


    []'s

    FIM


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Enviar texto de variável String para a área de transferência Setinf11
    Sistemas e Tecnologia Ltda
    fsouza32
    fsouza32
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 132
    Registrado : 22/01/2013

    [Resolvido]Enviar texto de variável String para a área de transferência Empty Re: [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  fsouza32 Qui 11 Nov - 10:41

    Caro Alexandre. Fechou!!!! Ficou show, muito obrigado
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2605
    Registrado : 13/12/2016

    [Resolvido]Enviar texto de variável String para a área de transferência Empty Re: [Resolvido]Enviar texto de variável String para a área de transferência

    Mensagem  Alexandre Fim Qui 11 Nov - 10:43

    Valeu Fábio!!!
    O fórum agrade Very Happy

    Sucesso !!!


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Enviar texto de variável String para a área de transferência Setinf11
    Sistemas e Tecnologia Ltda

    fsouza32 gosta desta mensagem


      Data/hora atual: Sab 1 Out - 12:01