Enter Basıldıkça Sonraki Hücreyi Yanıp Söndürme

  • Konuyu başlatan Konuyu başlatan cahan2010
  • Başlangıç tarihi Başlangıç tarihi

cahan2010

Kullanıcı
Katkı: %0
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Bir yerlerden bulduğum Makro kodu ile sayfa 1'de B2 hücresi arka planı yeşil olarak yanıp sönmektedir. Burdaki koda nasıl bir ekleme yapılmalı ki, her entere basınca
B3-B4 hücresi B5 ...............arka planı yeşil olsun ve yanıp sönmeli

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (17 satır). Giriş Yap
 
Tarihe göre sırala Oylamaya göre sırala
Hücrede değişiklik yapıldığında Enter tuşuna basarsanız kod devreye girer.
Fakat bu makro ile "işlem geri alma" işlemini tamamen pasif hale getirmiş olursunuz. Hücreye veri girersiniz daha sonra CTRL+Z yaptığınızda işlemi geri almazsınız. Çok gerekli değilse kullanmanızı tavsiye etmem.
Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (12 satır). Giriş Yap
 
Oyla 0 Olumsuz oyla
Merhaba, Enter tuşuyla B sütununda alttaki hücreye geçildiğinde yeni seçilen hücrenin yeşil yanıp sönmesi için aşağıdaki yapı kullanılabilir. Yanıp sönme bir bekleme döngüsüyle değil Application.OnTime zamanlayıcısıyla yapıldığı için Excel bu sırada meşgul kalmaz.

Kod:
Bu kodu görmek için giriş yapmanız gerekmektedir (70 satır). Giriş Yap
Kod nasıl çalışır?
  1. Worksheet_SelectionChange, B2:B1000 aralığında tek bir hücre seçildiğinde StartBlink yordamını çağırır. Aralık dışında bir hücre ya da birden fazla hücre seçilirse yanıp sönme durdurulur.
  2. StartBlink önceki hücredeki yanıp sönmeyi durdurur, yeni hücrenin mevcut dolgusunu saklar ve ilk adımı başlatır.
  3. BlinkTick hücreyi her saniye yeşil (ColorIndex 4) ile eski dolgu arasında değiştirir ve kendini Application.OnTime ile bir saniye sonrasına yeniden planlar.
  4. 10 değişimden (5 kez yanıp sönme) sonra StopBlink zamanlayıcıyı iptal eder ve hücrenin özgün dolgusunu geri yükler; hücre önceden renkliyse o renk korunur.
  5. Sayfadan çıkılırken ve kitap kapatılmadan önce StopBlink çağrılır; bekleyen zamanlayıcı iptal edilir ve hücrenin dolgusu geri yüklenir.
Notlar
  • Aralık Me.Range("B2:B1000") satırından, yanıp sönme sayısı YANIP_SONME, renk ise YESIL sabitinden değiştirilebilir. Aralık TimeSerial(0, 0, 1) ile bir saniyedir; TimeSerial saniyenin altında bir değer vermez.
  • Hücre fareyle seçildiğinde de aynı davranış görülür; tetikleyici Enter tuşu değil seçimin değişmesidir.
  • Makro hücre biçimini değiştirdiği için B sütununda hücre seçildiği anda Ctrl+Z geri alma geçmişi temizlenir; bu nedenle Enter ile onaylanan giriş geri alınamaz.
  • Dosya .xlsm (Makro İçerebilen Excel Çalışma Kitabı) olarak kaydedilmelidir.
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.

Benzer konular Benzer kaynaklar Benzer dosyalar

Geri
Üst