[Resolvido]Transportar valor de uma caixa de texto desacoplada para um relatório

Boa tarde,

Como eu faço para transportar o registro de uma Caixa de Texto desacoplada/desvinculada para um relatório?

Grato

Fábio Melo

Bom dia, estarei tentando ajuar novamente aqui no forum, apesar de estar me recuperando ainda deuma cirurgia' sinto falta de estar por aqui. Bem estou em um tablet e nao tenno o access comigo, mas na medida do oossivel tentarei ajudar... bem se a inormacao fica em uma caixa de texto nao acoplada, voce pode carregar a informacao em uma variavel e lancar essa variavel na caizaxa texto no retorio a ser aberto ou mesmo lancar diretamente a informacao na aixa texto no relatorio.. seria algo mais ou menos assim
No evento ao abrir do relatorio

Dim strvar as string
Strvar=me.suacaixatextnoform
Me.suacaixatextonorelatorio = strvar
Me.nomedoform.visble = false
E no evento ao fechar do relatorio tornaria o formulario visivel novamente

Me.nomedoformulario.visible = true

Cumprimentos.

Harysohn, obrigado pela ajuda

No Formulario eu coloquei assim:

Option Compare Database
Option Explicit

Private Sub AnoN_AfterUpdate()

Dim VarContaP As String
VarContaP = Me.PacAtendido "valor da caixa de texto a ser transferido para o relatorio

End Sub

No relatorio

Private Sub Report_Open(Cancel As Integer)

Me.NumPac = VarContaP "Esta caixa de texto também eh desacoplada

End Sub




Estou recebendo a Mensagem
"voce nao pode atribuir um valor a este objeto"

Depura para que linha?

Tente colocar no código qe carrega a caixa texto no relatorio com a variavel:
Me.SuaCaixaTexto.Text = SuaVariavel ou

Me.SuaCaixaTexto.Value = SuaVariavel


Se fala que nao pode atribuir um valor a este objeto ou e porque nao esta desacoplada, ou tem algo escrito na caixa texto ou mesmo o objeto e um rotulo..

Tente como falei e retorne.


**** Agora... do jeito que fez nao esta correto pois a variavel esta sendo carregada apenas para o form.. tens que transformar a variavel em uma variavel global


Defina-a como pública
Public NomeVariavel as ...


Pode tambem carregar diretamente do form..

Ao Abrir ou Carregar do Form
*Convem frisar que aqui o form tem que estar aberto quando o relatorio estiver abrindo... Se nao quiser mostrar o form, podes deixa-lo em oculto ao abrir o relatorio

Forms!NomeFOrm.Visible = False
Me.SuaCaixaTextoNoRelatorio = Forms!nomedoform.SuaCaixaTextoNoFOrm

Cumprimentos

Option Compare Database
Option Explicit

Public Function ContaP()
Dim VarContaP As String
VarContaP = Me.PacAtendido
End Function

Me.NumPac.Text = VarContaP
E a mensagem
"Voce nao pode fazer ref a uma propriedade ou metodo de um controle q menos que o mesmo tenha o foco.

Estou saindo, e as novas sugestoes eu testarei mais tarde,

Muito Grato Haryshon

Retire o .text e altere para .Value


Mas o melhor creio será

Pode tambem carregar diretamente do form..

Ao Abrir ou Carregar do Form
*Convem frisar que aqui o form tem que estar aberto quando o relatorio estiver abrindo... Se nao quiser mostrar o form, podes deixa-lo em oculto ao abrir o relatorio

Forms!NomeFOrm.Visible = False
Me.SuaCaixaTextoNoRelatorio = Forms!nomedoform.SuaCaixaTextoNoFOrm

Coloquei o codigo abaixo e esta ocorrendo o seguinte

• Normalmente o campo náo captura o valor da caixa de texto

1. Se eu coloco pontos de checagem nos codigos ele captura.

Option Compare Database
Option Explicit
Public VarContaP As String



Private Sub AnoM_Click()
Me.Requery
VarContaP = Me.Texto11.Value
Me.TesteAng = VarContaP
Me.Repaint
End Sub

[list=1][*]

Envie-me o bd para que possamos resolver

Tente por aqui, caso nao consiga me envie no e-mail harysohn@hotmail.com

\cumprimentos

Enviado o bf para o seu email
se tiver com a senha, abra com o Shift

Ok. Amanha vejo isto pra ti.

Cumprimentos

Valy Harysohn,

Ficarei aguardando suas dicas porque eu nao estou conseguindo, ja fiz diversas tentativas e a Variavel Publica VarContaP so captura o valor se eu fizer uma parada para checagem no ponto em que eu declaro " VarContaP = PacAtendido", e eu preciso deste valor para imprimilo no relatorio. E nao havendo um pnto de checagem ele nao captura o valor pretendido
Ja tentei, na caixa de texto desvinculada do Relatorio, "CxTextoRelatorio = VarContaP",que e uma variavel publica onde tentei atribuir o valor da Caixa de Texto desvinculada "PacAtendido" no Formulario, neste caso recebo uma mensagem de que nao e possivel atribuir um valor ao objeto.

Obrigadao

Fabio Melo

Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.