οριζόντια εμφάνιση εγγραφών σε έκθεση
 

καλημέρα.
ελπίζω ο Αύγουστος να σας βρήσκει εκεί που θα θέλατε να βρίσκεστε.

έχω έναν πίνακα (τον συννημένο) και θέλω να εμφανίζονται οι εγγραφές, σε δευτερεύουσα έκθεση,
(που συνδέεται με την πρωτεύουσα έκθεση με το πεδίο aaprotpinaka σε οριζόντια θέση

πχ.

Παναγής Πανομητρακόπουλος Δημος Δημητρογιωτακόπουλος Δωροθέα Χαριτοτριπλωμένου

Καλησπέρα

Παναγιώτη, δες μια πρόταση στην επισυναπτόμενη ΒΔ.

Για να δεις την οριζόντια διάταξη των ονομάτων θα πρέπει να εκτυπώσεις την έκθεση Report0 ή να την ανοίξεις σε προβολή προεπισκόπησης.

Η πρόταση υλοποιήθηκε χωρίς κώδικα, ορίζοντας την εκτύπωση της δευτερεύουσας φόρμας Report1 σε δύο στήλες.

Πιστεύω, με διάφορες δοκιμές, θα υλοποιήσεις ακριβώς αυτό που θέλεις.

Φιλικά/Γιώργος

ευχαριστώ πολύ για την βοήθεια
δεν βρήκα πως θα κάνω τις δύο στήλες τρεις

Καλησπέρα

Μια πιο ολοκληρωμένη πρόταση υπάρχει στην επισυναπτόμενη ΒΔ.

Η ΒΔ περιέχει δύο λύσεις:

1) Η πρώτη λύση ταυτίζεται με την προτεινόμενη στο προηγούμενο μήνυμά μου.

Όταν ανοίξουμε την έκθεση Report σε προβολή εκτύπωσης βλέπουμε τα ονόματα σε 3 στήλες.

Ο καθορισμός του αριθμού των στηλών γίνεται στη δευτερεύουσα φόρμα ReportSub.

Την ανοίγουμε σε προβολή σχεδίασης και στην κορδέλα επιλέγουμε την καρτέλα Page Setup (Διαφόρφωση σελίδας), ομάδα Page LayOut (Διάταξη σελίδας), κλικ στο κουμπί Columns ( Στήλες).

2) Η δεύτερη λύση επιτυγχάνεται με κώδικα και υλοποιείται στην έκθεση ReportTabVBA

Φιλικά/Γιώργος

ευχαριστώ πάρα πολύ
και οι δύο λύσεις είναι πολύ καλές
:thumbup:
να θέσω άλλο ένα ερώτημα

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

με το κλικ στην επιλογή δίνω στο πεδίο melos4 τιμή

Private Sub Εντολή14_Click()
If Me.mixanologos = -1 Then
Me.melos4 = 7
Me.επιλογή16.Enabled = False
Else
Me.melos4 = 0
Me.επιλογή16.Enabled = True
End If
End Sub
αντίστοιχη ρουτίνα έγραψα και για την δεύτερη επιλογή

κάνοντας κλικ στην μία επιλογή η δεύτερη μένει απενοργοποιημένη σε όλες τις εγγραφές ακόμα και στις καινούριες, ενώ κάτι τέτοιο δεν το θέλω
θέλω επίσης αν δεν κλικάρω κάποια από τις δύο επιλογές το melos4 να πέρνει τιμή 0
ευχαριστώ για την πολίτιμη βοήθεια

Καλησπέρα

Παναγιώτη:

1) Το νέο ζητούμενο δεν έχει καμία σχέση με τις στήλες των εκθέσεων, γι’ αυτό άνοιξε νέο θέμα.

2) Για να γίνει κατανοητό το πρόβλημα, ανέβασε ένα δείγμα της ΒΔ (τη φόρμα και τον υποκείμενο πίνακα) και εξήγησε καλύτερα το ζητούμενο.

Φιλικά/Γιώργος

θα το κάνω
ευχαριστώ