Forum

Αναζήτηση στο ms-office.gr

Πάμε!
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > [ Φόρμες ] επιλογή σε αναδυόμενο πεδίο και τοποθέτηση σε πεδίο υποφορμας

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 16-04-18, 20:28
Όνομα: ΑΝΤΩΝΗΣ
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-08-2010
Περιοχή: ΑΘΗΝΑ
Μηνύματα: 291
Question επιλογή σε αναδυόμενο πεδίο και τοποθέτηση σε πεδίο υποφορμας

Καλησπέρα και Χριστός ανέστη !!

Το πρόβλημα μου είναι ο μηχανισμός επιλογής τιμοκαταλόγου και τοποθέτηση του ποσοστιαίου πεδίου στο πεδίο τιμοκατάλογος% τις υποφορμας.
Εκτος αυτού είναι και το χρονικό μηχανισμού,δηλαδή.........

1) με το που καταχωρώ ένα προϊόν σε κάθε σειρά να μου το αποδίδει στο πεδίο τιμοκατάλογος%

2) αλλάζοντας τιμοκατάλογο από το αναδυόμενο πεδίο να τοποθετεί το νέο ποσοστό στο πεδίο τιμοκατάλογος%

3) αφαιρώντας από το αναδυόμενο πεδίο κάθε είδους τιμοκατάλογο

Έχω παιδευτεί έχω κάνει δοκιμες το μονο που κατάφερα να φτιάξω μακαρόνια με κύμα !
θα επιθυμούσα αν μπορεί να με βοηθήσει κάποιος με τις γνώσεις του!
Ευχαριστώ πολύ!
-------------------------------------
Συνημμένα Thumbnails
επιλογή σε αναδυόμενο πεδίο και τοποθέτηση σε πεδίο υποφορμας-ac_2018-04-18_204658.jpg  
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb test 1.mdb (368,0 KB, 8 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 20-04-18, 23:37
Όνομα: ΑΝΤΩΝΗΣ
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-08-2010
Περιοχή: ΑΘΗΝΑ
Μηνύματα: 291
Προεπιλογή

Η photo βοηθά περισσότερο για το πρόβλημα μου η μπερδεύει?
Απάντηση με παράθεση
  #3  
Παλιά 21-04-18, 13:03
Το avatar του χρήστη nasos23
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 292
Προεπιλογή

Καλησπέρα σε όλους.
Αντώνη δες το συνημμένο.
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb test 1(1).mdb (372,0 KB, 18 εμφανίσεις)
__________________
Φιλικά, Νάσος
Απάντηση με παράθεση
  #4  
Παλιά 22-04-18, 20:13
Όνομα: ΑΝΤΩΝΗΣ
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-08-2010
Περιοχή: ΑΘΗΝΑ
Μηνύματα: 291
Thumbs up

ΝΑΣΟ,ΝΑΣΟ,ΝΑΣΟ μου!!!!!!!!!!!!!!

Σε ευχαριστώ την ευχή μου να έχεις !!!!!!!!!!!!!!

δεν κατάλαβα τίποτα από τον κώδικα Χαχαχαχαχα ...........
ένταξη είναι ακριβώς μα ακριβώς αυτό που ήθελα !
Απάντηση με παράθεση
  #5  
Παλιά 25-04-18, 00:07
Όνομα: ΑΝΤΩΝΗΣ
Έκδοση λογισμικού Office: Ms-Office 2003
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 04-08-2010
Περιοχή: ΑΘΗΝΑ
Μηνύματα: 291
Question

ΝΑΣΟ ...............
θερμη παράκληση γιατί τα βρήκα σκούρα στο να προσαρμόσω στην κανονική βάση απο το παράδειγμα που μου έδειξες.

Αν γίνετε να ξέρω τις αντιστοιχίες μέσα από τον κώδικα,δηλαδή..........



Dim strSQL As String
Me.Êåßìåíï11 = Me.id.Column(1)
Me.Êåßìåíï13 = Me.id.Column(2)
DoCmd.SetWarnings False
strSQL = "UPDATE pol_2 SET pol_2.[ôéìïêáôáëïãïò%] =[Öüñìåò]![pol_1 Åñþôçìá]![Êåßìåíï13]" & _
" WHERE (([pol_1]![idpol]=[pol_2]![idpol]));"

DoCmd.RunSQL strSQL
DoCmd.SetWarnings True
Me.Refresh



το id που το βρίσκεις παράδειγμα?

το idpol που το βρίσκεις?


Απάντηση με παράθεση
  #6  
Παλιά 25-04-18, 11:02
Το avatar του χρήστη nasos23
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 292
Προεπιλογή

Αντώνη καλημέρα.
Στα ερωτήματά σου
Επιλέγοντας στη βάση και στο μενού εργαλεία-->Σχέσεις, θα δείς
τις σχέσεις των πινάκων σου. Εικόνα1.
Στη φόρμα σου εισήγαγα δύο βοηθητικά αδέσμευτα πεδία "Κείμενο11" & "Κείμενο13"
όπου εκεί εμφανίζονται οι τιμές των στηλών της επιλογής του σύνθετου πεδίου "id" (επιλογή τιμοκαταλόγου) το οποίο πεδίο αντλεί δεδομένα (βάσει σχέσης) από τον πίνακα "τιμοκατάλογοι".
Συνεπώς μετά την ενημέρωση ενεργοποιείται ο κώδικας VBA και κάνει ενημέρωση του πεδίου
"τιμοκαταλογος%" στον πίνακα pol_2.
Κώδικας:
"UPDATE pol_2 SET pol_2.[τιμοκαταλογος%] =[Φόρμες]![pol_1 Ερώτημα]![Κείμενο13]" & _
          " WHERE (([pol_1]![idpol]=[pol_2]![idpol]));"
1.ενημερώνει το πεδίο "τιμοκαταλογος%" του πίνακα pol_2 βάσει επιλογής [Κείμενο13]
2.Φιλτράρει της εγγραφές ενημέρωσης, οι τιμές του πεδίου idpol των δύο πινάκων να είναι ίδιες

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

Κώδικας:
Private Sub id_AfterUpdate()
Dim strSQL As String
 
DoCmd.SetWarnings False
strSQL = "UPDATE pol_2 SET pol_2.[τιμοκαταλογος%] ='" & Me!id.Column(2) & "' " & _
" WHERE ([idpol]=" & Me!idpol & ")"
 DoCmd.RunSQL strSQL
    DoCmd.SetWarnings True
   Me.Refresh
End Sub
1.ενημερώνει το πεδίο "τιμοκαταλογος%" του πίνακα pol_2 βάσει επιλογής της δεύτερης στήλης του πεδίου id
2.Φιλτράρει της εγγραφές ενημέρωσης, βάσει του πεδίου idpol της φόρμας.
Ελπίζω να βοήθησα.
Συνημμένα Thumbnails
επιλογή σε αναδυόμενο πεδίο και τοποθέτηση σε πεδίο υποφορμας-eik.1.jpg  
__________________
Φιλικά, Νάσος

Τελευταία επεξεργασία από το χρήστη nasos23 : 26-04-18 στις 07:42.
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[ Φόρμες ] αναδυομενο πεδιο επιλογη συνθήκης artchrist73 Access - Ερωτήσεις / Απαντήσεις 10 20-03-17 21:13
[ Φόρμες ] Εστίαση σε συγκεκριμένο πεδίο υποφόρμας dimitrisp Access - Ερωτήσεις / Απαντήσεις 10 25-06-15 12:24
[ Φόρμες ] Πεδίο φόρμας mgeorge Access - Ερωτήσεις / Απαντήσεις 2 29-07-12 16:51
ΠΕΔΙΟ Η ΟΧΙ?! stivy84 Word - Ερωτήσεις / Απαντήσεις 2 04-10-10 09:32
Μεταφορά δεδομένων απο πεδίο σε πεδίο Meteora Access - Ερωτήσεις / Απαντήσεις 5 30-01-09 19:03


Η ώρα είναι 06:03.