Θέμα: Εκθέσεις Ανανέωση Έκθεσης

Εμφάνιση ενός μόνο μηνύματος
  #6  
Παλιά 07-07-11, 19:06
Το avatar του χρήστη Tasos
Tasos Ο χρήστης Tasos δεν είναι συνδεδεμένος
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού Office: Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική
 
Εγγραφή: 21-10-2009
Μηνύματα: 2.035
Προεπιλογή

Καλησπέρα σε όλους!

Τζίμη, δεν είναι δυνατόν να ανανεωθεί η έκθεση όταν βρίσκεται σε προβολή προεπισκόπισης!

Θα πρέπει να κλείσεις την έκθεση και να την ανοίξεις εκ νέου για να δεις και να τυπώσεις
τις αλλαγές που έχεις κάνει (μέσω πίνακα, ερωτήματος ή φόρμας) στα δεδομένα της .

Ο κώδικας που μπορείς να βάλεις πίσω από το κουμπί για να κλείσεις και να ανοίξεις την έκθεση ξανά είναι:
Κώδικας:
Private Sub cmdOpenReport_Click()
    On Error GoTo Err_cmdOpenReport_Click
    Dim stDocName As String
    stDocName = "rpt1"
    If SysCmd(10, 3, stDocName) Then
        DoCmd.Close acReport, stDocName, 2
    End If
    DoCmd.OpenReport stDocName, 2
Exit_cmdOpenReport_Click:
    Exit Sub

Err_cmdOpenReport_Click:
    MsgBox Err.Description
    Resume Exit_cmdOpenReport_Click

End Sub
Καλή συνέχεια!

Φιλικά

Τάσος
__________________
Ms-Office Development Team
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση