Home / Netcad Makro / Netcad-Macro-Layer / Objenin Tabakasını Aktif Yapma Makrosu (Make Object’s Layer Active Macro)

Objenin Tabakasını Aktif Yapma Makrosu (Make Object’s Layer Active Macro)

Netcad’de Seçilen Objenin Tabakasını Hızlıca Aktif Yapın! 🚀


Bu makro, Netcad yazılımında seçilen bir objenin tabakasını anında aktif hale getirir. Kullanıcı, herhangi bir objeyi seçtiğinde, makro otomatik olarak o objenin bağlı olduğu tabakayı mevcut çalışma tabakası olarak ayarlar. Bu, özellikle birden fazla tabaka ile çalışırken zaman kazandırır ve iş akışını hızlandırır. Manuel olarak tabaka değiştirmek yerine, tek bir tıklama ile doğru tabakaya geçiş yapabilirsiniz. 🛠️


Nasıl Çalışır (How Does It Work)

Makro, Netcad’in VBScript dilinde yazılmıştır ve şu şekilde çalışır:

Bellek Temizliği: Kullanılan obje ve seçim nesneleri serbest bırakılarak bellek optimize edilir.
Bu işlem, kullanıcı objeyi seçer seçmez tamamlanır ve başka bir manuel müdahale gerektirmez. Hızlı, pratik ve hatasız bir çözüm sunar. 💻

Obje Seçimi: Kullanıcıdan bir obje seçmesi istenir. Bu seçim, Netcad’in anlık seçim objesi (NewSelectStatus) kullanılarak yapılır.

Tabaka Tespiti: Seçilen objenin tabakası (o.tabaka) belirlenir.

Tabaka Aktivasyonu: Belirlenen tabaka, Netcad’in mevcut tabakası (nclayermanager.currentlayer) olarak ayarlanır.


Etiket ( Labels )

Etiketler

NetcadMakro, TabakaAktifYap, CADOtomasyon, VBScript, Mühendislik, ObjeSeçimi, TabakaYönetimi, NetcadOtomasyon, HızlıTabakaDeğişimi, CADYazılımı, NetcadMakro, ActivateLayer, CADAutomation, VBScript, Engineering, ObjectSelection, LayerManagement, NetcadAutomation, QuickLayerSwitch, CADSoftware


📝 Netcad NVB Code

VB
SUB Main
DIM ss,o,i,j,oo,p,bd,ohat

With netcad
    set ss = .NewSelectStatus   ' Anlik Secim objesi yarat
    while .SelectObjectInstant("Seçilen Objenin Tabakası Aktif Olacaktır.",1,array(),ss)  ' obje sec

      set o = ss.objects(0)         ' Secim objesinin ilk objesini al
        nclayermanager.currentlayer = o.tabaka ' Seçilen objenin tabakasını aktif yap

         exit sub
    wend

    set ss = nothing
    set o = nothing               ' obje icin aldigimiz memory'i geri ver
  End With
   exit sub
END SUB
VB

netcad-secilen-obje-tabakasi-aktif

⚠️ Dikkat! Netcad Makrosu Kullanımı Hakkında Bilgilendirme

Makroyu kullanmadan önce lütfen aşağıdaki uyarıları dikkatlice okuyunuz:

• Obje sayısı yüksekse işlem uzun sürebilir ve Netcad yazılımı yanıt veremez hale gelebilir.
• Bu nedenle tüm projelerinizi önceden yedeklemeniz önemle tavsiye edilir.
• Makro çalıştıktan sonra işlemi geri almak mümkün olmayabilir.
Makrolar periyodik olarak güncellenmektedir; sayfamızı takip ederek güncel sürümleri kullanmaya özen gösteriniz.

💾 Makrolar yalnızca Netcad yazılımında çalışır ve .nps formatında sunulur. Bu format düzenlenemez; özelleştirme talepleriniz için bizimle iletişime geçebilirsiniz.

✉️ Görüş, öneri ve hata bildirimleri için: sabangul67@gmail.com

⚙️ Bu makrolar Kadastro, 2B, Orman, Kamulaştırma, Değerleme, CBS, Halihazır Harita, İmar Planı, Etüt-Proje gibi birçok alanda kullanılabilir.

🔐 Makrolar e-posta eki veya sosyal medya üzerinden paylaşılmaz. Talepte bulunmanız durumunda yalnızca e-posta adresinize bilgilendirme yapılır. Makrolar yalnızca internet sitemiz üzerinden paylaşılır.

📥 Makroları indirerek kullanım sorumluluğunu kabul etmiş sayılırsınız. Oluşabilecek tüm sorunlar kullanıcı sorumluluğundadır.
Etiketlendi: