Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   [ Φόρμες ] dlookup σε υποφόρμα (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/2100-dlookup-se-ypoforma.html)

gianast 08-10-12 08:06

dlookup σε υποφόρμα
 
Για σας
είμαι καινούργιος στο forum και το βρήκα απλά καταπληκτικό!
Θα ήθελα να με βοηθήσετε στη σύνταξη της dlookup σε υποφόρμα της Access.
Θέλω πληκτρολογόντας τον κωδικό είδους να εμφανίζει την περιγραφή του είδους σε άλλο
πεδίο.Το έκανα σε φόρμα αλλά δεν μπορώ σε υποφόρμα.
Ευχαριστώ εκ των προτέρων και μπράβω για τη δουλειά σας.

ασχετος 08-10-12 08:59

Καλημέρα στο forum,

Τάσο μήπως σου κάνει αυτό
Κώδικας:


'περίπτωση me.ονομα πεδίου Φόρμας = αριθμός
Dim vr As Variant
vr = DLookup("[ονομα πεδίου που θέλεις]", _
                    "όνομα πίνακα ή ερώτήματος", _
                    "[όνομα κλειδιού πίνακα ή άλλου πεδίου πίνακα ή ερώτήματος] = " & me.ονομα πεδίου Φόρμας)

'περίπτωση me.ονομα πεδίου Φόρμας = string
Dim vr As Variant
vr = DLookup("[ονομα πεδίου που θέλεις]", _
                    "όνομα πίνακα ή ερώτήματος", _
                    "[όνομα κλειδιού πίνακα ή άλλου πεδίου πίνακα ή ερώτήματος] =' " & me.ονομα πεδίου Φόρμας &"'")

'περίπτωση me.ονομα πεδίου Φόρμας = date
Dim vr As Variant
vr = DLookup("[ονομα πεδίου που θέλεις]", _
                    "όνομα πίνακα ή ερώτήματος", _
                    "[όνομα κλειδιού πίνακα ή άλλου πεδίου πίνακα ή ερώτήματος] =# " & me.ονομα πεδίου Φόρμας &"#")

Βάλε τον κώδικα στο συμβάν που θέλεις

gianast 10-10-12 12:54

Κώστα ευχαριστώ
αλλά γίνεται χωρίς vba;

ασχετος 10-10-12 13:15

Καλό μεσημέρι σ' όλους.

Τάσο,
για να έχεις τις καλύτερες δυνατές απαντήσεις από το forum,
κατά την αποψή μου, πρέπει πάντα να επισυνάπτεις μια test database
με μερικά δεδομένα και να λες ακριβώς τι θέλεις.

Tasos 10-10-12 15:19

Καλό απόγευμα σε όλους!
Θα συμφωνήσω με τον Κώστα.
Μια ακριβής περιγραφή του ζητούμενου θα διευκολύνει τους υπόλοιπους που θα θελήσουν να απαντήσουν.

Φιλικά

Τάσος

gianast 11-10-12 12:51

Αρχείο για Dlookup
 
1 Συνημμένο(α)
Έχετε δίκιο και ζητώ συγγνώμη.
Σας επισυνάπτω το αρχείο 12_08_2012.mdb
αυτό που ψάχνω είναι στην υποφόρμα Λεπτομέρειες Αποστολής.......
Ευχαριστώ

ασχετος 11-10-12 16:09

1 Συνημμένο(α)
Τάσο,

κοίτα την βάση

gianast 12-10-12 06:24

Ευχαριστώ πάρα πολυ
Είσαι super


Η ώρα είναι 10:54.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2