Notifications
Clear all

Deletar formulário VBA via código

5 Posts
1 Usuários
0 Reactions
2,409 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Pessoal

Preciso saber se é possivel criar uma "macro" para deletar um formulário X dentro do VBA, ou um módulo! e possivel?

Vou criar um ONTIME para dar uns BUG em um projeto!

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 02/01/2011 5:36 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia!

Não sabia também, achei interessante e fui pesquisar, achei direto do site da Microsoft:
http://support.microsoft.com/kb/172109/pt-br

Sub DeleteAfterRun()

Dim x As Object

Set x = Application.VBE.ActiveVBProject.VBComponents

' Deleta o componente, no caso um formulário
x.Remove VBComponent:=x.Item("UserForm1")

End Sub

Acho que resolve o seu problema.

Att.
Adriano

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/01/2011 8:51 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

A rotina abaixo deleta um Modulo, tirado do site ozgrid, de uma olhada que tem outros exemplos :

Delete Module After Running VBA Code. Deleting Modules via VBA Code
http://www.ozgrid.com/VBA/delete-module.htm

Sub DeleteThisModule()

Dim vbCom As Object

    MsgBox "Hi, I will delete myself "
    Set vbCom = Application.VBE.ActiveVBProject.VBComponents

    vbCom.Remove VBComponent:= _
    vbCom.Item("Module1")

End Sub

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/01/2011 5:51 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

vishii Show de bolaaa,,

Não teste ainda mais com certeza vai funcinar valeu galera!

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/01/2011 6:39 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Ahh procurei não achei como eu faria para deletar um objeto dentro do formulário exemplo um "IMAGE1.delete"

Alguém sabe?

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/01/2011 6:45 pm