Notifications
Clear all

Aplicar código VBA em outras planilhas do Excel

2 Posts
2 Usuários
0 Reactions
621 Visualizações
(@leonardo91)
Posts: 2
New Member
Topic starter
 

Um amigo meu escreveu um código VBA pra mim, em que todos os valores digitados da coluna "B" até a coluna "H" (B:H) sejam ordenados na coluna "N" na ordem que foram digitados nas colunas "B:H" independente do valor.

Porém eu não sei fazer isso e preciso aplicar esse código em outra planilha, como fazer?
Sei que vai ter que ser feitas algumas alterações, como alterar as células em que ele atua já que as tabelas são diferentes.

Codigo:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim j As Long
If Target.Cells.Count = 1 Then
If Target.Column > 1 And Target.Column < 9 Then
j = Target.Column
t = Plan1.Cells(Cells.Rows.Count, 14).End(xlUp).Row + 1

If Len(Trim(Target.Value)) > 0 Then

Plan1.Cells(t, 14).Value = Target.Value
Plan1.Cells(t, 15).Value = Plan1.Cells(1, j)
Plan1.Cells(t, 16).Value = Target.Row
End If

End If
End If

End Sub
 
Postado : 23/11/2016 9:00 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Dentro do codigo VBA vc tem

Plan1 (nome da guia)

Se o codigo for inserido em uma planilha onde o Plan1 for diferente por exemplo

Plan2(nome da guia)

vc precisa alterar apenas essa parte de resto e um codigo bem generico, salvo se modificar o formato da planilha.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 26/11/2016 5:30 pm