Plotting problem.

Discussion in 'AutoCAD' started by Pierre Desmarais, Aug 30, 2004.

  1. I have used this macro to plot "MyLayout" for months, I plotted
    hundreds of drawings without problem and sudently it quit. No error
    message, it just does't plot anymore.

    Private Sub CommandButton33_Click()

    Dim Plot As AcadPlot
    Dim Layout As AcadLayout, Layouts As AcadLayouts

    Set Layout = ThisDrawing.ActiveLayout
    Set Layouts = ThisDrawing.Layouts
    Me.Hide
    For Each Layout In Layouts
    If Layout.Name = "MyLayout" Then
    ThisDrawing.ActiveLayout = Layout
    Exit For
    End If
    Next
    Set Plot = ThisDrawing.Plot
    Plot.QuietErrorMode = False
    Plot.NumberOfCopies = 1
    Plot.PlotToDevice
    Me.Show
    End Sub

    Any idea?
     
    Pierre Desmarais, Aug 30, 2004
    #1
  2. OK I got it, printer configuration was wrong.
     
    Pierre Desmarais, Aug 31, 2004
    #2
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.