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

Gönderen Konu: Butona tıklayınca hata alıyorum - Yardım  (Okunma sayısı 3306 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı plas1211

  • Excelce Onbaşı
  • **
  • İleti: 2
  • Puan +0/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: Mehmet Öztürk
  • Doğum Yılınız: 1987
  • İl / İlçe: Zonguldak/Hira
Butona tıklayınca hata alıyorum - Yardım
« : 29 Mart 2016, 11:46:33 »
Merhaba,
bir butonum var ve butona basınca hata alıyorum. Kodlarım;
Kod: [Seç]
Private Sub CommandButton1_Click()

    If Not (Target.Column = 4) Then Exit Sub
    On Error Resume Next
   
    If Target.Value Like "*excel*" Then
        Target.Offset(0, -2).Value = "Office"
       
    End If
   
   
End Sub

D sütununa girilen "excel" kelimesini gördüğün zaman "B" sütununun ilgili satırına "Office" kelimesini yazdırmaya çalışıyorum.

Yardımcı olursanız sevinirim.