Ciao,
fai così, ed imposta anche i margini del Report:
codice:
... ... ...  
... ... ...
DataReport3.Sections(3).Controls("Descrizione").Caption = UCase(Descrizione2) 
         With Me
            .Orientation = rptOrientLandscape
            ' Modifica secondo le tue necessità:
            .TopMargin = 567
            .BottomMargin = 851
            .LeftMargin = 0
            .RightMargin = 1134
            .ReportWidth = 14000
            'Centra la visualizzazione del Report:
            If Me.WindowState = vbNormal Then
                .Width = Screen.Width
                .Height = Screen.Height
                .Left = (Screen.Width - .Width) / 2
                .Top = (Screen.Height - .Height) / 2
            End If
        End With

DataReport3.Show vbModal