Home Excel - Dicas Microsoft Excel VBA Excel VBA - Worksheets Excel vba worksheet copia plan x vezes deleta preservando desejada

Excel vba worksheet copia plan x vezes deleta preservando desejada

E-mail Imprimir PDF

Saberexcel - site das macros excel

Esta macro do Aplicativo Microsoft Excel VBA, copia a planilha (Plan1) trinta vezes e adiciona as cópias ao livro. A macro abaixo é mais para o teste, pois deleta todas as folhas de planilha preservando a folha de planilha desejada.

Sub Copia_Planilha()
For x = 1 To 30
ActiveWorkbook.Sheets.Add
Sheets("Plan1").Cells.Copy
ActiveSheet.Paste
ActiveWorkbook.Sheets("Plan1").Select
Next x
End Sub

Sub Deleta_todas_menos_a_desejada()
Dim Plan As Worksheet
On Error Resume Next
Application.DisplayAlerts = False 'impede de emitir a mensagem se deseja excluir

For Each Plan In Worksheets
If (Plan.Name <> "Plan1") Then
    Plan.Delete
End If
Next

Application.DisplayAlerts = True
End Sub

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



   Baixe o exemplo de planilha contendo as macros acima
 vba worksheet copia plan x vezes deleta preservando desejada (18.4 kB 2010-11-30 11:00:02)

 

Última atualização em Dom, 04 de Setembro de 2011 09:06  

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

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje4872
mod_vvisit_counterOntem5154
mod_vvisit_counterEsta Semana25073
mod_vvisit_counterSemana passada30982
mod_vvisit_counterEsse mês43261
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10466090
Aprenda MS Excel VBA

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