Satır Silinirken Uyarı Verdirme

YasarPiskin

VIP Üye
Kullanıcı
Katılım
6 Ara 2016
Mesajlar
2,059
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe

Ekli dosyalar

Çözüm
okutkan
Satırın silinip diğer sayfaya aktarılması işlemini mesaj kutusu ile onaylamak istiyorsunuz olarak anladım. Data sayfasının change prosedürünü aşağıdaki ile değiştirin.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(11 satır)
Tarihe göre sırala Oylamaya göre sırala
Satırın silinip diğer sayfaya aktarılması işlemini mesaj kutusu ile onaylamak istiyorsunuz olarak anladım. Data sayfasının change prosedürünü aşağıdaki ile değiştirin.
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(34 satır)
 
Oyla 0 Olumsuz oyla
Çözüm
If MsgBox(Cells(Target.Row, "C") & " SİLİNECEK, EMİN MİSİNİZ? ", vbYesNo) = vbNo Then GoTo 10 satırnı mesajı örnek olarak "16 İSKENDERUN SİLİNECEK, EMİN MİSİNİZ?" şeklinde olacak şekilde düzeltebilir miyiz?
 
Oyla 0 Olumsuz oyla
MsgBox(Cells(Target.Row, "C")
Yukarıdaki msgbox parantezini aşağıdaki şekilde değiştirin.
MsgBox(Cells(Target.Row, "B" & " " & Cells(Target.Row, "C")
 
Oyla 0 Olumsuz oyla
Cevap 4 den farklı olarak If MsgBox(Cells(Sat, "C") & " SİLİNECEK, EMİN MİSİNİZ? ", vbYesNo) = vbNo Then Exit Sub satırnı mesajı örnek olarak "16 İSKENDERUN SİLİNECEK, EMİN MİSİNİZ?" şeklinde olacak şekilde düzeltebilir miyiz?
 
Oyla 0 Olumsuz oyla
Cevap 4 te aldığınız sonuç aynı değil mi?
B sütununda 16 yazıyor
C sütununda iskenderun yazıyor
İkisini birleştirdiğimizde sonuç sizin istediğiniz gibi çıkıyor. Bundan farklı olarak istediğiniz nedir?
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt