Sayın temre,

Bahsettiğiniz konuya dair veri türünü değiştirme işlemi için teferruatlı fonksiyon yerine aşağıdaki Sql ifadesini bir sorgu oluşturup içerisine dahil ederek de,istediğiniz sonucu elde edebilirsiniz.

ALTER TABLE tbl_SIPARISSATIRLARI ALTER Column ONCELIK INTEGER

Ya da,makroda olsun derseniz de,o zaman;makro için kullandığınız fonksiyonunun içeriğini iptal edip yerine aşağıdaki Sql ifadesini ekleyebilirsiniz.yukarıdaki işlemin aynısını verecektir.

CurrentDb.Execute ("ALTER TABLE tbl_SIPARISSATIRLARI ALTER Column ONCELIK INTEGER")

Function VERI_TIPI() As String

CurrentDb.Execute ("ALTER TABLE tbl_SIPARISSATIRLARI ALTER Column ONCELIK INTEGER")

    'Dim tdf As TableDef

    'Dim fld As Field

    'Dim db As Database

    'Dim prp

        'Set tdf = db.TableDefs(" tbl_SIPARISSATIRLARI")

        'Set fld = tdf.Fields("ONCELIK")

        'Set prp = fld.CreateProperty("DisplayControl", dbInteger, TextBox)

    'DoCmd.SetWarnings False

    'fld.Properties.Append prp

    'DoCmd.SetWarnings True

End Function

Ek’teki örnek uygulamada her iki duruma göre de yazım mevcuttur.inceleyebilirsiniz.

İyi çalışmalar,
Saygılar.