Araç Servis Takip Programı (AST-v.2) foruma eklenmiştir. 
http://www.excelce.net/forum/index.php?topic=1656.0

« önceki sonraki »
Sayfa: [1]   Aşağı git

Gönderen Konu: [Çözüldü] Tarihe göre işlem  (Okunma sayısı 15679 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı kelkitli

  • Excelce Onbaşı
  • **
  • İleti: 52
  • Puan +0/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: Necmettin TOK
  • İl / İlçe: Ankara Yenimahalle
  • Mesleğiniz: Abonman Başgörevlisi
[Çözüldü] Tarihe göre işlem
« : 11 Eylül 2011, 20:29:20 »
Selamlar,
Butonu tıkladığımda eğer tarih 01.01.2011 den önce ise işlem yapsın, sonra ise mesaj yazıp çıksın.
« Son Düzenleme: 13 Eylül 2011, 19:09:46 Gönderen: Bülent Öztürk »
Kayıtlı

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

  • Excelce.Net Yönetici
  • *
  • İleti: 1413
  • 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: Tarihe göre işlem
« Yanıtla #1 : 11 Eylül 2011, 22:25:10 »
Aleyküm selam Necmettin Bey.

Kod: [Seç]
Sub ExcelceTarihKontrol()
If FormatDateTime(VBA.Now, vbShortDate) > FormatDateTime("01.01.2011", vbShortDate) Then MsgBox "Tarih geçmiş!", vbCritical, "İşlem yapılamaz!": Exit Sub
'Diğer kodlar...
End Sub
Kayıtlı
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)

Çevrimdışı kelkitli

  • Excelce Onbaşı
  • **
  • İleti: 52
  • Puan +0/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: Necmettin TOK
  • İl / İlçe: Ankara Yenimahalle
  • Mesleğiniz: Abonman Başgörevlisi
Ynt: Tarihe göre işlem
« Yanıtla #2 : 12 Eylül 2011, 06:22:35 »
Bülent Bey, cevabınız için teşekkür ederim. Ancak tarih bu günden önce de olsa sonra da olsa işlem yapmıyor.
Kayıtlı

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

  • Excelce.Net Yönetici
  • *
  • İleti: 1413
  • 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: Tarihe göre işlem
« Yanıtla #3 : 12 Eylül 2011, 17:05:19 »
Şu şekilde dener misiniz?

Kod: [Seç]
If CDate(FormatDateTime(VBA.Now, vbShortDate)) > CDate(FormatDateTime("01.01.2012", vbShortDate)) Then MsgBox "Tarih geçmiş!", vbCritical, "İşlem yapılamaz!": Exit Sub
Kayıtlı
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)

Çevrimdışı kelkitli

  • Excelce Onbaşı
  • **
  • İleti: 52
  • Puan +0/-0
  • Cinsiyet: Bay
  • Excel'den Daha Fazlası!..
  • Ad Soyad: Necmettin TOK
  • İl / İlçe: Ankara Yenimahalle
  • Mesleğiniz: Abonman Başgörevlisi
Ynt: Tarihe göre işlem
« Yanıtla #4 : 12 Eylül 2011, 21:16:22 »
Teşekkürler Bülent Bey, işlem tamamdır.
Kayıtlı

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

  • Excelce.Net Yönetici
  • *
  • İleti: 1413
  • 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: Tarihe göre işlem
« Yanıtla #5 : 13 Eylül 2011, 19:09:29 »
Rica ederim.
Çalışmalarınızda başarılar.
Kayıtlı
(Ücretli program talepleriniz için iletişime geçebilirsiniz, excelvbprogram@gmail.com)
Sayfa: [1]   Yukarı git
« önceki sonraki »