I need to change multiple columns from memo to text(30). The following code
works for a single column but i don't know how to add addition columns to the
code.

DoCmd.RunSQL "ALTER TABLE MyTable " & _
"ALTER COLUMN MyColumn1;"

--
Thank you,
Del

I'm pretty sure you need a separate ALTER statement for each column you want
to change.

"Del" wrote:

> I need to change multiple columns from memo to text(30). The following code
> works for a single column but i don't know how to add addition columns to the
> code.
>
> DoCmd.RunSQL "ALTER TABLE MyTable " & _
> "ALTER COLUMN MyColumn1;"
>
> --
> Thank you,
> Del

Del wrote:

>I need to change multiple columns from memo to text(30). The following code
>works for a single column but i don't know how to add addition columns to the
>code.
>
>DoCmd.RunSQL "ALTER TABLE MyTable " & _
>"ALTER COLUMN MyColumn1;"


You can inly mess with one column at a time. Use a separate
query for each column.

--
Marsh
MVP [MS Access]