ms-office.gr > Forum > Microsoft Excel > Excel - Ερωτήσεις / Απαντήσεις > [VBA] Ενημέρωση εγγραφών μέσω userform

Excel - Ερωτήσεις / Απαντήσεις Ότι έχει σχέση με συναρτήσεις, μορφοποίηση, εκτυπώσεις γραφήματα κτλ.

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 06-04-14, 19:08
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 09-03-2014
Μηνύματα: 4
Προεπιλογή Ενημέρωση εγγραφών μέσω userform

Καλησπέρα. Καταρχήν να σας ευχαριστήσω για τα φώτα που μας δίνετε... και η ερώτηση μου είναι
σαν αρχάριος που είμαι θέλω με το πάτημα ενός κουμπιού να ενημερώνει συγχρόνως όλες τις εγγραφές που εμφανίζονται στο userform. Σας αποστέλνω το συνημμένο για να το καταλάβετε...
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm UPDATE CUSTOMER.xlsm (26,1 KB, 38 εμφανίσεις)
Απάντηση με παράθεση
  #2  
Παλιά 06-04-14, 20:59
Το avatar του χρήστη Spirosgr
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 22-11-2011
Περιοχή: Αθήνα
Μηνύματα: 2.402
Προεπιλογή

Καλησπέρα
Φίλε Χρήστο καλωσόρισες στην παρέα μας.
Για να είμαι ειλικρινής, δεν κατάλαβα το ζητούμενο με βάση αυτό που είδα στον κώδικα.
Η φόρμα ανοίγει στο πρώτο φύλλο και το πελατολόγιο είναι στο δεύτερο,
ενώ υπάρχει και ActiveCell ...
και ορίζεται η περιοχή MyRange με Function ...
ενώ στα Textboxes χρησιμοποιείς Find ...
Ακόμα δεν κατάλαβα, γιατί πρέπει να υπάρχουν δεξιά και αριστερά ίδια Textboxes ...
Τώρα για να επαναπροσδιορίσουμε το ζητούμενο:
Υποθέτω ότι έχεις σε κάποιο φύλλο ένα πελατολόγιο, με χ στήλες με στοιχεία πελατών.
Θέλεις να ανοίγεις μια φόρμα, όπου αφ' ενός μεν με την επιλογή πελάτη να εμφανίζονται τα στοιχεία του, αφ' ετέρου δε αν αλλάξεις κάποιο από αυτά, να ενημερώνονται οι εγγραφές
του πελατολογίου σου.
Το κατάλαβα σωστά;
Αλλά ας αρχίσουμε σωστά αφού θέλεις να χρησιμοποιείς κώδικα.
Πήγαινε πίσω στην VBA και από τα εργαλεία > επιλογές επέλεξε και τίκαρε
στην πρώτη καρτέλα αυτό που φαίνεται στην συνημμένη εικόνα.
Αυτό εμφανίζει επάνω σε κάθε λειτουργική μονάδα την "έκφραση"
Option Explicit
που σε "αναγκάζει" να δηλώσεις τις μεταβλητές σου ώστε να ορίζεται
τι είναι τι και που είναι ποιο.
Αν κατάλαβα το ζητούμενο συνεχίζουμε.
Συνημμένα Thumbnails
Ενημέρωση εγγραφών μέσω userform-katagrafi.png  
Απάντηση με παράθεση
  #3  
Παλιά 06-04-14, 21:48
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 09-03-2014
Μηνύματα: 4
Προεπιλογή

Καλησπέρα Σπύρο και πάλι και σε ευχαριστώ για την φιλοξενία.
Σωστά το κατάλαβες αν και όπως σου έγραψα είμαι αρχάριος και την φόρμα την βρήκα κάπου έτοιμη και προσπάθησα να την τροποποιήσω αλλά δεν μπόρεσα.
Τώρα για να σου δώσω να καταλάβεις θέλω όπως αριστερά έτσι και δεξιά να εμφανίζει τις εγγραφές ανάλογα με το τι θα εμφανίζει το combobox και ανάλογα να τις ενημερώνω η να τις τροποποιώ.
Απάντηση με παράθεση
  #4  
Παλιά 07-04-14, 12:51
Το avatar του χρήστη Spirosgr
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 22-11-2011
Περιοχή: Αθήνα
Μηνύματα: 2.402
Προεπιλογή

Καλημέρα
Στο βιβλίο που ακολουθεί υπάρχει τροποποιημένο ένα παλιότερο project
που είχαμε κάνει με τον Τάσο.
Μπορεί να διαχειριστεί εγγραφές πελατολογίου μέσω φόρμας.
Η φόρμα μπορεί να αλλάξει ανάλογα τις ανάγκες του καθ' ενός
προσθέτοντας / αφαιρώντας στοιχεία.
Αν ανοίξετε την φόρμα και περάσετε τον κέρσορα επάνω από τα κουμπιά (εικονίδια)
εμφανίζεται "λεζάντα" με το τι κάνει κάθε κουμπί.
Γενικά
Για νέα εγγραφή: καθαρίσετε τα πεδία, εισάγετε νέο και κλικ στο κουμπί
Για υπάρχουσες εγγραφές: επιλέξτε από την λίστα και ενημερώστε ή διαγράψτε ανάλογα
Σημείωση:
Να πούμε εδώ ότι ο τρόπος που εισάγεται το ID πελάτη προϋποθέτει να μην έχουμε διαγραφές
αλλά να κρατάμε ιστορικό με μια στήλη που να χαρακτηρίζει "Ενεργό / Ανενεργό"
Αν θέλουμε να διαγράφουμε εγγραφές αλλά ένα ID "χρησιμοποιημένο" να μην επαναληφθεί ποτέ ξανά
(όπως κάνει η Access) τότε ο τρόπος εισαγωγής του είναι διαφορετικός.
Κάποια στιγμή θα ανεβάσουμε ένα τέτοιο αρχείο στην ενότητα "Χρήσιμα" του forum.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm CustManagement.xlsm (37,7 KB, 111 εμφανίσεις)

Τελευταία επεξεργασία από το χρήστη Spirosgr : 07-04-14 στις 13:41. Αιτία: Προσθήκη Σημείωσης
Απάντηση με παράθεση
  #5  
Παλιά 07-04-14, 21:43
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-04-2013
Μηνύματα: 236
Προεπιλογή

Γεια σου Σπύρο,
Ζητώ συγνώμη για την παράπλευρη ερώτηση!
που μπορώ να βρω τα εικονίδια που έχεις χρησιμοποιήση στη userform
έχω το office 2007 έψαξα αλλά δεν βρήκα κάτι σχετικό
Ευχαριστώ εκ των προτέρων.
Απάντηση με παράθεση
  #6  
Παλιά 07-04-14, 21:54
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 09-03-2014
Μηνύματα: 4
Προεπιλογή

Φίλε Σπύρο με έχεις βοηθήσει πάρα πολύ... το μόνο κακό είναι ότι όταν έχω1000 πελάτες δεν μπορώ να βρω αυτόν που ψάχνω. Μήπως θα μπορούσες να προσθέσεις ένα combox εναλλακτικα για γρήγορη εύρεση του πελάτη; Ευχαριστώ
Απάντηση με παράθεση
  #7  
Παλιά 08-04-14, 00:23
Το avatar του χρήστη Spirosgr
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 22-11-2011
Περιοχή: Αθήνα
Μηνύματα: 2.402
Προεπιλογή

Χρήστο
Το combobox είναι συνδυαστικό ως προς την λειτουργία του.
Και ψάχνει μέσω λίστας και πληκτρολογείς.
Η λίστα που δημιουργείται αριστερά στην φόρμα είναι αλφαβητική και
μπορείς να κάνεις πολύ εύκολη αναζήτηση με την scrollbar.
Άρα την μια ενέργεια (του combo) την έχεις.
Εκτός από αυτό θέλεις και αναζήτηση με πληκτρολόγηση;
πχ να γράφεις "κάπου" ΔΗΜΗΤ" και εμφανίζονται εγγραφές για ΔΗΜΗΤΡΙΟΥ, ΔΗΜΗΤΡΙΑΔΗ κλπ;
Απάντηση με παράθεση
  #8  
Παλιά 08-04-14, 05:14
Όνομα: Χρήστος
Έκδοση λογισμικού Office: Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 09-03-2014
Μηνύματα: 4
Προεπιλογή

Ναι θα με εξυπηρετούσε πολύ...
Απάντηση με παράθεση
  #9  
Παλιά 14-04-14, 00:35
Το avatar του χρήστη Spirosgr
Συντονιστής
Όνομα: Σπύρος Τσιλιγιάννης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 22-11-2011
Περιοχή: Αθήνα
Μηνύματα: 2.402
Προεπιλογή

Για θέματα αναζήτησης δεδομένων και εισαγωγή, ενημέρωση, διαγραφή εγγραφής/ων
δείτε αυτό:
http://www.ms-office.gr/forum/excel-...html#post17947
Απάντηση με παράθεση
Απάντηση στο θέμα


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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[VBA] Επιλογή μήνα μέσω Userform gfevran Excel - Ερωτήσεις / Απαντήσεις 8 13-09-15 12:12
Εκτύπωση Προτύπων εγγράφων μέσω access dratsaki Access - Ερωτήσεις / Απαντήσεις 2 15-07-14 19:40
Ενημέρωση Πολλαπλών Πεδίων μέσω της εντολής Update Χρήστος Access - Ερωτήσεις / Απαντήσεις 3 31-01-14 23:44
Φίλτράρισμα εγγραφών Φόρμας Μέσω Πολλών ComboBox Χρήστος Access - Ερωτήσεις / Απαντήσεις 4 12-08-12 18:43
Ενημέρωση Πεδίου μέσω βοηθητικής Φόρμας Χρήστος Access - Ερωτήσεις / Απαντήσεις 6 01-04-12 15:56


Η ώρα είναι 01:53.