BrunoMJoia
Membro Júnior-
Posts
13 -
Cadastrado em
-
Última visita
Reputação
0-
VBA - Texto para colunas
BrunoMJoia respondeu ao tópico de BrunoMJoia em Microsoft Office e similares
Sub TESTES() Dim LINHA As Long LINHA = 1 While ThisWorkbook.Sheets("Planilha1").Cells(LINHA, 1) <> "" Dim TestString As String TestString = ThisWorkbook.Sheets("Planilha1").Cells(LINHA, 1).Value Dim TestArray() As String TestArray = Split(TestString, " ") ThisWorkbook.Sheets("Planilha1").Cells(LINHA, 1).Value = TestArray(0) ThisWorkbook.Sheets("Planilha1").Cells(LINHA, 1).Select Selection.NumberFormat = "m/d/yyyy" ThisWorkbook.Sheets("Planilha1").Cells(LINHA, 2).Value = TestArray(1) ThisWorkbook.Sheets("Planilha1").Cells(LINHA, 2).Select Selection.NumberFormat = "h:mm" LINHA = LINHA + 1 Wend End Sub adicionado 0 minutos depois Resolvido!! -
VBA - Desabilitar Msgbox automatica
BrunoMJoia respondeu ao tópico de BrunoMJoia em Microsoft Office e similares
Application.DisplayAlerts = False Resolvido!! -
Pessoal, bom dia, Preciso da ajuda de vocês. Tenho uma macro que realiza o comando texto para colunas, em uma coluna q contém a informação de data e hora juntas. Quando realizo o comando sem utilizar a macro ele funciona perfeitamente, separando data e hora. Porém quando utilizo a macro ele altera as horas para hh:mm:ss AM/PM, o que no meu caso não serve. Existe alguma maneira da Macro realizar o comando sem alterar a formatação das horas? Application.DisplayAlerts = False Range("G2").Select Range(Selection, Selection.End(xlDown)).Select Selection.TextToColumns Destination:=Range("G2"), _ DataType:=xlDelimited, Space:=True Application.DisplayAlerts = True TESTE.xlsx
-
Pessoal boa tarde, Preciso da ajuda de vocês, tenho uma macro para copiar dados de uma coluna e colar em outra, e após isso utilizo o comando de texto para colunas. Acontece que durante a execução da macro, aparece uma msgbox automática do Excel. Preciso de um comando para desabilitar a msgbox e deixar a macro rodando lisa. Podem ajudar? Sub Macro1() Application.ScreenUpdating = False Columns("G:G").Select Selection.Insert Shift:=xlToRight Selection.Insert Shift:=xlToRight Range("C2").Select Range(Selection, Selection.End(xlDown)).Select Selection.Copy Range("F2").Select Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Application.CutCopyMode = False Selection.TextToColumns Destination:=Range("F2"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _ :=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True Columns("G:G").Select Selection.Delete Shift:=xlToLeft Selection.Delete Shift:=xlToLeft Range("A1").Select End Sub TESTE.xlsx.xlsx
-
Contar sem duplicados, com dois critérios.
BrunoMJoia postou um tópico em Microsoft Office e similares
Pessoal, boa tarde, Preciso mais uma vez da ajuda de vocês. Preciso contar sem duplicados, dessa vez necessito de dois critérios. Na coluna A já existe a formula matricial para contar sem duplicados, mas com apenas um critério. Preciso contar os nomes da coluna E, mas com critérios de data e hora, coluna I e B respectivamente. Podem ajudar?TESTE.xlsx -
Mano, muito obrigado! Valeu mesmo!
-
Perfeito Wendell! É isso mesmo cara. Se não for encher demais, você pode explicar como funciona a formula?
-
Pessoal, boa tarde, Estou com um problema com formulas. No arquivo em anexo, na aba base1 preciso trazer a ultima Data+Hora de cada cliente, para saber qual foi o ultimo contato de cada um deles. Já tentei de varias maneiras e nada. Penso que será necessário uma formula matricial, porém não manjo quase nada delas. Alguém pode ajudar? TESTE.xlsx
-
Contar sem duplicados, com critério.
BrunoMJoia respondeu ao tópico de BrunoMJoia em Microsoft Office e similares
Ok. Muito Obrigado. Problema resolvido. -
Contar sem duplicados, com critério.
BrunoMJoia respondeu ao tópico de BrunoMJoia em Microsoft Office e similares
Poxa vida!! Perfeito meu amigo!! Se não for muito incomodo pode me explicar como funciona a formula? Não estou habituado a função Frequência. Muito Obrigado! -
Contar sem duplicados, com critério.
BrunoMJoia respondeu ao tópico de BrunoMJoia em Microsoft Office e similares
Oi Patropi, Não funcionou. Eu preciso que na coluna K da planilha ABS conte quantos nomes tinham sem as duplicatas em 01/05/2017, depois 02/05/2017, e assim por diante. -
Pessoal, boas tardes, Estou tentando resolver esse problema. Tenho um banco de dados com o nome de pessoas e datas que acabam se repetindo. Preciso contar esses nomes apenas uma vez, tendo a data como critério. Consigo contar os nomes sem as duplicatas com a formula abaixo, selecionando só um período das datas. O correto seria selecionar a base toda, e com o critério data contar o nomes. =SOMARPRODUTO((BASE!$B$2:$B$12<>"")/(CONT.SE(BASE!$B$2:$B$12;BASE!$B$2:$B$12))) Podem ajudar? Base.xlsx
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais
Direitos autorais
Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais