Μενού - κρύψιμο κορδέλας απο χρήστες καλησπερα στο Forum :) Θα ηθελα να ρωτήσω αν γίνεται να κρυψουμε το μενου της access 2007 - 2010 , ή την κορεδλα απο τους χρήστες μονιμα ...... κρυβω την κορδελλα αλλα επανερχεται , δεν ξερω τι πρεπει να κανω για να γινει μονιμο στους χρηστες ... Σας ευχαριστω πολυ και παλι για τη βοηθεια σας εκ των προτερων :) |
Καλησπέρα Κάνε ένα αντίγραφο της εφαρμογής σου. Στο αντίγραφο και στο συμβάν "με τη φόρτωση" της κεντρικής φόρμας γράψε: Κώδικας: CurrentDb.Properties("StartUpShowDBWindow") = False Με εκτίμηση Νίκος Δ. |
Κ;αλημερα στο forum :) Niko να σ αευχαριστησω πολυ που ασχοληθηκες με το προβλημα μου , δοκιμασα αυτο που ειπες Private Sub Form_Load() CurrentDb.Properties("StartUpShowDBWindow") = False DoCmd.ShowToolbar "Ribbon", acToolbarNo End Sub αλλα δυστυχως μου χτυπαει sto debug στο CurrentDb.Properties("StartUpShowDBWindow") = False με εκτιμηση Δαφνη |
Καλησπέρα Ακύρωσε την εντολή αυτή που 'χτυπάει' και άφησε να τρέξει μόνη της η άλλη. Η γραμμή που "χτυπάει΄", έχει ως ρόλο το κρύψιμο του παράθυρου περιήγησης , το οποίο -ως γνωστόν- δείχνει τους πίνακες, τα ερωτήματα, τις φόρμες,... Το κρύψιμο αυτό γίνεται και μέσω επιλογής. Αν χρειαστεί κάτι τέτοιο τα ξαναλέμε. Νίκος Δ. |
Καλημερα στο forum :) Σ ευχαριστω παρα πολυ Νικο για τη βοηθεια, εκανα αυτο που μου προτεινες και δουλευει μια χαρα... Αν γινεται και δεν σε κουραζω θα ηθελα να μπορουσα να κρυψω και τιs forms , queries, reports, απο τους χρηστες ..θα ηταν ιδανικο να μποορουσα να εχχω την επιλογή αυτη..... Ευχαριστω και παλι για τη βοηθεια :) με εκτιμηση Δαφνη Μ. |
Ο Παρακατω κωδικας σου δινει την δυνατοτητα να "κρυβεις" φορμες, εκθεσεις κλπ. Για τις φορμες: Public Function DoHideForms() Dim frm For Each frm In CurrentProject.AllForms SetHiddenAttribute acForm, frm.Name, True Next End Function Για να τις ξαναεμφανισεις: Public Function DoUnHideForms() Dim frm For Each frm In CurrentProject.AllForms SetHiddenAttribute acForm, frm.Name, false Next End Function Καλη συνεχεια... |
Καλησπερα στο forum Σ ευχαριστω παρα πολυ Τόλη για τη βοηθεια σου :) δουλεψε πολυ ωραια.. με εκτιμηση Δάφνη Μ. |
Παράθεση:
|
Καλημέρα Δοκίμασε τις επιλογές Κώδικας: CurrentDb.Properties("StartUpShowDBWindow") = True με εκτίμηση / Νίκος |
Η ώρα είναι 21:53. |
Ms-Office.gr - ©2000 - 2024, Jelsoft Enterprises Ltd.