Text Box in form to update report label Caption

[bstice]

Good evening all,

I have a text box in a form, in which users enter updates. I would like that text to become the caption on a label in a printable report. How would I write the VBA to do this? Thanks in advance for your help.

B

 

[bstice]

This is what I have tried so far...

Private Sub Command22_Click()
Dim BMM As String
BMM = Me.BMText.Value
DoCmd.OpenReport "BioMedRoundingReport"
Reports("BioMedRoundingReport")("BMLbl").Caption = BMM

DoCmd.Close "BioMedRoundingReport"
End Sub

 

[bstice]

I figured it out. Here you go.

Private Sub Command22_Click()
Dim BMM As String
Dim myReportName As String
BMM = Me.BMText.Value
myReportName = "BioMedRoundingReport"
DoCmd.OpenReport myReportName, acViewDesign
DoCmd.OpenReport myReportName, acViewDesign
With Reports(myReportName)
.BMLbl.Caption = BMM
End With
DoCmd.Save , myReportName
DoCmd.Close acReport, myReportName

End Sub