Home Excel - Dicas Microsoft Excel VBA Excel VBA - Linhas e Colunas Excel planilhas vba selecionar e copiar linhas e colunas

Excel planilhas vba selecionar e copiar linhas e colunas

E-mail Imprimir PDF

Saberexcel - o site de quem precisa aprender Macros Microsoft Excel VBA

Esse macro do Aplicativo Microsoft Excel VBA,  seleciona linhas e colunas pre-determinadas pelas variáveis em um macro. Também copiará os dados selecionados para Plan2, e G29, --- apenas para lhes para aprendermos como fazer uma forma simples - copiar e colar.

 Sub selecionar_celulas()
'seleciona 6 seis linhas
'seleciona colunas até a 15ª Coluna  + 4
'começa a selecionar a partir da coluna( 4+ 2) = (4 + i)
'variável (i) determinará a posição de linhas e colunas (+)
k = 1
i = 2

With Sheets("Selecionando_dados_variaveis")
     .Range(.Cells(6, 4 + i), .Cells(k, 15 + i)).Select
End With

End Sub

Sub copiar_se_selecao_for_maior_uma_celula()
Dim Resposta As String

If Selection.Count = 1 Then  'caso contiver somente uma célula selecionada, poderia ser outra quantidade.
    MsgBox ("nao há seleção para ser copiada"), vbInformation, "Saberexcel - execute o macro"
    
selecionar_celulas
     Resposta = MsgBox("Deseja copiar a seleção para planilha [Plan2 e G17]", vbYesNo + vbInformation, "Saberexcel")
    
    If Resposta = 6 Then  ' 6 é igual a vbyes       
       Selection.Copy Saber2.[A1]
       Selection.Copy [G29]
       MsgBox ("Seleção copiada para Planilha 'Auxiliar'e Célula[G29]"), vbInformation, "Saberexcel - site das macros"
 
   Else
     [C1].Select
   
End If

Else
'copia os dados se caso já o macro 'Selecionar_Celulas' for acionado primeiramente na folha de planilha.
Selection.Copy Saber2.[A1]
Selection.Copy [G29]
  'será copiado também os dados para mesma folha de planilha para célula G29
MsgBox ("Seleção copiada para Planilha 'Auxiliar'e Célula[G29]"), vbInformation, "Saberexcel - site das macros"
End If
End Sub

Sub limpar_teste()
Saber2.Cells.ClearContents
'esta linha abaixo vai limpar da célula G29 abaixo,
'Esses estudos de deslocar linhas e colunhas
estão em nosso Modulo COMO FAZER - Programação MS Excel (Offset-Desloc)
Range("G29", [G29].End(xlDown).End(xlToRight)).ClearContents  'limpa dados G29 em diante, poderia ser select ou outra programação qualquer
MsgBox ("Os dados da folha de planilha 'Plan2' e G9 em diante foram deletada"), vbInformation, "Saberexcel - site das Macros"
End Sub

Sub ir_plan2()
Saber2.Select
  'observe que sempre seleciono a folha de planiha pelo nome da folha de código,
                    
'se o usuário mudar o nome da folha de planilha não ocorrerá erro.
End Sub

Sub voltar()
Saber1.Select
End Sub

Esse macro(código) é para auxiliar no teste, e também com finalidade didática, para mostrar o shapes(autoforma) contendo macro, ou se desejar
poderá mostrar diretamente a o
Módulo VBE(Visual Basic Editor)
Sub visualizar_macros_vbe()
 Dim Resposta As String
 
 Resposta = MsgBox("Deseja visualizar as macros no módulo VBE?", vbYesNo, "Saberexcel - o site das macros")
 If Resposta = 6 Then
' 6 é igual a vbyes
    Application.Goto reference:="selecionar_celulas"
 Else
    Saber1.Shapes("sb").Visible = True
 End If

End Sub

esse macro é para ocultar o shapes(autoforma)
Sub oc()
Saber1.Shapes("sb").Visible = False
End Sub



Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel



  Baixe o exemplo de planilha contendo os macros acima
Excel planilhas vba selecionar e copiar linhas e colunas (76.92 KB)



Publicidade
Compre com segurança, garantia e ótimos preços
Eletrônicos - Submarino.com.br

Última atualização em Sáb, 13 de Agosto de 2011 19:18  

Comentários   

 
Victor Hirano
# Victor Hirano 25-04-2013 11:13
Muito boa as dicas que você dá, parabéns!
Estou entrando agora nesse mundo e ainda tenho muitas dificuldades, você poderia me dar uma dica em algo que necessito?
Obrigado

Prezado Hirano,
Obrigado pelo seu contato, (bondade sua)
pode enviar seu email, com sua dúvida,
email...:
Fique com Deus,
Expedito Marcondes
Responder | Responder com citação | Citar
 
 
Dorival1000
# Dorival1000 19-05-2017 09:21
bom dia !
gostaria de saber como fazer codigo no vba, que ao selecionar uma coluna específica eu posso copiar outras colunas ao mesmo tempo.

grato
Responder | Responder com citação | Citar
 
 
Ricardo Boisier
# Ricardo Boisier 07-04-2014 12:00
Realmente excelentes dicas.
Estou precisando de uma ajuda urgente:
Tenho uma planilha que tem uma coluna com links (mais ou menos umas 500 linhas) para acessar a web e importar dados para minha planilha, mas este cesso é via dados/da web, quando abre o link da web copiar o valor da célula (que tem o endereço a acessar na internet) para o endereço do explore. Na web seleciono o botão IR, depois clico em -> Selecionar a página inteira, em seguida clico no botão Import. Seleciono o lugar para importar dentro da minha Planilha. Este processo deve repetirse até a última linha que tem dados da coluna com os links.

Criei uma macro, mas só consigo fazer um acesso, não consigo repetir o processo Copiar (conteúdo da célula) para o endereço da web dentro de um loop.
Agradeço sua ajuda, não importa se for positiva ou negativa.

Ricardo Boisier Cofré
Responder | Responder com citação | Citar
 

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar


Google Associados

Depoimentos

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA