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


    [Resolvido]Exportar para caixa de verificação word

    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    [Resolvido]Exportar para caixa de verificação word Empty [Resolvido]Exportar para caixa de verificação word

    Mensagem  toyebom 12/2/2018, 22:07

    Em

    .ActiveDocument.Bookmarks("TCD15").Select: .Selection.text = Nz(Forms!Droga.CaixaCombinação379)

    Alguma forma de exportar de campo de verificação para campo de verificação word???

    Já experimentei .value em vez de .text mas o problema é que me converte a caixa de verificação do word em texto e fica -1


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.
    toyebom
    toyebom
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 1128
    Registrado : 18/07/2012

    [Resolvido]Exportar para caixa de verificação word Empty Exportar para caixa de verificação word

    Mensagem  toyebom 12/2/2018, 22:45

    Já resolvi, deixo o código caso alguém necessite:

    If Me.TCD_Aerea = -1 Then
    .ActiveDocument.FormFields("Marcar8").CheckBox.Value = True
    Else
    .ActiveDocument.FormFields("Marcar8").CheckBox.Value = False
    End If


    .................................................................................
    Gente Simples, fazendo coisas pequenas, em lugares pouco importantes, consegue mudanças extraordinárias.

      Data/hora atual: 7/11/2024, 21:39