WEICHBRODT.it
Home » wHow? » VBA » Report con linee a colori alternati

Report con linee a colori alternati

The WEICHBRODT.it's How-To Directory

Categoria: VBA

Descrizione

Questa funzione serve per stampare a colori alternati le linee del corpo di un report di Microsoft Access (effetto "zebrato"), e risulta essere molto utile per aumentare la leggibilità dei report.
La funzione deve essere associata all'evento "Su stampa" della sezione "corpo" del report.

Codice

Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)

    ' funzione per creare un effetto di linee a colori alterni in fase
    ' di stampa del Report (Effetto zebrato)
    
    Static linea As Boolean
    If linea Then
        Me.Corpo.BackColor = 8454143        ' giallo chiaro
    Else
        Me.Corpo.BackColor = 16777215       ' bianco (trasparente)
    End If
    linea = Not linea

End Sub

Utilizzo

  1. Aprire il report di Microsoft Access in modalità "struttura"
  2. Doppio clic sulla sezione "corpo": si apre la finestra delle proprietà della sezione "corpo"
  3. Nella scheda "Evento", in corrispondenza dell'evento "Su stampa", premere il pulsante "..."
  4. Scegliere "Generatore di codice" e quindi "Ok"
  5. Si apre l'editor di VBA e viene creata una sub "Corpo_Print" dove è possibile incollare la funzione

Ecco il risultato:

 Effetto zebrato su report di Access

Commenti

Non ci sono commenti per questa pagina. Vuoi essere il primo a postare un commento?

Scrivi un commento

Nome
Email (non verrà pubblicato)
Web (opzionale)
Inviami una notifica quando un nuovo commento viene aggiunto a questa pagina
Commento
  This is a captcha-picture. It is used to prevent mass-access by robots. (see: www.captcha.net)
Inserisci i caratteri di controllo
 

Segnala questa pagina:

Email facebook twitter LinkedIn Tumblr technorati.com del.icio.us FriendFeed digg
Print This Page
Torna su
| Contatti | Mappa | Link |
© WEICHBRODT.it - Grafica, layout e contenuti sono di esclusiva proprietà di Andrea Weichbrodt