[Resolvido]Alterar Formato de Campo Texto

Numa consulta de Atualização para uma mesma Tabela preciso alterar todos os registros do Campo "NumTombo" que está com o formato: "0001/2012" para "0001_2012", o mesmo é tipo Texto com tamanho 9, ou seja, é apenas para trocar o "/" pelo "_", e manter os mesmos digitos já inclusos em todos os demais registros.

Não entendi bem. Você quer alterar os valores na tabela, certo?

Quero fazer a consulta de Atualização do campo "NumTombo" para o Campo "TxtCaminho" (tipo texto) na mesma tabela para o resultado final ficar da seguinte forma no 2º campo mencionado: "Q:\Dados\Tombos\2012\tombo_0001_2012.pdf", seguindo a sequência até o final da quantidade de registros da tabela.

Em resumo, pegar o código que está no campo "NumTombo" do ano de 2012 (já filtrado) no formato 0001/2012 e gravar na tabela já com a alteração do formato para 0001_2012 para o campo "TxtCaminho" conforme abaixo explicado para todos os registros que são mais de 600.

Usei o seguinte código: "Q:\Dados\Tombos\2012\tombo_" & [NumTombo] & ".pdf" na linha "atualizar para" da consulta no campo "TxtCaminho", mas ao executar retornou cada um dos registros como: "Q:\Dados\Tombos\2012\tombo_0001/2012.pdf", alterando apenas a sequência para 0002/2012,0003/2012, 0004/2012, etc.

PS: O Campo "NumTombo" permanecerá no seu formato original: "0001/2012".

Ainda não entendi bem uma coisa. Os valores do campo que você quer alterar estão como Q:\Dados\Tombos\2012\tombo\0001\2012.pdf ou tombo\0001\2012?
Se entendi direito, seria a primeira, certo? Imaginando que o número de caracteres é fixo, você pode fazer isso via código, no "Ao clicar" de um botão, por exemplo:

Código:

Dim rs As Recordset
Set rs = CurrentDb.Openrecordset("NomeDaTabela")

Do While Not rs.EOF
rs.Edit
rs!NomeDoCampo = Left(rs!NomeDoCampo, 21) & Mid(rs!NomeDoCampo, 22, 5) & "_" & Mid(rs!NomeDoCampo, 28, 4) & "_" & Right(rs!NomeDoCampo, 8)
rs.Update
rs.MoveNext
Loop

rs.Close
Set rs = Nothing

Teste em uma cópia.

Fiz o teste e ficou assim em cada registro no campo "TxtCaminho": 0001/2012__001/2012 (Fez a duplicidade do campo "NumTombo" separando por "_") variando apenas a sequência para todos os demais registros da tabela, no entanto, o que preciso é que fique assim em todos os registros do campo "TxtCaminho": "Q:\Dados\Tombos\2012\tombo_0001_2012.pdf", variando a sequência conforme o código gravado no campo "NumTombo".

A idéia é repassar para o campo "TxtCaminho" o caminho do arquivo que foi gravado em pdf para os registros já existentes, pois já existe a partir de agora uma rotina de quando se gera um novo Código "NumTombo" para fazer a captura desse caminho, no entanto, os registros antigos também precisam de caminho porisso que estou tentando fazer através de uma consulta de Atualização, pois será feito apenas uma única vez, portanto não ficará como uma rotina do formulário.

Exemplificando como deveria ficar o resultado final:

Campo
NumTombo - 0001/2012 * tamanho 9 (incluindo a "/")
TxtCaminho - "Q:\Dados\Tombos\2012\tombo_0001_2012.pdf" * com a mesma quantidade de digitos: 9 (incluindo o "_")

PS: O campo "TxtCaminho" está vazio para todos os registros em questão.

E assim para todos os demais registros da tabela, deu para entender ?

Aonde está Left, será contado o número de caracteres da esquerda. Temos Left(rs!Campo, 21). Nesse caso, pegará os primeiros 21 caracteres. Aonde está Mid, será contado à partir do primeiro número de caracteres. No nosso caso, temos Mid(rs!NomeDoCampo, 22, 5), o que significa que serão capturados 5 dígitos à partir do vigésimo segundo. A mesma coisa vale para o Right, que irá pegar os últimos caracteres. Altere esses números até chegar no que você precisa.

Tentei fazer, mas como infelizmente eu precisava terminar até esta sexta-feira (13 por sinal), não deu tempo, ou seja, os testes que fui fazendo não chegaram ao resultado esperado, então fiz manualmente mesmo, fazer o que, são os ossos do ofício e do tempo.

Obrigado pelo interesse e ajuda, valeu.

Provavelmente você não se lembrou de mudar o NomeDoCampo para o nome correto do campo da sua tabela ou então o NomeDaTabela para o nome correto da sua tabela. Eu fiz um teste aqui com tudo igual está na função que passei e funcionou.
Mas se já resolveu, resolvido está