23-10-17, 21:23
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού 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
| |
Συμπληρωματικά, επειδή δεν διευκρινίζεις το ρόλο της =Τ()
αν δηλαδή η μεταφορά θα γίνει σε τιμές string και μόνο,
βάλε μετά το Κώδικας: If Target.Column <> 1 Then Exit Sub
την γραμμή/γραμμές (κατ' επιλογήν) για απαγόρευση αριθμών, ημερομηνιών Κώδικας: If IsNumeric(Target.Value) Then Exit Sub
If IsDate(Target.Value) Then Exit Sub
|