Hello friends
no way to control the zoom 100 DWF format.
since the A0 format does not meet your measurements.
regards
(pd: translated into translate.google.cl)
transaction.Start()
Dim exported As Boolean = False
Dim [set] As New ViewSet()
Dim classFilter = New ElementClassFilter(GetType(Autodesk.Revit.DB.ViewSheet))
Dim views As New FilteredElementCollector(curDoc)
views = views.WherePasses(classFilter)
Dim options As New DWFExportOptions()
options.ExportObjectData = True
options.ExportingAreas = False
options.MergedViews = False
options.ImageFormat = DWFImageFormat.Lossless
options.PaperFormat = ExportPaperFormat.ISO_A0
options.ImageQuality = DWFImageQuality.High
Dim nomfile As String = String.Empty
exported = curDoc.Export("C:\1000\temp", "", [Set], options)
