Dört yıllık bir makro içinde döndürülen tarih iş çok erken

Makale çevirileri Makale çevirileri
Makale numarası: 157035 - Bu makalenin geçerli olduğu ürünleri görün.
Bu makale arşivlenmiştir. "Olduğu gibi" sunulmaktadır ve bundan sonra güncelleştirilmeyecektir.
Hepsini aç | Hepsini kapa

Belirtiler

Bir tarihi çalışma hücreden, makro tarafından döndürülen tarih kullanan bir makro çalıştırıldığında, dört yıl ve bir gün öncesi gerçek tarih olabilir.

Neden

Bir makroyu Hesaplama sekmesinde <a0>Seçenekler</a0> iletişim kutusunun "1904 tarih sistemi" seçtiğinizde, yani dört yıl ve bir gün önceki tarihi verir ve aşağıdaki koşullardan biri doğru olduğunda:

  • Makroyu, tarihini depolar değer2 özelliğini kullanır. -VEYA-

  • Makroyu, tarihini depolar bir işlev Microsoft Excel uygulama kitaplığında kullanır.

Pratik Çözüm

Aşağıdaki makro 1904 tarih sistemini seçili tarih 1900 tarih sistemine dönüştürür ve beklenen tarihi döndürüyor olup olmadığını belirler.

Microsoft, programlama örneklerini yalnızca gösterim amacıyla sağlar; örtülü veya açık garanti vermez. Buna satılabilirlik veya belirli bir amaca uygunluk zımni garantileri de dahildir, ancak bunlarla sınırlı değildir. Bu makale, gösterilen programlama dilini ve yordamları oluşturmak ve hata ayıklamak amacıyla kullanılan araçları kullanmayı bildiğinizi varsayar. Microsoft destek mühendisleri, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir, ancak gereksinimlerinizi karşılamaya yönelik olarak ek işlevsellik sağlamak veya yordamlar geliştirmek amacıyla bu örnekleri değiştirmezler. Makroyu kullanmak için <a0></a0>, aşağıdaki adımları izleyin:

  1. Yeni bir çalışma kitabına eklemek için <a0></a0>, Dosya menüsünden Yeni'yi tıklatın, sonra da çalışma kitabını tıklatın ve sonra Tamam'ı tıklatın.
  2. Araçlar menüsünden Seçenekler'i, Hesaplama sekmesini tıklatın ve "1904 tarih sistemini."'ı tıklatın Ardından, Tamam'ı tıklatın.
  3. Sheet1 içinde aşağıdaki tarihleri şunu yazın:
    A1: 5/7/96
    A2: 11/5/96
    A3: 4/28/96
  4. Araçlar menüsünden Makro'yu seçin ve Visual Basic Düzenleyicisi'ni tıklatın. Visual Basic Düzenleyicisi'nde Ekle menüsünden Modülü'nü tıklatın.
  5. Modül sayfasına aşağıdaki kodu yazın:
          Sub DateTest()
             'dimension date variable
             Dim dDate As Date
             'store minimum date in range into variable
             dDate = Application.Min(Worksheets(1).Range("A1:A3"))
             'display stored date
             MsgBox "Stored date" & Chr(13) & dDate
             'check for 1904 date system
             If Application.ThisWorkbook.Date1904 Then
              'convert 1904 base date to 1900 base date
              dDate = DateSerial(Year(dDate) + 4, Month(dDate), Day(dDate) + 1)
              'display converted date
                MsgBox "Converted date" & Chr(13) & dDate
             Else
                MsgBox "1904 date system is not enabled"
             End If
          End Sub
    						
  6. Makroyu çalıştırmak için <a0></a0>, makro için Araçlar menüsünden ve makro'i tıklatın. DateTest seçin ve sonra Çalıştır'ı tıklatın.
Bir tarihle ilk ileti kutusu görünür 4/27/dört yıl ve bir gün öncesi A3 hücrelerine A1 aralığındaki en erken tarihi olan 92,. Ikinci ileti kutusu doğru "dönüştürülmüş" 28/4/96 tarihini görüntüler.

Durum

Microsoft, bu makalenin başında listelenen Microsoft ürünlerinde bir sorun için onaylamıştır.

Daha fazla bilgi

Visual Basic for Applications otomatik olarak 1904 tarih sistemini algılayacak ve bu tarihi gerektiği gibi dönüştürür. Fark, bir kullanıcı, Microsoft Excel'de 1904 tarih sistemini seçer ve bir tarihi çalışma sayfasında bir hücreden okuyan bir makroyu çalıştırır, dört yıl ve bir gün olabilir (fazladan bir gün için artık yılda hesapları). Örneğin, 9/1/96 1904 tarih sistemi bulunan bir tarihi bir tarihi 8/31/92 döndürebilir.

Tarih sistemi tutarsızlık Visual Basic'te 1904 tarih sistemini seçin ve makroyu değer2 özelliği kullanır, tarihini depolar oluşabilir.

Değer2 özelliği Visual Basic'te, kullandığınız Microsoft Office 97'de yeni bir özelliktir. Para birimi veya tarih veri türleri kullanmak dışında değer2 özelliği değişkenleri Value özelliği ile aynı şekilde saklar.

Özellikler

Makale numarası: 157035 - Last Review: 12 Şubat 2014 Çarşamba - Gözden geçirme: 2.3
Bu makaledeki bilginin uygulandığı durum:
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 97 Standard Edition
  • Microsoft Excel 95 Standard Edition
Anahtar Kelimeler: 
kbnosurvey kbarchive kbmt kbdtacode kbprb kbprogramming KB157035 KbMttr
Machine-translated Article
ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.
Makalenin İngilizcesi aşağıdaki gibidir:157035

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com