21-09-13, 15:50
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού 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 το κελί που έχει την κεφαλίδα "Ονοματεπώνυμο" (αν το έχεις αλλάξει βάλε το σωστό)
Με το πάτημα του κουμπιού θα προστίθεται κάθε φορά μία νέα γραμμή στην πρώτη θέση του Πίνακα
|