Formulas em vba

Visual Basic for Aplication e macros no Excel.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

Formulas em vba

Mensagempor wfsouza » Sex Mai 17, 2019 2:15 pm

Boa Tarde Galera,

Tenho uma planilha para controle de projeto com algumas interface em VBA e estou precisando colocar um codigo em vba mas não sei como fazer, dentro da propria planilha eu consegui escrever o codigo para trazer o resultado que procuro, agora preciso fazer isso com vba.
Formula =EXT.TEXTO(B23;1;1)&"."&EXT.TEXTO(B23;1;1)+1&EXT.TEXTO(B23;3;50)

No codigo vba ele devera verificar se ja existe na coluna b a informação conform o combobox, neste combo estou informando algo parecido com 1.Planejamento, então se ele acha esta informação na coluna, ele deve extrair o numero do adicionar mais um como se fosse o código de contabilidade ai o próximo registro ficaria 1.2 Planejamento e assim por diante.


Eu consegui uma formula que ele me acha a informação dentro da planilha, agora como posso incremetar a formula para obter o resultado que espero é que eu não sei fazer.

Código: Selecionar todos
Function fncMatch(ByVal str As String, ByVal varVetor As Variant) As Long
    Dim Temp As Long
    Dim Adic1 As Long
   
    On Error Resume Next
    Temp = WorksheetFunction.Match(str + 0, varVetor, 0)
    Adic1 = (CStr(str + 1))   tentei fazer assim mas não deu certo, na variavel str ele vem o valor completo que ele achou dentro da planilha
    MsgBox "Adic1"
    If Temp = 0 Then Temp = WorksheetFunction.Match(CStr(str), varVetor, 0)
    fncMatch = Temp
End Function

Ai ele ficaria assim
1. Planejamento
1.2 Planejamento
1.3 Planejamento
1.4 Planejamento

Alguem pode me ajudar.

Obrigado.
Editado pela última vez por wagner em Sex Mai 17, 2019 9:44 pm, em um total de 1 vez.
Razão: ATENÇÃO CARO USUÁRIO: Códigos VBA devem ser inseridos aqui no Fórum com a utilização da TAG CODE existente no início da caixa de mensagens (quinto botão da esquerda para a direita).
wfsouza
Membro
Membro
 
Mensagens: 1
Registrado em: Sex Mai 17, 2019 2:04 pm
Has thanked: 0 time
Have thanks: 0 time

{ SO_SELECT }

Re: Formulas em vba

Mensagempor wagner » Sex Mai 17, 2019 9:47 pm

wfsouza,

Boa noite!

Seja muito bem vindo (a) ao fórum.

DICAS para aproveitar ao máximo o fórum e sempre manter o mesmo de forma organizada, sugiro ler os tópico da regras abaixo:
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371

Algumas solicitações especiais que pedimos, por gentileza, ficar atento:
1 - Não inserir no titulo de suas postagens expressões como Help, Ajuda, etc. O título deve ser um resumo da sua necessidade para que outras pessoas que tenham a mesma dúvida possam efetuar a pesquisa e achar como foi resolvido.
2 - Não insira em suas mensagens frases todas escritas em letras maiúsculas. Isso, na Internet, é compreendido como gritos e muitos usuários sequer respondem somente por esse fato!
3 - Insira sempre um arquivo exemplo compactado com .ZIP aqui mesmo no fórum. Existe, logo abaixo da caixa de mensagens, uma aba chamada "Adicionar um anexo" para essa finalidade. O arquivo exemplo deve ser pequeno, com apenas 5 linhas no máximo, compactado com .ZIP e ter o mesmo layout (nome do arquivo, nome das abas/guias/folhas, mesma linha/coluna onde os dados se iniciam) do arquivo original. Links de arquivos enviados para sites de compartilhamento de arquivos, muitas vezes são bloqueados pelas empresas, por conterem muitos vírus. Alguns usuários que acessam o fórum a partir de empresas não conseguem baixar tais arquivos.
4 - Não utilize a ferramenta CITAR para inserir o inteiro teor das mensagens que lhe são encaminhadas como resposta. Citações, se estritamente necessárias ao entendimento da mensagem que você quer enviar, devem ser apenas de pequenos trechos das mensagens.
5 - Se for postar códigos VBA aqui no fórum, utilize a ferramenta CODE localizada logo no início da caixa de mensagens (quinto botão da esquerda para a direita). As linhas de código devem ficar entre as palavras "CODE e /CODE".
6 - Agradeça sempre às pessoas que lhe responderam e às mensagens que atenderam a necessidade de sua demanda. Esse agradecimento deve ser clicando na mãozinha que fica localizada ao lado da ferramenta CITAR. Lembre-se: o fórum é gratuito e esse é o único incentivo para as pessoas que prestam ajuda. Você pode agradecer a quantos usuários quiser.
7 - O título ou o texto das mensagens postadas não devem ser escritos todo em letras maiúsculas. Na internet, tudo escrito em letras maiúsculas é interpretado como gritos e muitos usuários sequer olham para esse tipo de mensagem.
8 - Não Utilize o Botão CITAR para efetuar as suas respostas. Para fazer isso use apenas o Botão RESPONDER.

Quanto a sua demanda, bem... confesso que não entendi nada! Achei sua explicação muito confusa.
Se a resposta foi útil para você, por gentileza, Amigo, clique na mãozinha ao lado direito da ferramenta CITAR, no canto superior direito.

Atenciosamente
Wagner Morel
Avatar do usuário
wagner
Moderador
Moderador
 
Mensagens: 5247
Registrado em: Sáb Out 20, 2012 12:49 pm
Localização: Fortaleza - CE
Has thanked: 93 times
Have thanks: 2243 times


Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: Google Adsense [Bot] e 9 visitantes