Ανανέωση ιστοσελίδας
ms-office.gr > Forum > Microsoft Excel > Excel - Ερωτήσεις / Απαντήσεις > [Excel07] Μεταφορά δεδομένων από ένα φύλο εργασίας σε άλλο

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

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

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 17-09-13, 00:53
Το 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.321
Προεπιλογή

Να 'σαι καλά Χρήστο σ' ευχαριστώ κι εγώ.
Παρεμπιπτόντως το σωστό δεν είναι κωδικοί αλλά ...Κώδικες.
Απάντηση με παράθεση
  #2  
Παλιά 21-09-13, 15:50
Το 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.321
Προεπιλογή

Καλησπέρα
1. Δημήτρη μπορείς να βάλεις "Απεριόριστες" εγγραφές (όσες σειρές έχει η excel)
2. Βάλε ένα κουμπί και σύνδεσε τον κώδικα:

Sub AddTblRow()
Application.ScreenUpdating = False
ActiveSheet.Range("B5").ListObject.ListRows.Add (1)
End Sub

όπου B5 το κελί που έχει την κεφαλίδα "Ονοματεπώνυμο" (αν το έχεις αλλάξει βάλε το σωστό)

Με το πάτημα του κουμπιού θα προστίθεται κάθε φορά μία νέα γραμμή στην πρώτη θέση του Πίνακα
Απάντηση με παράθεση
  #3  
Παλιά 21-09-13, 18:49
Όνομα: ΔΗΜΗΤΡΗΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-08-2013
Μηνύματα: 6
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από spirosgr Εμφάνιση μηνυμάτων
Καλησπέρα
1. Δημήτρη μπορείς να βάλεις "Απεριόριστες" εγγραφές (όσες σειρές έχει η excel)
2. Βάλε ένα κουμπί και σύνδεσε τον κώδικα:

Sub AddTblRow()
Application.ScreenUpdating = False
ActiveSheet.Range("B5").ListObject.ListRows.Add (1)
End Sub

όπου B5 το κελί που έχει την κεφαλίδα "Ονοματεπώνυμο" (αν το έχεις αλλάξει βάλε το σωστό)

Με το πάτημα του κουμπιού θα προστίθεται κάθε φορά μία νέα γραμμή στην πρώτη θέση του Πίνακα
Σπύρο συγνώμη

Αλλά μου βγάζει σφάλμα στο εξής :
Private Sub CommandButton1_Click()

Συγνώμη αλλά είμαι άρκετα αρχάρειος!!!
Ευχαριστώ
Απάντηση με παράθεση
  #4  
Παλιά 21-09-13, 19:42
Το 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.321
Προεπιλογή

Δημήτρη
Στο συνημμένο έχει προστεθεί και αυτή η λειτουργία.
Χρησιμοποίησέ το σαν πρότυπο.
Αντί για τα "άχαρα" κουμπιά που έχει η excel μπορείς να χρησιμοποιείς
τα σχήματα που υπάρχουν στο σχετικό μενού.
Εδώ κάναμε αντιγραφή ένα από τα υπάρχοντα σχήματα - κουμπιά και απλά βάλαμε
στο καινούριο (αντιγραμμένο) την αντίστοιχη εντολή.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm ΚαρτέλαΥπολοίπου.xlsm (47,0 KB, 114 εμφανίσεις)
Απάντηση με παράθεση
  #5  
Παλιά 22-09-13, 08:19
Όνομα: ΔΗΜΗΤΡΗΣ
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-08-2013
Μηνύματα: 6
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από spirosgr Εμφάνιση μηνυμάτων
Δημήτρη
Στο συνημμένο έχει προστεθεί και αυτή η λειτουργία.
Χρησιμοποίησέ το σαν πρότυπο.
Αντί για τα "άχαρα" κουμπιά που έχει η excel μπορείς να χρησιμοποιείς
τα σχήματα που υπάρχουν στο σχετικό μενού.
Εδώ κάναμε αντιγραφή ένα από τα υπάρχοντα σχήματα - κουμπιά και απλά βάλαμε
στο καινούριο (αντιγραμμένο) την αντίστοιχη εντολή.
Σπύρο Καλημερα

Σ' ευχαριστώ Πολύ για την λύση που μου έδωσες.[B]
Τελικά η excel μπορεί να σου λύσει πολλά προβλήματα, χωρίς να χρειάζεται να πάς στις εταιρίες προγραμμάτων εμπορικής διαχείρησης, γιατί οι περισσότερες επιχειρήσεις στην Ελλάδα είναι μικρές σε όγκο δεδομένων με αποτέλεσμα οι εφαρμογές που σου προσφέρουν να είναι υπερβολικές και σε λειτουργίες αλλά και σε κόστος (αγορά - υποστήριξη).
Σ' ευχαριστώ και πάλι
Απάντηση με παράθεση
Απάντηση στο θέμα


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

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


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

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[VBA] Μεταφορά δεδομένων σε άλλο φύλλο Χρήστος Excel - Ερωτήσεις / Απαντήσεις 1 14-10-16 11:43
[Excel07] Μεταφορά δεδομένων σε άλλο φύλλο rania1984 Excel - Ερωτήσεις / Απαντήσεις 3 25-09-14 13:17
Σύνδεση και μεταφορά δεδομένων απο πολλά βιβλία εργασίας σε ένα βιβλίο εργασίας. panos1978 Excel - Ερωτήσεις / Απαντήσεις 13 17-07-13 11:18
[VBA] Μεταφορά δεδομένων από ένα βιβλίο εργασίας σε άλλο βιβλίο εργασίας. anestaki Excel - Ερωτήσεις / Απαντήσεις 3 24-10-12 07:24
[Συναρτήσεις] Μεταφορά δεδομένων σε άλλο φύλλο xristos Excel - Ερωτήσεις / Απαντήσεις 16 01-11-11 07:21


Η ώρα είναι 15:46.