Arşiv Ay Sayısını Ay Adına Çevirme

aeGNoR · 17 Mar 2021

Merhaba,
1 den 12 ye kadar olan sayılarınızı metin biçiminde aya çevirmek için aşağıdaki kodları kullanabilirsiniz. Yerleşik işlevlerde yapmanın yöntemleri de var fakat kısayoldan =AyAdi() şeklinde direkt olarak çevirebilmenizi sağlar.

CSS:

Public Function AyAdi(AySayisi As Integer)
 Select Case AySayisi
        Case Is = 1
            AyAdi = "OCAK"
        Case Is = 2
            AyAdi = "ŞUBAT"
        Case Is = 3
            AyAdi = "MART"
        Case Is = 4
            AyAdi = "NİSAN"
        Case Is = 5
            AyAdi = "MAYIS"
        Case Is = 6
            AyAdi = "HAZİRAN"
        Case Is = 7
            AyAdi = "TEMMUZ"
        Case Is = 8
            AyAdi = "AĞUSTOS"
        Case Is = 9
            AyAdi = "EYLÜL"
        Case Is = 10
            AyAdi = "EKİM"
        Case Is = 11
            AyAdi = "KASIM"
        Case Is = 12
            AyAdi = "ARALIK"
        Case Else
            AyAdi = Err.Number
    End Select
End Function

YunuS · 20 Mar 2021

@aeGNoR hocam teşekkürler , Ellerinize sağlık bilgiler için

muygun · 20 Mar 2021

Makro çözümü KTF ile syn. aeGNoR vermiş.

Aşağıdaki de işlevlerle çözüm:

ay adı yazıp sayısal karşılığını almak

C++:

=ARA(A1;{"ağustos";"aralık";"ekim";"eylül";"haziran";"kasım";"mart";"mayıs";"nisan";"ocak";"şubat";"temmuz"};{8;12;10;9;6;11;3;5;4;1;2;7})

ay sayısı yazıp karşılığını ay adı olarak almak

C++:

=ARA(A1;{1;2;3;4;5;6;7;8;9;10;11;12};{"ocak";"şubat";"mart";"nisan";"mayıs";"haziran";"temmuz";"ağustos";"eylül";"ekim";"kasım";"aralık"})

Buradaki ARA işlevinde önemli özellik ilk parantez içeriği alfabetik sırada olmalı.

Foruma hoş geldin 👋 Ziyaretçi

Arşiv Ay Sayısını Ay Adına Çevirme

aeGNoR

YunuS

muygun