VBA DateValue İşlevi nedir?
Bir DateValue işlevi, Excel VBA'da Tarih / saat işlevi kategorisi altında yerleşik bir işlevdir. VBA'da hem VBA işlevi hem de çalışma sayfası işlevi olarak çalışır. Bu işlev, Dize gösterimi biçiminde sağlanan Date'in seri numarasını veya değerini, Date dizesi tarafından sağlanan saat bilgilerini yok sayarak döndürür. Excel'de iki farklı şekilde kullanılır. Bu işlev, bir çalışma sayfası hücresine giren bir çalışma sayfası formülü olarak kullanılır. Microsoft Excel ile ilişkilendirilmiş Visual Basic Editor aracılığıyla VBA uygulamasına giren makro kodu olarak kullanılır.
Bu yazıda VBA DATEVALUE örneklerini ve nasıl kullanılacağını net bir açıklama ile öğreneceğiz.
VBA Datevalue Fonksiyonunun Açıklaması
VBA'da DATEVALUE aşağıdaki sözdizimini kullanır.
Bu işlev yalnızca tek Bağımsız Değişken veya Parametre kullanır
- Tarih : Dize biçiminde temsil edilen tarihtir
- Döndürür: Bu işlev, bir VBA işlevi olarak kullanıldığında tarihin değerini döndürür. Çalışma sayfası işlevi olarak kullanıldığında tarih değerini döndürür
VBA DateValue işlevi, geçerli bir Excel biçiminde belirtilen metin biçiminde temsil edilen verilerin yorumlanmasını sağlayabilir. Dize, haftanın gününün metin temsilini içeriyorsa, tarih değerini döndüremez.
VBA DateValue işlevinin faydaları, dizeden tarih değerini ayıklamak ve tarihi saatle tek tarihe dönüştürmektir. Basitçe, zamanla birlikte bir tarih verildiğinde, bu işlev zaman değerinden kaçınarak yalnızca tarih değerini kullanabiliriz.
Excel VBA DATEVALUE Nasıl Kullanılır?
Excel'de DateValue işlevini kullanmak için önce VBA düzenleyicisini açmanız gerekir.
VBA programının satırlarını eklemek için Excel çalışma sayfasına komut düğmesinin yerleştirilmesi gerekir. Programın satırlarını uygulamak için, kullanıcının excel sayfasındaki komut düğmesine tıklaması gerekir. Programdan geçerli bir çıktı almak için argüman aracılığıyla geçerli girdi verilir. Örneğin, aşağıdaki kod, tarih değerini VBA'daki metinden çıkarmak için DateValue işlevini çalıştırmak için bir makro oluşturulmasına yardımcı olur.
VBA programı:
Alt Datebutton () Dim myDate As Date myDate = DateValue (“15 Ağustos 1991”) MsgBox Date (myDate) End Sub
Bu kod, verilen girişten 15 olarak tarih verir.
Excel VBA DATEVALUE örnekleri
Aşağıda, Excel VBA'da DateValue örnekleri verilmiştir.
Bu VBA DateValue Excel Şablonunu buradan indirebilirsiniz - VBA DateValue Excel ŞablonuÖrnek 1 - Bir Tarihten Gün, Ay ve Yılı Elde Etme
Programı VBA'da oluşturmak ve yürütmek için birkaç adım izlenir. Bunlar şunları içerir
Adım 1: Geliştirici Sekmesine gidin, imleci Excel sayfasındaki bir hücreye getirin ve 'Ekle' seçeneğine tıklayın ve şekilde gösterildiği gibi ActiveX Kontrolü altındaki 'Komut Düğmesi'ni seçin.
Düğmeyi istediğiniz yere sürükleyin ve özellikler penceresinden başlığa Datebutton olarak verin.
Adım 2: Düğmeye çift tıklayın, VBA projesine yönlendirilecek ve Özel Alt komut düğmesi ile alt alt arasındaki kodu yazacaktır.
Bir tarih, ay ve yıl almak için kod aşağıdaki gibi geliştirilmelidir.
Kod:
Private Sub Datebutton1_Click () Dim Exampledate As Date Exampledate = DateValue ("April 19,2019") MsgBox Date MsgBox Year (Exampledate) MsgBox Month (Exampledate) End Sub 
Bu kodda, Datebutton1_Click () addır ve exampledate, çıktıyı görüntülemek için Date veri türü ve Msgbox ile değişkendir.
Adım 3: Kod geliştirilirken, vba tipi uyumsuzluk hataları oluşacak ve bunlarla ilgilenilmesi gerekecek.
Adım 4: Bu adımda, çalıştır seçeneğine tıklayarak programı çalıştırın.
Veya Debug menüsü altında Step Into seçeneğini seçerek programı adım adım kontrol edebilir veya hatalarını ayıklayabiliriz. Kodumuzda herhangi bir hata yoksa çıktıyı görüntüler.
Adım 5 : Program çalıştırıldığında, ilk olarak metin girişinde verilen tarih ile mesaj kutusunu görüntüler. Ardından, yıl değerini görmek için Tamam'a tıklayın ve ay değerini görmek için ileti kutusunda Tamam'a tıklayın.
Örnek 2 - Tarihin Farklı Bölümlerini Almak için DatePart'ı Kullanma
Adım 1: Excel Geliştirici Sekmesine gidin, imleci Excel sayfasında bir hücreye getirin ve 'Ekle' seçeneğine tıklayın ve şekilde gösterildiği gibi ActiveX Kontrolü altındaki 'Komut Düğmesi'ni seçin.
Adım 2: Düğmeyi sürükleyin ve özellikler altında başlığı DatePart olarak verin.
Bu düğmeye çift tıklayın, Visual Basic Editor sayfasına yönlendirilir ve aşağıdaki gibi görüntülenir.
Adım 3: Şekilde gösterildiği gibi DatePart ile DateValue kullanarak kodu geliştirin.
Kod:
Özel Alt Datepart1_Click () Dim partdate As Variant partdate = DateValue ("8/15/1991") MsgBox partdate MsgBox Datepart ("yyyy", partdate) MsgBox Datepart ("dd", partdate) MsgBox Datepart ("mm", partdate) MsgBox Datepart ("q", partdate) End Sub 
Bu programda, DatePart1 makro adı ve partDate, veri türü 'variant' olan bağımsız değişken adıdır. Yılı, tarihi, ayı ve çeyreği görüntülemek için format "yyyy", "d", "m" ve "q" olarak uygulanır. Biçimde herhangi bir hata yaparsak aşağıdaki hatayı gösterir.
Adım 4: Programın başarılı bir şekilde hata ayıklamasından sonra, çalıştır düğmesine tıklayarak programı çalıştırın ve excel kısayol tuşu F5 kullanın.
Kod ilk olarak tam tarihi görüntüler, ardından msgbox'tan her Tamam'a tıkladıktan sonra, sırasıyla Tarih değerinden sonraki yıl değerini, Ay Değeri, Çeyrek Değeri gösterir.
VBA DATEVALUE Hakkında Hatırlanması Gerekenler
Excel VBA'da DateValue işlevi kullanılırken aşağıdaki şeyler hatırlanmalıdır
- DateValue işlevine sağlanan tarih geçerli bir tarihe dönüştürülemediğinde, Type Mismatch mesajıyla birlikte çalışma zamanı hatası 13 görüntüleniyor. Tarihe ihtiyacımız var, uygun metin formatı
- 'Msgbox tarihi (argüman adı)' kodlu dizge bağımsız değişkeninden tek tarihi almaya çalıştığımızda, tür uyuşmazlığı hatasını görüntüler.
- VBA düzenleyicisini açmadan DateValue işlevinin çıktısını görebiliriz. Komut düğmesine tıklanarak ve ilgili program için oluşturulan makroyu seçerek yapılır.
- Değerleri almak için DatePart kullanıldığında, uygun format izlenmelidir. Aksi takdirde, mesaj geçersiz prosedür çağrısı veya argüman ile 'çalışma zamanı hatası 5'e yol açar.