03-04-17, 23:02
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού 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
| |
Καλησπέρα
Η εικόνα, αν και δεν φαίνεται καλά, προφανώς είναι από κάποια φόρμα Access.
Το ζητούμενο έχει ασάφειες, αλλά νομίζω ότι στο βιβλίο υπάρχει λύση...
Ξεκινάς από την Header1 και βάζεις δεδομένα...
Όταν συμπληρωθεί και η Header7, (απαραίτητη προϋπόθεση) τότε, πιέζοντας το Enter:
1. Μπαίνει αρίθμηση, στην τρέχουσα γραμμή...
2. Προστίθεται μια νέα γραμμή...
3. Επιλέγει το κελί της Header1, όπου θα ξαναγράψουμε δεδομένα...
Σημειώσεις:
Πιθανό, ο κώδικας να χρειάζεται κι άλλες ασφάλειες, αν το ζητούμενο δεν είναι 100% αυτό...
Οι εκφράσεις στον κώδικα:
Columns(8)
Offset(, -7)
(Rows.Count, 1)
Cells(LRow, 2)
θα πρέπει να προσαρμοστούν, στο πραγματικό φύλλο...
|