Home Excel - Formulas e Funções Excel Formulas - Funcoes Personalizadas Excel formulas fp decompoe celulas horizontal com separador

Excel formulas fp decompoe celulas horizontal com separador

E-mail Imprimir PDF


Funções personalizadas decompoe dados e separam com determinado caracter
 
Saberexcel - Dicas Funções personalizadas

Essa Função Separa() decompoe os dados de determinada range
na horizontal sem separador de string
uso da funçao: =Separa(E9:E21)

Function
Separa(c As Range) As String
Dim a As Range
For Each a In c
Separa = Separa & a.Value
Next
End Function

'-----------------------------------------------------'
Essa Função Separa1(), decompoe os dados de determinada range
na horizontal com separador de string por caracter
uso da funçao: =Separa1(E9:E21)

Function
Separa1(c As Range, Optional s As String = "") As String
Dim a As Range
For Each a In c
Separa1 = Separa1 & s & a.Value
Next
Separa1 = Mid(Separa1, 2)
End Function

'-----------------------------------------------------'
Essa Função Separa2(), decompoe os dados de determinada range
na horizontal com separador de string por caracter

Function Separa2(TargetCells As Range, Optional Separador As Variant) As String
' Mid(Separa2, Len(Separador) + 1)
Dim Str As Range
If IsMissing(Separador) Then
For Each Str In TargetCells
Separa2 = Separa2 & Str.Value
Next
Else
For Each Str In TargetCells
Separa2 = Separa2 & Separador & Str.Value
Next
Separa2 = Mid(Separa2, Len(Separador) + 1)
End If
End Function


Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com SaberExcel



Baixe o exemplo de planilha ms excel vba com as funções acima
Excel formulas fp decompoe celulas horizontal com separador (21 kB)



Última atualização em Dom, 04 de Setembro de 2011 10:36  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje4055
mod_vvisit_counterOntem4432
mod_vvisit_counterEsta Semana30578
mod_vvisit_counterSemana passada46212
mod_vvisit_counterEsse mês17784
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10440613
Aprenda MS Excel VBA

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA