Thread: Print a form
View Single Post
  #5   Report Post  
Bob Phillips
 
Posts: n/a
Default

You could add a Print button, and add this code

Private Sub cmdPrint_Click()
Dim fOK As Boolean
Dim sPrinter As String


With Application
sPrinter = .ActivePrinter
fOK = .Dialogs(xlDialogPrint).Show
End With

If fOK Then
Me.PrintForm
Application.ActivePrinter = sPrinter
End If
End Sub

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Christophero" wrote in message
...
Bob,

The form will be filled automatically with dropdownboxes en labels heving

a
different value.
By changing a dropdownbox, the value of different labels will change.
I want a print out of one such version.



"Bob Phillips" wrote:

What does flexible data mean?

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Kris" wrote in message
...
Hi,

How can I print a form with flexible data on a printer selected by the

user?

Thens