Excel VBA UCase İşlevi
VBA'daki Ucase, kendisine sağlanan bir giriş dizesini büyük harfe dönüştürmek için kullanılan dahili bir işlevdir, girdi olarak dize olan tek bir argüman alır ve bu işlev tarafından üretilen çıktı bir dizedir, saklanması gereken tek şey akılda tutulması gereken, bu işlevin yalnızca ilk karakteri değil, tüm işlevi büyük harfe dönüştürmesidir.
Excel'de bazı metin değerlerini BÜYÜK HARF'ye dönüştürmemiz gereken durumlar vardır. Bu, normal çalışma sayfası işlevinde bir BÜYÜK işlevi ve VBA kodunda UCase işlevi kullanılarak yapılabilir.
VBA'da UPPER işlevini zaten arıyorsanız, çalışma sayfası işlev sınıfında bile bulamazsınız. VBA'da tamamen farklı ve kısa bir isim fonksiyonu, yani "UCASE" dir. Burada "U" "ÜST" anlamına gelir, dolayısıyla formül "BÜYÜK HARF" yazar.
Sözdizimi
Şimdi, UCASE işlevinin sözdizimine bakın.
Dize: Büyük harfe dönüştürmeye çalıştığımız metin değerinden başka bir şey değil. Bu, doğrudan bir değer veya hücre referansı da olabilir. Kısa süre sonra her iki tür örneği de göreceğiz.
VBA Ucase kullanarak Metni Büyük Harfe Dönüştürme
Örnek 1
UCase fonksiyonunu kullanarak excel VBA metin değerini büyük harfli metne dönüştürmeye çalışalım .
Adım 1: Makroyu oluşturarak alt prosedürü başlatın.
Kod:
Alt UCase_Example1 () Son Alt
Adım 2: Değişkeni VBA Dizesi olarak bildirin.
Kod:
Alt UCase_Example1 () Dim k As String End Sub
Adım 3: "UCASE" fonksiyonunu uygulayarak değeri "k" değişkenine atayın.
Adım 4: Burada, büyük harfe dönüştürmeye çalıştığımız hedeflenen metin değerimiz bir dize ve dize değeri "excel VBA" dır.
Kod:
Alt UCase_Example1 () Dim k As String K = UCase ("excel vba") Son Alt
Adım 5: Mesaj kutusunda değişkenin sonucunu gösterelim.
Kod:
Alt UCase_Example1 () Dim k As String k = UCase ("excel vba") MsgBox k End Sub
Tamam, VBA kodlama kısmını bitirdik. Sonucu bir mesaj kutusunda görmek için makroyu çalıştıralım.
Dolayısıyla Büyük harf işlevi, "excel VBA" metin değerini birkaç saniye içinde "EXCEL VBA" değerine dönüştürdü.
Örnek 2
İşleve hücre başvurusu kullanma örneğine bakalım. A1 hücresine girdiğim metin değerinin aynısı.
Adım 1: Sonucu Aralık B1 hücresinde göstereceğiz, bu nedenle kod Aralık ("B") olacaktır. Değer =
Kod:
Alt UCase_Example2 () Aralık ("B1"). Değer = Son Alt
Adım 2: UCASE işlevi aracılığıyla B1 hücresinde verileri depolayacağız, bu nedenle UCASE işlevini açın.
Adım 3: Burada, dize değeri bu sefer hücre başvurusudur. Öyleyse hücre referansını Aralık ("A1") olarak verin Değer.
Kod:
Alt UCase_Example2 () Aralık ("B1"). Değer = UCase (Aralık ("A1"). Değer) Son Alt
Yani bitti.
Kodu çalıştırın ve sonucu B1 hücresinde görün.
Örnek 3
Yukarıdaki örnekte, tek hücreli değeri büyük harfe dönüştürülecek gördük. Aşağıdaki resim gibi birkaç adınız olduğunu düşünün.
Bu durumlarda, her satır için kod yazmaya devam edemeyiz, bu nedenle formülü döngülerle sarmamız gerekir. Aşağıdaki kod, yukarıdaki metin değerlerini aynı anda büyük harfe dönüştürür.
Kod:
Alt UCase_Example3 () Dim k As Long For k = 2 ila 8 Hücre (k, 2) .Değer = UCase (Hücreler (k, 1) .Değer) Sonraki k Son Alt
Bu, tüm metin değerlerini aşağıdaki gibi 2. satırdan 8. satıra kadar büyük harfe dönüştürür.
Seçilen tüm hücre değerlerini büyük harfe dönüştürmek istiyorsanız, aşağıdaki kodu kullanın.
Kod:
Alt UCase_Example4 () Dim Aralığı Aralık Olarak Ayarla Aralığı = Seçimdeki Her Aralık İçin Seçim Rng = UCase (Rng.Value) Sonraki Aralık Sonu Alt
Bu kodun çalışması için önce büyük harfe dönüştürmek istediğimiz hücre aralığını seçmemiz ve ardından makroyu çalıştırmamız gerekir. Yalnızca seçilen aralıkta, metin değerlerini büyük harf karakterlerine dönüştürür.
