Kodların çalışmasını engellemek

[dedenet]

Yazdığım bir uzun bir kod var.
Bazı durumlarda bu kodun çalışmasını istemiyorum.
Komut satırının başına ' (kesme işareti) koyunca kodun rengi yeşil oluyor ve etkisiz hale geliyor.
Ancak uzun bir kodun her satırına kesme işareti koymakla uğraşmak istemiyor ve tek bir işlemle kodun tamamının devre dışı kalmasını istiyorum.
Yazdığım aşağıdadır. Burada bunu nasıl yapabilirim?

Sub Sıfırla()
Application.DisplayAlerts = False

Sheets("LİSTE (2)").Visible = True
Sheets("LİSTE (2)").Select

Range("A211").Select
Selection.Copy
Sheets("LİSTE").Select
Range("A2").Select
ActiveSheet.Paste

Sheets("LİSTE (2)").Select
Range("A211").Select
Selection.Copy
Sheets("LİSTE").Select
Range("A211").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False

Selection.Copy
Range("A13").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("B13").Select
ActiveCell.FormulaR1C1 = "=R[-11]C+1"

Range("A1323").Select
Selection.Copy
Range("A241651").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveWindow.ScrollRow = 1
Range("A1").Select

Sheets("LİSTE (2)").Visible = False
End Sub

 

[Necdet]

Merhaba,

Ben kodun çalışmaması gerektiğinde herhangi bir sayfadaki herhangi bir hücrenin dolu ya da boş olduğunu kontrol ederim.
Ona göre de kodları çalıştırmadan çıkarım.

Örneğin tüm kodların başına :

if range("N1") = "" then exit sub

gibi.

 

[ÖmerFaruk]

uzun yerlerde, uzun olan kısım tamamen devre dışı bırakacaksam

Goto AAAA
....
iptal edeceğim satırla
......
AAAA:
diğer kodlar

 

[Asri]

Alternatif;

VBA editörde toplu olarak pasif aktif yapılabilir.

 

[Korhan Ayhan]

Eğer zor gelmeyecekse aşağıdaki gibi de uygulama yapabilirsiniz.

Çalıştırmak istemediğinizde kırmızı renkli satırı ekleyebilirsiniz.

Option Explicit

Sub Test()
    End
    Rem Kodlarınız...
    Rem Kodlarınız...
    Rem Kodlarınız...
    Rem Kodlarınız...
    Rem Kodlarınız...
End Sub

 

[ASLAN7410]

Alternatif;

VBA editörde toplu olarak pasif aktif yapılabilir.

Ekli dosyayı görüntüle 228584

Sayın Asri Bey, bende bu menü görünmüyor, bu menüyü nasıl ekleyebiliriz?

 

[relaxim]

Sayın Asri Bey, bende bu menü görünmüyor, bu menüyü nasıl ekleyebiliriz?

Merhaba,

Üst menüde araçların olduğu yere sağ tıkla edit olan yeri işaretlerseniz araçlarda görünür.

 

[ASLAN7410]

Çok teşekkür ederim, hayırlı geceler.