Ανανέωση ιστοσελίδας

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 28-04-12, 14:51
Όνομα: Πάκος
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 17-12-2011
Περιοχή: Θεσσαλονικη
Μηνύματα: 169
Προεπιλογή Σύνθετο πλαίσιο?

Χαιρετώ το φόρουμ που δίνει ιδέες και λύσεις

Κάποιος αν μπορεί να βοηθήσει. Σε μια φόρμα που περιέχει ένα Σύνθετο_πλαίσιο στο οποίο το έχουμε δώσει να δείχνει μια λίστα με 3 στήλες και να επιλέγουμε την πρώτη στήλη, σε αυτό το πλαίσιο εάν για κάποια συνθήκη που θέλουμε πώς θα επιλέξει και θα εμφανίζει την 3 στήλη. Ευχαριστώ
Απάντηση με παράθεση
  #2  
Παλιά 28-04-12, 15:56
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
Προεπιλογή

Καλημέρα

Κάπως έτσι : me.Variabl = me.onomacombo.column(2)

Στο πεδίο ή στο πλαίσιο κειμένου variabl ή και στη μεταβλητή ακόμη, αποδίδεις την τιμή της 3ης στήλης. Την παραπάνω γραμμή να βάλεις στο συμβάν afterUpdate του combo box. Το combobox δεν σε ενοχλεί αν δείχνει συνεχώς τα στοιχεία της πρώτης στήλης....

με εκτίμηση

Νίκος Δ.
Απάντηση με παράθεση
  #3  
Παλιά 28-04-12, 16:18
Όνομα: Πάκος
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 17-12-2011
Περιοχή: Θεσσαλονικη
Μηνύματα: 169
Προεπιλογή

Νίκο ευχαριστώ για την άμεση απάντηση σου, αλλά δεν δουλεύει

σου παραθέτω την εντολή


Private Sub τεστ_gr_AfterUpdate()

Me.Variabl = Me.τεστ_gr.Column(2)

End Sub

δεν την αναγνωρίζει και μαρκάρει το Me.Variabl
καμιά ιδέα?
Απάντηση με παράθεση
  #4  
Παλιά 28-04-12, 16:33
Όνομα: Πάκος
Έκδοση λογισμικού Office: Ms-Office 2016
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 17-12-2011
Περιοχή: Θεσσαλονικη
Μηνύματα: 169
Προεπιλογή

Σ΄ ευχαριστώ το βρήκα

για κάποιους που θα τύχει να το χρειαστούν

Private Sub Ανάγκες_AfterUpdate()

If [Γλώσσα] = "Ελληνικά" Then
[Ανάγκες] = Me.Ανάγκες.Column(2) <----- Δίνει την τιμή της συνθήκης
Else
[Ανάγκες] = Me.Ανάγκες.Column(0) <------ Δίνει τη τιμή προεπιλογής από το σύνθετο πλαίσιο
End If

End Sub
Απάντηση με παράθεση
Απάντηση στο θέμα


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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[ Active X Controls ] Σύνθετο Πλαίσιο Αναστάσιος Αναγνωστάκης Access - Ερωτήσεις / Απαντήσεις 6 01-11-14 16:50
[ Φόρμες ] Φίλτρο σε σύνθετο πλαίσιο από πινάκα σχετιζόμενο με άλλο σύνθετο πλαίσιο Dafnh0106 Access - Ερωτήσεις / Απαντήσεις 3 18-01-13 20:12
[ Φόρμες ] Σύνθετο Πλαίσιο nodirem Access - Ερωτήσεις / Απαντήσεις 2 12-08-12 10:33
[ Active X Controls ] Πληκτρολόγηση σε συνθετο πλαίσιο stelianta Access - Ερωτήσεις / Απαντήσεις 7 23-03-12 16:25
[ Φόρμες ] Σύνθετο πλαίσιο Πέτρο Access - Ερωτήσεις / Απαντήσεις 7 29-02-12 14:17


Η ώρα είναι 21:21.