Personel & Zimmet Takip Programı (KZT-v.5) foruma eklenmiştir. 
http://www.excelce.net/forum/index.php?topic=1676.0

Gönderen Konu: [Çözüldü] Çift Tık ile X işareti  (Okunma sayısı 12513 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı yesilyurtlu

  • Excelce Çavuş
  • ***
  • İleti: 168
  • Puan +1/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: İlhan YÜKSEL
  • İşletim Sisteminiz: Windows 7 32 Bit
  • Mesleğiniz: Muhasebe Şefi
  • Office Versiyonunuz: Office 2013 TR
[Çözüldü] Çift Tık ile X işareti
« : 29 Mayıs 2010, 15:24:30 »
ÜStadım Herhangi bir hücreye çift tık ile "x" karakterini çıkarıp tekrar çift tık ile "x" karakterini iptal edebilmem için yardımcı olabilir misiniz?
« Son Düzenleme: 31 Mayıs 2010, 10:29:50 Gönderen: Bülent Öztürk »

Çevrimdışı Bülent Öztürk

  • Excelce.Net Yönetici
  • *
  • İleti: 1412
  • Puan +19/-0
  • Cinsiyet: Bay
  • Türkçe Konuşup Excelce Yazıyoruz...
    • Bülent Öztürk
  • Ad Soyad: Bülent Öztürk
  • Doğum Yılınız: 1976
  • İl / İlçe: İstanbul / Çorlu
  • İşletim Sisteminiz: Win.10
  • Mesleğiniz: Bilgi Teknolojileri
  • Office Versiyonunuz: 2016
Ynt: çift Tık ile X işareti
« Yanıtla #1 : 29 Mayıs 2010, 17:31:52 »
Sayfanın BeforeDoubleClick olayına yazın;

Kod: [Seç]
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Target.Value = "x" Then Target.Value = Empty: Exit Sub
If Target.Value = Empty Then Target.Value = "x"
End Sub
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)

Çevrimdışı yesilyurtlu

  • Excelce Çavuş
  • ***
  • İleti: 168
  • Puan +1/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: İlhan YÜKSEL
  • İşletim Sisteminiz: Windows 7 32 Bit
  • Mesleğiniz: Muhasebe Şefi
  • Office Versiyonunuz: Office 2013 TR
Ynt: çift Tık ile X işareti
« Yanıtla #2 : 29 Mayıs 2010, 18:07:08 »
Bülent Öztürk Ağabeyim;

Ellerine Sağlık Teşekkür Ederim.

"ÇÖZÜLDÜ"

Çevrimdışı Bülent Öztürk

  • Excelce.Net Yönetici
  • *
  • İleti: 1412
  • Puan +19/-0
  • Cinsiyet: Bay
  • Türkçe Konuşup Excelce Yazıyoruz...
    • Bülent Öztürk
  • Ad Soyad: Bülent Öztürk
  • Doğum Yılınız: 1976
  • İl / İlçe: İstanbul / Çorlu
  • İşletim Sisteminiz: Win.10
  • Mesleğiniz: Bilgi Teknolojileri
  • Office Versiyonunuz: 2016
Ynt: çift Tık ile X işareti
« Yanıtla #3 : 31 Mayıs 2010, 10:29:29 »
Rica ederim.

Çalışmalarınızda başarılar.
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)