change the format of field

[Informatic]

How can i Change the format of a field in a table with VBA Code.

Help .................

 

[KenReay]

Hi

Do not know for sure but..

If you are using DAO

Try
Dim Db as Database
Dim Tdf as Tabledef
Dim fld as Fileds
'
Set Db = CurrentDb()
Set tdf = db.Tabledefs("TAbleName&quot
Set fld = tdf.Fields("fieldname&quot

now you need to experiment with properties of fld, (maybe .format) Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now -

http://www.kenneth.reay.btinternet.co.uk

UK

 

[Informatic]

Thanks...

I have already tried this but it doesn't work...

Maybe i have to do something with .CreateProperty


....

 

[KenReay]

Hi

Yes, it is a property of the fied so:

Dim db As Database
Dim tdf As TableDef
Dim fld As DAO.Field
Dim i As Integer
Set db = CurrentDb()
Set tdf = db.TableDefs("tblName&quot
Set fld = tdf.Fields(1)
For i = 0 To fld.Properties.Count - 1
Debug.Print fld.Properties("Format&quot
Next i Regards

Ken Reay
Freelance Solutions Developer
Boldon Information Systems Ltd
Website needs upgrading, but for now -

http://www.kenneth.reay.btinternet.co.uk

UK