Excel Versiyon Dilini Tespit Etme  Hazır Excel Makroları (VBA) | Excel Programları

Makroyu Kopyala

'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. 
'Language Code Country'
'English 1 The United States of America
'Russian 7 Russian Federation
'Greek 30 Greece
'Dutch 31 The Netherlands
'French 33 France
'Spanish 34 Spain
'Hungarian 36 Hungary
'Italian 39 Italy
'Czech 42 Czech Republic
'Danish 45 Denmark
'Swedish 46 Sweden
'Norwegian 47 Norway
'Polish 48 Poland
'German 49 Germany
'Portuguese Brazil 55 Brazil
'Thai 66 Thailand
'Vietnamese 84 Vietnam
'Simplified Chinese 86 People's Republic of China
'Japanese 81 Japan
'Korean 82 South Korea
'Turkish 90 Turkey
'Indian 91 India
'Urdu 92 Pakistan
'Portuguese 351 Portugal
'Finnish 358 Finland
'Traditional Chinese 886 Taiwan
'Arabic 966 Saudi Arabia
'Hebrew 972 Israel
'Farsi 982 Iran
Sub LanguageUsed()
    Dim sLang As String
    Select Case Application.International(xlCountryCode)
        Case 1: sLang = "English"
        Case 7: sLang = "Russian"
        Case 30: sLang = "Greek"
        Case 31: sLang = "Dutch"
        Case 33: sLang = "French"
        Case 34: sLang = "Spanish"
        Case 36: sLang = "Hungarian"
        Case 39: sLang = "Italian"
        Case 42: sLang = "Czech"
        Case 45: sLang = "Danish"
        Case 46: sLang = "Swedish"
        Case 47: sLang = "Norwegian"
        Case 48: sLang = "Polish"
        Case 49: sLang = "German"
        Case 55: sLang = "Portuguese"
        Case 66: sLang = "Thai"
        Case 84: sLang = "Vietnamese"
        Case 86: sLang = "Simplified"
        Case 81: sLang = "Japanese"
        Case 82: sLang = "Korean"
        Case 90: sLang = "Turkish"
        Case 91: sLang = "Indian"
        Case 92: sLang = "Urdu"
        Case 351: sLang = "Portuguese"
        Case 358: sLang = "Finnish"
        Case 886: sLang = "Traditional"
        Case 966: sLang = "Arabic"
        Case 972: sLang = "Hebrew"
        Case 982: sLang = "Farsi"
        Case Else: sLang = "other"
    End Select
    MsgBox sLang
End Sub

Benzer Sonuçlar
No	Makro Adı
1	Excel Versiyon Dilini Tespit Etme
2	excel operatörleri hk
3	makrolar kutusu ve makrolar görünsün
4	Ad yöneticisi kullanılarak belli bir hücre veya bölgeye ya da herhangi bir şeye ad verilip verilmediğini tespit etme
5	Aktif hücrenin içerisinde bulunduğu sayfanın ve dosyanın adının tespit edilmesi
6	microsoft outlookdan uyarı e-maili göndersin
7	Seçilen hücrede comment (açıklama) olup olmadığını tespit etmek
8	Yazıyı tersine çevirme
9	Seçili alanda kaç tane formül olduğunu bul ve formül içeren tüm hücreleri seç
10	Excel Sürümünü / Versiyonunu Belirleme
11	Hücreler birleştirildiğinde satır genişliğini otomatik olarak yeniden boyutlandırmak
12	Tekli satır numarasına sahip satırları tespit etme ve seçme
13	Satır yüksekliğini ve sütun genişliğini cm olarak belirlemek
14	Seçilen hücrede formül var mı yok mu tespit etmek
15	Seçili alanı birer hücre daha genişletmek, eski bölgeyi daha fazla hücre ile doldurmak
16	Seçilen hücre birleştirilmiş hücre mi tespit etmek
17	Kesme, kopyalama ve yapıştırmayı iptal etme
18	benzersiz (tek) olan veri girişlerinin tespit edilmesi
19	İçerisinde hatalı hücre bulunan satıları silmek
20	hesap makinesini açma kapama

Benzer Sonuçlar

Makro Adı

Excel Versiyon Dilini Tespit Etme

excel operatörleri hk

makrolar kutusu ve makrolar görünsün

Ad yöneticisi kullanılarak belli bir hücre veya bölgeye ya da herhangi bir şeye ad verilip verilmediğini tespit etme

Aktif hücrenin içerisinde bulunduğu sayfanın ve dosyanın adının tespit edilmesi

microsoft outlookdan uyarı e-maili göndersin

Seçilen hücrede comment (açıklama) olup olmadığını tespit etmek

Yazıyı tersine çevirme

Seçili alanda kaç tane formül olduğunu bul ve formül içeren tüm hücreleri seç

Excel Sürümünü / Versiyonunu Belirleme