pessoal, podem me ajudar em descobrir o que está errado com o código abaixo? dá "Run-time error 13 , Type mismatch"
line90 = "<txtObser>regularização conta 218913601 - recolhimento de servidores ativos para a ug 109" & _
Worksheets("cedidos").Range("B31:D31") & Worksheets("cedidos").Range("B35:D35") _
& Worksheets("cedidos").Range("B36:D36") & "</txtObser>"
acima eh exatamente como esta escrito, se eu colocar code, o simbolo de concatenacao & aparece certo, mas fica menos espaço e corta em ug em vez de cortar em 109"
line90 = "<txtObser>regularização conta 218913601 - recolhimento de servidores ativos para a ug 109" & _ Worksheets("cedidos").Range("B31:D31") & Worksheets("cedidos").Range("B35:D35") _ & Worksheets("cedidos").Range("B36:D36") & "</txtObser>"
Sugiro disponibilizar a planilha com o codigo completo.
Assim é possivel entender e testar todo o codigo.
Palpite!
Vc esta selecionando intervalos. Ja tentou selecionar apenas 1 celula e verificar se o erro ocorre?
Marcelo Prudencio
"Começar já é a metade do caminho."
Autor Desconhecido
Simplifica que simples fica.
Nicole Tomazella.
"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.