Excel 2007 - Multiplicar uma coluna inteira por um só numero.

[diegocabral]

Boa tarde pessoal, eu preciso fazer uma atualização de preço da empresa.

são mais de 400 itens, e preciso jogar 20% em cada valor, então estou multiplicando manualmente cada item por 1.2.

O que eu gostaria de saber é se é possível pegar a coluna dos valores e fazer multiplicar cada celula por esse valor (1.2)

Tipo assim

10

20

30

40

50

ai faço algo que multiplica automaticamente cada valor dessas 5 celulas ai.

10 -> 12

20 -> 24

30 -> 36

40 -> 48

50 -> 60

que no caso é a multiplicação de cada item por 1.2 que é 20%.

[carolclue]

Supondo que sua primeira coluna esteja em A1:

10

20

30

40

50

agora em C1 digite =A1*1,2, dê enter. Arraste a parte direita da célula (um quadradinho que se forma no quadrado da célula) para baixo e pronto!

Espero ter ajudado!!

[Flavio Soares]

Caso a dica do amigo não lhe atenda, você pode fazer isso por macro. Vamos supor que os valores estejam na D1 até D5 em Plan1. A macro ficaria assim:

For linha = 1 To 5

novovalor = Worksheets("Plan1").Range("D" & linha).Value * 1.2

Worksheets("Plan1").Range("D" & linha).Value = novovalor

Next linha

para colocar mais linhas, é só alterar o "To 5" para o numero final de linha de sua planilha

[Max Carvalho]

Boa tarde,

como eu poderia aplicar essa macro em uma determinada planilha onde tenho valores entre J21 a AF42 onde os valores contidos neste intervalo de células sejam multiplicados por 1.5.

 

agradeço desde já...

[Basole]

segue as alteracoes

 

 

Sub Multiplicar_uma_coluna_inteira_por_um_só_numero()
    Dim linha As Long, j As Long
    ' intervalo: J21 a AF42
    For j = 10 To 32
        For linha = 21 To 42
            ActiveSheet.Cells(linha, j).Value = ActiveSheet.Cells(linha, j).Value * 1.5
        Next linha
    Next j

End Sub

[Max Carvalho]

13 horas atrás, Basole disse:

segue as alteracoes

 

 

 

Sub Multiplicar_uma_coluna_inteira_por_um_só_numero()
    Dim linha As Long, j As Long
    ' intervalo: J21 a AF42
    For j = 10 To 32
        For linha = 21 To 42
            ActiveSheet.Cells(linha, j).Value = ActiveSheet.Cells(linha, j).Value * 1.5
        Next linha
    Next j

End Sub

 

Muito Obrigado me ajudou bastante, mais uma dúvida há como incluir uma condição de só multiplicar caso os valores nas células sejam negativos?

[Basole]

segue as alteraçoes:

 

Sub Multiplicar_uma_coluna_inteira_por_um_só_numero()
    Dim linha As Long, j As Long
    ' intervalo: J21 a AF42
    For j = 10 To 32
        For linha = 21 To 42
        If ActiveSheet.Cells(linha, j).Value < 0 Then
            ActiveSheet.Cells(linha, j).Value = ActiveSheet.Cells(linha, j).Value * 1.5
            End If
        Next linha
    Next j

End Sub

[Max Carvalho]

@Basole

Perfeito Muito obrigado...

[Edson Luiz Branco]

Max, Diego...

 

Embora o tópico original seja antigo e vocês já tenham resolvido, para ajudar outros usuários com problema semelhante, no Excel há uma recurso disponível bastante simples para fazer essa operação de uma forma bastante direta:

 

1) Numa célula vazia qualquer, coloque o multiplicador. No seu exemplo, 1,2

2) Copie a célula para a área de transferência (Ctrl+C)

3) Selecione o intervalo todo que vai sofrer multiplicação, clique com o botão direito, selecione "Colar Especial..." e na caixa de diálogo que aparece, selecione "Multiplicação" e "OK". Pronto. Todos os valores do intervalo são multiplicados pelo fator.

4) Agora pode apagar a célula onde tem o 1,2 que os valores permanecerão multiplicados.

 

Esse recurso existe desde as primeiras versões do Excel, mas é pouco lembrado.

 

 

[Pablo Ferrari]

@Basole e caso fosse multiplicar uma linha inteira ao invés de uma coluna, por exemplo a linha 5, o que mudaria no codigo?

[Visitante]

Em 29/09/2020 às 10:56, Pablo Ferrari disse:

@Basole e caso fosse multiplicar uma linha inteira ao invés de uma coluna, por exemplo a linha 5, o que mudaria no codigo?

 

Você direcionou a sua demanda para um usuário que talvez demore dias, meses ou anos para voltar a acessar o fórum. Se você não se importa com isso, então tudo bem, mas se você quiser receber ajuda de qualquer usuário, então informe qual o intervalo a ser multiplicado, pois uma linha inteira é improvável de ocorrer, informe se esse intervalo é fixo ou se pode variar, informe qual o fator a ser utilizado na multiplicação e se esse valor é fixo ou se pode variar.