15-05-15, 12:07
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού 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
| |
Δοκίμασε να τροποποιήσεις το κάτω μέρος του κώδικα ως εξής: Κώδικας: NewField.OrdinalPosition = 1
On Error GoTo err:
tblTest.Fields.Append NewField
Exit Sub
err:
MsgBox "Το πεδίο υπάρχει ήδη"
End Sub
Βολεύει κάτι τέτοιο;
|