Ir ao conteúdo
  • Cadastre-se

LSLS

Membro Júnior
  • Posts

    4
  • Cadastrado em

  • Última visita

Reputação

0
  1. Bom dia! Tenho em uma planilha valores negativos e positivos na horizontal, estou tentando realizar a soma dos valores positivos e negativos separadamente mas não estou conseguindo, alguém consegue me ajudar? Segue abaixo o que testei, consegui realizar a soma porém ele faz compensação, exemplo se tenho 1 e -1 na mesma linha o resultado exibido é 0. Sub calculohorizontal() Dim LR, linha As Long LR = 5 linha = 5 Do Until Cells(linha, 1) = Empty 'TENTATIVA 1 Range("BK" & LR) = Application.WorksheetFunction.SumIf("H" & LR & ":BJ" & LR, " > 0") 'TENTATIVA 2 If Application.WorksheetFunction.Sum(Range("H" & LR & ":BJ" & LR).Value) > 0 Then With ActiveSheet .Range("BK" & LR).Value = Application.WorksheetFunction.Sum(.Range("H" & LR & ":BJ" & LR).Value) End With End If LR = LR + 1 linha = linha + 1 Loop End Sub Soma Horizontal.txt
  2. Não entendi Van Jacques preciso saber como faço o bath entender os espaços em branco no caminho de destino, já coloquei o caminho de destino entre aspas e mesmo assim não funciona.
  3. Bom dia! Pessoal estou tentando copiar via batch um arquivo que está na minha máquina para um servidor que está em rede, porém acho que pelas pastas no servidor de destino estarem com espaço o batch não funciona, conseguem me mostrar o caminho de onde está o erro? Segue abaixo código: @echo oFF cls echo.==================================ENVIAR ATUALIZAÇÃO============================================================== COPY "C:\Atualizar"\*.xlsx \\"139.10.3.1\Octopus\04 - GESTÃO DE ABASTECIMENTO\4. Movimentação Manual de Estoque"\ pause exit

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

×
×
  • Criar novo...