Makro içinde makro silmek mümkün mü?

[bezl]

Ben bir makro ile içinde makro olan bir şablonu çalıştırdıktan ve ondaki makroyu çalıştırdıktan sonra içindeki makroyu silmek istiyorum. Yardımcı olursanız sevinirim.

 

[Haluk]

Ne demek istediğinizi tam anlamadım ama anlayabldiğim kadarıyla aşağıdaki kodları önermek istedim....

Bu kodları Module1 isimli modulün içine yerleştirin ve daha sonra da Test isimli proseduru çalıştırın.

Test isimli proseduru çalıştırdığınızda, modüldeki MyMacro isimli prosedur çalıştırılacak ve ardından da, modülden silinecektir.

İlgili kodlar aşağıdadır;

[vb:1:eda83fc842]Sub Test()
Dim MyModule As Object
Dim MyProc As String, ProcName As String
Dim LineStart As Integer, NoOfLines As Integer, StartOfProc As Integer
Call MyMacro
'
Set MyModule = ThisWorkbook.VBProject.VBComponents("Module1")
MyProc = "MyMacro"
'
With MyModule.CodeModule
LineStart = .CountOfDeclarationLines + 1
Do Until LineStart >= .CountOfLines
ProcName = .ProcOfLine(LineStart, 0)
LineStart = LineStart + .ProcCountLines(.ProcOfLine(LineStart, 0), 0)
If ProcName = MyProc Then Exit Do
Loop
End With
NoOfLines = MyModule.CodeModule.ProcCountLines(MyProc, 0)
StartOfProc = MyModule.CodeModule.ProcStartLine(MyProc, 0)
MyModule.CodeModule.DeleteLines StartOfProc, NoOfLines
MsgBox "[MyMacro] isimli prosedur silindi..."
ThisWorkbook.Save
Set MyModule = Nothing
End Sub
'
Sub MyMacro()
MsgBox "[MyMacro] isimli prosedur calistirildi...." & vbCrLf & vbCrLf _
& " Simdi, [MyMacro] isimli prosedur silinecek..."
End Sub
[/vb:1:eda83fc842]

 

[bezl]

Makro içinde makro sildirmek mümkün mü? Biraz daha açay

Ekteki tutunak adlı excel dosyasındaki makrolar data diye bir diğer excel sayfasındaki makro tarafından çalıştırılıyor belge oluşturuluyor sonra ben tutunak içindeki makroların silinmesini istiyorum.
Yardımcı olursanız sevinirim.
Þimdiden teşekkürler...

 

[bezl]

Yardım Ediciler Aranıyor!!!

Bir excel belgesinin içindeki makro ile bir diğer excel belgesinin içindeki makro çalıştırıldıktan sonra silmek istiyorum. Yardım...

 

[Haluk]

A.xls dosyası ve B.xls var diyelim....

Hangi dosyanın içindeki makro hangisindeki makroyu çalıştıracak ve sonuçta hangi dosyadaki makro silinecek ?

 

[bezl]

Bir önceki mesajımda anlattım silinecek makroyu içeren tutanak.xls de ekte yardımcı olursanız sevinirim.
Yani Data.xls içindeki makro tutanak.xls içindeki makroyu çalıştıracak ve silecek

 

[Haluk]

Ekli zip dosyasını açın ve içindeki A.xls ve B.xls dosyalarının her ikisini de açın.

Daha sonra, A.xls dosyasındaki RunBMacro isimli proseduru çalıştırın.

Bu prosedur, diğer B.xls dosyasındaki Test isimli proseduru çalıştıracak ve daha sonra, bu prosedurun içinde bulunduğu Module1 isimli kod modulünü, dosyadan silecektir.

Ã?rnek dosyaların yer aldığı *.zip dosyası ektedir.

 

[bezl]

Runtime Error 1004
Programmatic accessto Visual Basic Project is not trusted.

 

[bezl]

Runtime Error 1004
Programmatic accessto Visual Basic Project is not trusted.
böyle bir hata veriyor ne yapmalıyım.

 

[Haluk]

Office2003 için; Office güvenlik ayarlarında "...... VB projelerine erişime güven" seçeneğini onaylayın.

 

[bezl]

Bu ayar tam olarak nerede acaba?

 

[Haluk]

Walla ben Office2003 kullanmadığım için bilemiyorum ..... biraz karıştırın,

Tools >> Macro > Security ... falan gibi bir yerlerde olabilir....

 

[Haluk]

Aşağıdaki linkte nerde olduğunu yazıyor....

http://office.microsoft.com/en-us/assistance/HP030894781033.aspx

On the Tools menu, point to Macro, and then click Security. 
On the Trusted Sources tab, select or clear the Trust access to Visual Basic Project check box.

 

[bezl]

Çok teşekkür ederim.
Þimdide şunu soracaktım. Ben bu makroların içeriği gözükmemesi için vbproject i kilitlemiştim. bu kilit olunca da bu silme işi gerçekleşmiyor. bu vbproject lockunu kodla açtırabilirmiyiz yoksa onlarca dosyadan lock'u kaldırmakla uğraşacağım ve kodlar görünecek. aslında görünmesinin mahzuru yok ama yapılabilir mi?
Þimdiden teşekkürler.