Ir para conteúdo
Fórum Script Brasil

Live Brain Tutoriais

Membros
 Perfil  Explorar Conteúdo

  • Total de itens

    13

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por Live Brain Tutoriais

  1. Copiar células de 5 em 5 excel

    em Microsoft Office

    Postado

    Opa Leandro,

    Eu faria da seguinte forma:

    Na sua coluna G, colocaria um contador de 5 em 5

    1

    6

    11 até o número maximo dos seus registros..

    depois usaria a fórmula INDIRETO nas colunas B, C, D, E e F da seguinte forma

    coluna B... =Indireto("A" & $G1)

    coluna C... =Indireto("A" & $G1 + 1)

    coluna D... =Indireto("A" & $G1 + 2)

    coluna E... =Indireto("A" & $G1 + 3)

    coluna F... =Indireto("A" & $G1 + 4)

    Dessa forma, você pode copiar ou arrastar até o final dos registros.

    Abraços

  3. Ajuda com macro para excel no visual basic

    em Microsoft Office

    Postado

    Opa amigo, fiz o seguinte código abaixo...

    No meu exemplo eu montei duas colunas

    Na coluna A eu deixei uma numeração qualquer apenas para controle, como se fosse um numero de fatura por exemplo

    Na coluna B, deixei minhas datas de Vencimento

    Os valores começam na linha 3 da planilha

    e na Célula D1 eu deixei a fórmula =Hoje()

    então a macro verifica linha a linha as células da Coluna B e a compara com a célula D1

    Bom, acho que esse código pode te dar uma Luz para a sua planilha...

    Sub Vencimento()


Dim intLinha As Integer
intLinha = 3


Do While Len(Range("a" & intLinha).Value) > 0
    
    If Range("B" & intLinha).Value <= Range("D1").Value Then
        Range("B" & intLinha).Interior.Pattern = xlSolid
        Range("B" & intLinha).Interior.Color = 255
    Else
        Range("B" & intLinha).Interior.Pattern = xlNone
    End If
    intLinha = intLinha + 1
Loop


End Sub

  4. Agrupamento datas distintas

    em MySQL

    Postado · Editado por Live Brain Tutoriais

    Opa, tente da seguinte forma:

    SELECT  
      a.cod_empresa,
      a.cod_item,
      Sum(a.qtd_pecas_solic)
FROM
      ped_itens a
WHERE
      a.cod_empresa = '02' and
      a.cod_item = '32780' and
      a.prz_entrega <= '30/08/2014'
Group By
      a.cod_empresa,
      a.cod_item

  7. Como efetuar uma multiplicação no Excel utilizando critérios?

    em Microsoft Office

    Postado

    Opa, é só usar a função SE uma dentro da outra até atender todos os seus critérios

    se(Celula < 100;Celula * 1,3;se(e(Celula >=100;Celula<=200);Celula * 1,4;Celula*3,0)

    Na função acima, você vai repetir a parte em vermelho até atender todos os seus critérios. Lembrando que a parte em Azul é o seu primeiro critério e a parte em Verde o seu último critério.

    E depois da parte verde você terá que fechar todos os parenteses dos SEs que você abriu, apesar que o Excel fecha pra você.

  11. comparar valores entre três produtos e me devolver o maior valor ou en

    em Access

    Postado

    Opa Valter,

    Não entendi muito bem sua idéia mas eu fiz o seguinte e veja se te ajuda:

    Coloquei 4 textBox no meu formulário (Texto0, Texto2, Texto4 e txtResultado). Sem nenhum vinculo em tabela.

    Mudei o formato deles para "Número Geral"

    na origem de dados do txtResultado eu coloquei o código abaixo:

    =SeImed([Texto0]>[Texto2] E [Texto0]>[Texto4];[Texto0];SeImed([Texto2]>[Texto0] E [Texto2]>[Texto4];[Texto2];[Texto4]))
×
×
  • Criar Novo...