Microsoft Access embutido ambiente de programação , Visual Basic for Applications ou VBA, permite aos usuários executar qualquer das operações de dados disponível na interface de usuário padrão do Access. Estas operações incluem consultas SQL que mudar o tipo de uma coluna da tabela de dados , tais como o de inteiro ao texto. Usuários de acesso podem ter várias abordagens para alterar o tipo de dados do campo com VBA. Alterando os tipos de campo com macros VBA pode ser feito em apenas alguns passos simples . Instruções
1

Abra o Microsoft Access , em seguida, começar a criar uma tabela de dados de exemplo clicando o item " Tabela " do menu " Criar". Você vai usar o VBA para alterar o tipo de um campo de dados na tabela.
2

Digite "Book " na célula superior da segunda coluna , na janela de grade da tabela aberta na etapa 1. Digite " preço" na célula à direita da célula "Book".
3

Digite qualquer nome livro na primeira célula abaixo do " Livros " cabeçalho da coluna e digite uma amostra preço na primeira célula na coluna "Preço" . Digitando o número automaticamente torna o acesso definir a coluna "Preço" como um não- texto, campo numérico .
4

Pressione "Control -S ", em seguida, digite " Booktable " para dar esse nome para a amostra dados.
5

botão direito do mouse na aba " Booktable " e selecione " modo de design. " O " preço" linha da grelha que aparece exibirá " Número ". Isto indica que o campo " preço " é um valor numérico , não texto , campo . Feche a guia clicando com o botão direito nele e clique em "Fechar".
6

Pressione " Alt- F11 " para entrar na janela de codificação para macros VBA. Clique no botão " Insert " item " Module" do menu para inserir um novo módulo ou janela para entrar em seu programa de mudança de campo .
7

Cole o seguinte programa no módulo. "Executar" declaração deste programa é executado um comando SQL, "ALTER TABLE ", sobre os dados " Booktable " . Esse comando altera o tipo de campo do campo " preço" a partir numérico em texto .

Public Sub ChangeDataType ()

Dim dbase Como DAO.Database

Definir dbase = CurrentDb

dbase.Execute ( " ALTER TABLE ALTER COLUMN Booktable [ preço] de texto ( 25) ;")

End Sub
8

Execute o programa clicando em um de suas demonstrações e clicar comando "Executar" do menu " Run" .
9

Retornar para acesso com a tecla " Alt- F11 ", em seguida, re - exibir a visualização de design dos dados " Booktable " por usando instruções passo 5 do . O " preço" linha agora exibe "Texto" em vez de " Número ".