Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 Ajuda VB EXCEL Copiar Valores para abas corretas

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
Victorhfo



Mensagens : 2
Data de inscrição : 19/09/2013

MensagemAssunto: Ajuda VB EXCEL Copiar Valores para abas corretas   Qui Set 19, 2013 9:09 pm

Boa tarde,

Estou com um grande problema,


Elaborei um começo de um VB :

Sub SegundaTentativa()

Dim i As Integer
Dim k As Integer

i = 1
Do While Range("F" & i).Value <> ""
ActiveSheet.Range("$A$1:$G$2000").AutoFi… Field:=6, Criteria1:=Range("F" & i).Value
Range("A2:G2000").Select
Selection.Copy



i = i + 1
Loop

End Sub


Porem eu quero que as linhas que ele copiou ele cole na aba correspondente aquele valor.

Por exemplo se ele encontrar o valor 1101 na coluna 1 eu quero que ele filtre por todos 1101 e que cole essas linhas na aba declarada como 1101.

Alguem pode ajudar?


Very Happy 
Voltar ao Topo Ir em baixo
Ver perfil do usuário
 
Ajuda VB EXCEL Copiar Valores para abas corretas
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Escolher arquivo e copia-lo para outro lugar
» Gif com opção copiar/colar
» Por Favor Ajuda sobre qual melhor software para Cache Full
» [AJUDA] Como fazer um cronômetro de contagem regressiva?
» Como copiar arquivos para outro GM

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: