Εμφάνιση ενός μόνο μηνύματος
  #2  
Παλιά 24-07-10, 20:50
lammis Ο χρήστης lammis δεν είναι συνδεδεμένος
Όνομα: Στράτος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 19-01-2010
Μηνύματα: 29
Προεπιλογή

καλησπέρα Τόλη
αν κατάλαβα καλά ζητάς κάτι τέτοιο

Κώδικας:
Private Sub timi_a_AfterUpdate()
Me.[timi b] = Me.[timi a].Column(2)
Me.[timi g] = Me.[timi a].Column(3)
End Sub

Private Sub timi_b_AfterUpdate()
Me.[timi a] = Me.[timi b].Column(1)
Me.[timi g] = Me.[timi b].Column(3)
End Sub

Private Sub timi_g_AfterUpdate()
Me.[timi a] = Me.[timi g].Column(1)
Me.[timi b] = Me.[timi g].Column(2)
End Sub
όλο το παιχνίδι παίζετε με τα πεδία του πινάκα times abg όπου στον κώδικα vba αναφέρονται ως column(...) [0,1,2 και 3]. Το 0 είναι το πρώτο πεδίο = αναγνωριστικό πεδίο

Δεν ξέρω αν σε βοηθήσει αυτό, σου στέλνω επίσης και το αρχείο για περαιτέρω βοήθεια

Καλή συνέχεια
Στράτος
Συνημμένα Αρχεία
Τύπος Αρχείου: mdb βδ1-2.mdb (388,0 KB, 24 εμφανίσεις)
Απάντηση με παράθεση