<div>
i dont think you can directly change a field's type programmatically. A workaround is to create a new <br />
field, update this new field's values from the original field, delete the original field, then rename <br />
new field.<br />

</div>


i dont think you can directly change a field's type programmatically. A workaround is to create a new
field, update this new field's values from the original field, delete the original field, then rename
new field.


<div>
Thank you frankytee, this worked very well and on the first attempt. My grateful appreciation. An extra 100 points to you.<br />
Regards<br />
CoStar 
</div>


Thank you frankytee, this worked very well and on the first attempt. My grateful appreciation. An extra 100 points to you.
Regards
CoStar

<div>
you're welcome and thanks for the bonus
</div>


<div>
<div class="content wysiwyg-content">
I need to change the field types in another database and can't get my code to run (Runtime error '3219' - invalid operation)<br />
<br />
Set tdf = dbs.TableDefs!Jobs &nbsp; <br />
&nbsp; &nbsp; Set fld = tdf(&quot;Description&quot;)<br />
&nbsp; &nbsp; &nbsp; &nbsp; Set NewProp = fld.Properties(&quot;Type&quot;)<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; NewProp.Type = dbText<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; fld.Properties.Append NewProp &nbsp;'Error occurs here<br />
&nbsp; &nbsp; &nbsp; &nbsp; Set NewProp = fld.Properties(&quot;Size&quot;)<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; NewProp.Properties(&quot;Size&quot;)<wbr /> = 100<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; fld.Properties.Append NewProp<br />
<br />
The field is currently a Memo field and I want to change it to a text field (Size:100). Can anyone help please
</div>
</div>


I need to change the field types in another database and can't get my code to run (Runtime error '3219' - invalid operation)

Set tdf = dbs.TableDefs!Jobs   
    Set fld = tdf("Description")
        Set NewProp = fld.Properties("Type")
            NewProp.Type = dbText
            fld.Properties.Append NewProp  'Error occurs here
        Set NewProp = fld.Properties("Size")
            NewProp.Properties("Size") = 100
            fld.Properties.Append NewProp

The field is currently a Memo field and I want to change it to a text field (Size:100). Can anyone help please

How to change field type in VB?

Microsoft Access is a rapid application development (RAD) relational database tool. Access can be used for both desktop and web-based applications, and uses VBA (Visual Basic for Applications) as its coding language.