Programmazione
Impostare margini nei report di MS Access da VBA
Private Sub Report_Page() Me.Printer.LeftMargin = 0 Me.Printer.RightMargin = 0 Me.Printer.BottomMargin = 0 Me.Printer.TopMargin = 0 End Sub
Private Sub Report_Page() Me.Printer.LeftMargin = 0 Me.Printer.RightMargin = 0 Me.Printer.BottomMargin = 0 Me.Printer.TopMargin = 0 End Sub
Di seguito trovate il codice necessario per chiudere tutti gli oggetti di un Database di MS Access Public Sub chiuditutto() Dim aob As AccessObject With CurrentData ‘ “Tables” For Each aob In .AllTables If aob.IsLoaded Then DoCmd.Close acTable, aob.Name, acSaveYes End If Next aob ‘ “Queries” For Each aob In Leggi tutto…