Como evitar perder zeros

1

A situação que estou enfrentando é que os identificadores inseridos em uma coluna são usados para pesquisar um banco de dados e exibir dados em outras colunas. No entanto, quando um número é inserido que começa com um zero, o Excel trunca automaticamente o número para omitir os zeros.

Estou tentando usar um gatilho para que, quando um número for inserido em uma célula e uma célula diferente for selecionada, o Excel forçará a célula a permanecer a mesma, se isso fizer sentido. Eu não tenho certeza se isso seria realizado armazenando-o como um texto ou outro método, e eu tenho muito pouca experiência com o VBA, portanto, qualquer entrada seria apreciada. O código básico que está em vigor agora é o seguinte:

Private Sub Worksheet_Change(ByVal Target As Range)
'MsgBox Target.Value
Application.EnableEvents = False
Target.Value = Target.Value & " please help"
Application.EnableEvents = True
End Sub

Isso foi configurado por outro colega de trabalho e apenas adiciona "por favor, ajude" a qualquer célula que seja alterada. É possível adicionar um 'antes do valor na célula para que o número começando com zero seja armazenado como texto e permaneça o mesmo?

    
por ernie 06.09.2013 / 23:38

1 resposta

1

Também não sou especialista em VBA, mas tentaria duas coisas. Primeiro Formate as células que você está preenchendo com os números que poderiam ter zeros deixando como texto. Não precisa ser uma coluna inteira, a menos que toda a coluna tenha números de clientes.

e a segunda possibilidade é alterar Target.Value = Target.Value & " please help" para Target.Value = " "& Target.Value"

Apenas algumas possibilidades

    
por 07.09.2013 / 00:23