| Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια! |
![]() |
| | Εργαλεία Θεμάτων | Τρόποι εμφάνισης |
|
#1
| |||
| |||
|
Καλημέρα, Θα ήθελα την βοήθεια σας, έχω ένα report με ένα field Κώδικας: =[Company Name] & Chr(13) & Chr(10) & [Address] & " - " & [Region] & Chr(13) & Chr(10) & [City] & " " & [Postal Code] & ", " & [Country] Ευχαριστώ εκ των προτέρων. Devcon Τελευταία επεξεργασία από το χρήστη Tasos : 23-09-11 στις 11:19. Αιτία: Ρύθμιση πλάτους πλαισίου κώδικα |
|
#2
| |||
| |||
|
Καλημέρα Θανάση το θέμα σου έχει συζητηθεί και παλιότερα. Για μια καλή ενημέρωση, κάνε κλικ στο σύνδεσμο.http://www.ms-office.gr/forum/access...-keimenoy.html Βλέποντας τον τύπο θα σου πρότεινα να χρησιμοποιήσεις αντί για ένα περισσότερα πεδία (textBox), το ένα κάτω από το άλλο. Μπορείς να χρησιμοποιήσεις ένα για το πεδίο [Company Name], με γραμματοσειρά bold και ακριβώς από κάτω ένα άλλο με τύπο: = [Address] & " - " & [Region] & Chr(13) & Chr(10) & [City] & " " & [Postal Code] & ", " & [Country], με κανονική γραμματοσειρά. Φυσικά μπορείς να χρησιμοποιήσεις και τρία textBox, ένα για κάθε γραμμή. Φιλικά/Γιώργος |
|
#3
| |||
| |||
|
Γιώργο καλησπέρα, Σε ευχαριστώ για την απάντησή σου αλλά δυστυχώς δεν είναι δυνατή. Δυστυχώς έχω ένα καθορισμένο χώρο που πρέπει να εισαχθούν αυτά τα πεδία και η επωνυμία την εταιρείας αλλάζει σε μήκος κα ύψος (μέχρι και δύο γραμμές). Εάν πάλι το όνομα της εταιρείας είναι μία γραμμή τότε η διεύθυνση πρέπει να πάει στην δύο γραμμή χωρίς να αφήνει κενά. Για να είμαι πιο κατανοητός επισυνάπτω δύο φωτογραφίες. Θανάσης |
|
#4
| ||||
| ||||
|
Θαναση αυτο που σου γραφει ο Γιωργος ειναι το σωστο. Δεν υπαρχει αλλος "μαγικος" τροπος στις εκθεσεις. Απλα διπλασιασε το υψος στο πρωτο textbox ωστε να σου χωρα το ονομα της εταιρειας και να ειναι παντα σε bold.
__________________ http://www.facebook.com/home.php?ref...00000309992857 |
|
#5
| |||
| |||
|
Τόλη σε ευχαριστώ, υπολόγιζα μήπως υπήρχε κανένας "μαγικός τρόπος". Σου εύχομαι καλό Σαββατοκύριακο. Θανάσης |
|
#6
| |||
| |||
|
Θανάση Καλησπέρα Σκέφτομαι κάποια λύση με κώδικα, που θα ρυθμίζει την απόσταση των δύο πεδίων, αλλά για να τη δοκιμάσω, θα πρέπει να ανεβάσεις ένα δείγμα της έκθεσης και του υποκείμενου πίνακα. Αν διάβασες το μήνυμα του Τάσου, στο σύνδεσμο του προηγούμενου μηνύματος, θα μπορούσες να προσθέσεις ένα πεδίο στον υποκείμενο πίνακα, με περιεχόμενο τα πεδία που συνενώνεις, τύπο δεδομένων υπόμνημα και «μορφή κειμένου» «εμπλουτισμένο κείμενο». Το πεδίο αυτό μπορείς να το διαμορφώνεις στον πίνακα ή σε μία φόρμα, όπως θέλεις και αυτή τη μορφοποίηση θα την κληρονομεί και η έκθεση. Φιλικά/Γιώργος |
|
#7
| |||
| |||
|
Γιώργο σε ευχαριστώ για την προσπάθεια σου. Σου επισυνάπτω capture area της έκθεσης και του πίνακα. Ελπίζω να είναι αρκετά. Θανάσης |
|
#8
| ||||
| ||||
|
Καλησπέρα σε όλους! Σε βάσεις δεδομένων με μορφή *.accdb μπορούμε να εμφανίσουμε δεδομένα σε μορφή εμπλουτισμένου κειμένου σε πίνακα και κατά συνέπεια σε έκθεση αρκεί:
Δείτε το παράδειγμα στο συνημμένο. Δεν βοηθάει σε πεδία που μέσω κάποιου υπολογισμού επιστρέφουν κείμενα ή αριθμούς αλλά νομίζω σαν πληροφορία είναι χρήσιμο. Επεξεργασία: Μετά από κάποες δοκιμές κατέληξα ότι αν σε ένα πεδίο με μορφή εμπλουτισμένου κειμένου στην έκθεση χρησιμοποιήσουμε: Κώδικας HTML: ="<strong><em>" & "το κείμενο ή το πεδίο" & "</em></strong>" ή Κώδικας HTML: ="<strong><em><font color=red>" & "κείμενο" & "</font></em></strong>" Έχοντας λοιπόν κάποιες βσικές γνώσεις HTML μπορούμε να φτιάξουμε τη μορφή του πεδίου όπως επιθυμούμε. Φιλικά Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών Τελευταία επεξεργασία από το χρήστη Tasos : 23-09-11 στις 17:51. |
|
#9
| |||
| |||
|
Καλησπέρα στην παρέα Στη ΒΔ που επισυνάπτω υπάρχει ένα παράδειγμα υλοποίησης του ζητούμενου. Η υλοποίηση γίνεται με κώδικα ο οποίος τοποθετείται στο συμβάν με την μορφοποίηση της ενότητας στην οποία είναι τα πεδία. Στο παράδειγμα έβαλα τα πεδία στην κεφαλίδα της σελίδας (πλαίσια κειμένου txt1, txt2) και στις λεπτομέρειες.(text1, text2). Ο κώδικας φαίνεται παρακάτω. Κώδικας: Private Sub Ενότητα_κεφαλίδας_σελίδας_Format(Cancel As Integer, FormatCount As Integer)
Me.txt2.Move Me.txt1.Left, Me.txt1.Top + Me.txt1.Height
End Sub
Private Sub Λεπτομέρεια_Format(Cancel As Integer, FormatCount As Integer)
Me.text2.Move Me.text1.Left, Me.text1.Top + Me.text1.Height
End Sub
Για να εκτελεστεί ο κώδικας και να φανούν τα αποτελέσματα η έκθεση θα πρέπει να είναι σε προεπισκόπηση εκτύπωσης ή να εκτυπωθεί. Φιλικά/Γιώργος Τελευταία επεξεργασία από το χρήστη kapetang : 23-09-11 στις 17:08. Αιτία: έβαλα την προσθήκη |
|
#10
| |||
| |||
|
Γιώργο σε ευχαριστώ είσαι καταπληκτικός. Έλυσα το πρόβλημα μου. Άριστη η λύση σου. Θανάσης |
![]() |
« Προηγούμενο Θέμα
|
Επόμενο Θέμα »
| |
Η ώρα είναι 06:02.


Αλλαγή σε γραμμικό τρόπο
