20-05-15, 22:33
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού 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
| |
Κατ' αρχήν δεν κάνει αποκοπή αλλά διαγράφει το περιεχόμενο.
Αν απενεργοποιήσεις το cel.ClearContents δεν θα γίνεται πλέον ο καθαρισμός.
Ορίζεις όσα κελιά θέλεις ως Dim cel As Range με διαφορετικά ονόματα και
με βάση αυτό Sheet2.Cells(Lrow + 1, 1).Value = cel.Value
βάζεις που θέλεις να πάει τι (με αυτήν την σύνταξη: που θέλεις να πάει τι)
|