Bom dia!!

Não entendi o que quer, explique melhor.

Seria isso

Supondo que tem 12.47 em E5

="$"&SUBSTITUIR(E5;".";","), ficaria $12,47

Att

alexandrevba, é exatamente isso. Porém o meu Excel é ingles e usei o "REPLACE".
Coloquei assim, ="$"&REPLACE(E3;".";","), Mas não funcionou. Por favor veja o anexo.
Muito obrigado.

Boa tarde!!

Neste caso use a SUBSTITUTE.
Tente ..

 ="$"&SUBSTITUTE(E3;".";",")

Att

alexandrevba. Muito obrigado, nunca tive uma dúvida em fórum respondida tão rápido.
Agora, se importaria de me tirar outra dúvida ? Esta tabela vem através de 'Dados da Web'. Há alguma maneira de sempre ordena-la de forma do valor mais baixo pro mais alto ?
Por exemplo, quando ela for atualizada ordenar por ordem crescente a partir da coluna "E" ?

Boa noite!!

Como a primeira resposta foi útil, se pode clicar na mãozinha eu fico grato!!
viewtopic.php?f=9&t=3784

Faça uma adaptação; caso contrário poste um modelo de sua planilha (COMPACTADO!!).

Private Sub Worksheet_Change(ByVal Target As Range)
'Classificação automatica
Dim lrow As Long
lrow = Range("A" & Rows.Count).End(xlUp).Row
If Range("D" & lrow).Value <> "" Then 'Se os dados for preenchidos de A até D
    [A2:D10].Sort Key1:=[A1], Order1:=xlAscending 'será feito a classificação
End If
End Sub

Att

Agradecido, mas a parte da programação eu insiro de que forma ?
A planilha só tem uma aba (sheet), onde eu coloquei a importação de dados da Web. Veja o anexo. Obrigado.
No caso da planilha eu quero ordenar por ordem crescente a partir da coluna F

Boa noite!!

Vou fazer para você mas lembre se das regras

Como eu havia dito

Faça uma adaptação; caso contrário poste um modelo de sua planilha (COMPACTADO!!).

viewtopic.php?f=7&t=203

Aguarde que vou te retornar!!!

Att

Ok. Sem problemas alexandrevba.

Boa noite!!!

Toda a vez que a planilha receber uma alteração na célula, será feito a classificação!!

Foi levado em consideração esse intervalo, A2:F1000.

Faça o Down Load em:
http://www.sendspace.com/file/284w74

Código usado

Private Sub Worksheet_Change(ByVal Target As Range)
'Classificação automatica
Dim lrow As Long
lrow = Range("A" & Rows.Count).End(xlUp).Row
If Range("F" & lrow).Value <> "" Then 'Se os dados for preenchidos de A até D
    [A2:F1000].Sort Key1:=[E1], Order1:=xlAscending 'será feito a classificação
End If
End Sub

Att

Oi amigo. Mais uma vez obrigado. E, desculpe o incomodo. Estou sendo chato pra caramba, eu sei.
Seguinte, quando a tabela foi fazer o refresh automatico deu um erro. E além do erro a ordem crescente não foi respeitada.

Boa noite!!

o problema da classificação é o formato!

Quanto ao erro dever algum link, aqui está normal.

Att

Amigo, quando voce tenta atualizar os dados da web nao aparece esta mensagem de erro ?

Boa noite!!

Após fazer os teste aqui, deu certo!!!

Qual é a versão do seu excel?

Att

Alexandre,

Microsoft Office Professional Plus 2010
Microsoft Excel - version 14.0.4734.1000