Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Jcm@ster

VBA - Remover quebra de linha a cada 1024 caracteres

Recommended Posts

Bom dia.

 

Estou tentando passar uma formulaLocal para uma planilha via VBA entretanto, quando a formula tem mais de 1023 caracteres, ele insere automaticamente uma quebra de linha na String, assim, não consigo enviar a formulaLocal pois, a mesma não tem o formato correto.

 

Já tentei SPLIT, Replace e demais funções sem sucesso.

Alguém sabe como devo proceder?

 

Minha variavel que popula a formulaLocal é String.

 

Obs: o interessante é que, ele coloca os dados corretamente, só está quebra de linha que está gerando o problema.

 

Dim formulaValor as String
formulaValor = "=SOMA("

'-------------
'Aqui vai o código que popula a variável que, nada mais é que uma concatenação

       For linhaAux = LinhaInicioOrc To LinhaFimOrc - 1

           If (CStr(Range("N" & linhaAux).Value) = "0") And CStr(Range("N" & linhaAux - 1).Value) = "0" And CStr(Range("N" & linhaAux + 1).Value) = "0" Then

               formulaValor = formulaValor & "CR" & linhaAux

               If (linhaAux < LinhaFimOrc - 1) Then
                   formulaValor = formulaValor & ";"
               End If

           End If

       Next
'-------------

Range("CR" + LinhaFimOrc).FormulaLocal = formulaValor

 

Obriigado pelo apoio de todos.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá amigo, para poder te ajudar vou precisar entender o seu problema. :natalsad:

 

Estou tentando passar uma formulaLocal para uma planilha via VBA

1-De qual planilha você está falando ? é excel ?

Obs: o interessante é que, ele coloca os dados corretamente, só esta quebra de linha que está gerando o problema.

 

Dim formulaValor as String

formulaValor = "=SOMA(" ..

2-Isso é o código completo ? ou só é uma parte do código ?

3-Existe algum exemplo da fórmula que você poderia passar ? exemplo" =soma(fórmula e a quebra de linha);"

Já tentei SPLIT, Replace e demais funções sem sucesso.

4-Você tentou em qual parte do código citado acima ?

 

Aguardando respostas.

Obrigado

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.