İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Müəyyən bir hüceyrədə ilk məktub Excel-də kapital olub-olmadığını yoxlamaq üçün necə?

Bütün məktubları sütunu Excel-də bir hüceyrədə etmək asan ola bilər. Lakin, ilk məktubun sütun olub-olmadığını yoxlamaq və Excel-də müəyyən bir hüceyrədə olmadığını necə bilirsiniz? Bu məqalədə onu əldə etmək üçün VBA kodu təqdim ediləcək.

Belirtilmiş bir hücrenin ilk harfi VBA kodu ilə kapital olub-olmadığını yoxlayın


Belirtilmiş bir hücrenin ilk harfi VBA kodu ilə kapital olub-olmadığını yoxlayın


Bir hüceyrədə ilk məktub Excel və ya kapital olmadığını yoxlamaq üçün VBA kodunu tətbiq etmək üçün aşağıdakıları edin.

1. Basın Dayandırmaq + F11 açmaq üçün eyni anda düymələri Proqramlar üçün Microsoft Visual Basic pəncərə.

2. İçində Proqramlar üçün Microsoft Visual Basic pəncərədə basın Taxmaq > Modules. Və sonra aşağıdakı VBA kodunu Kod pencerəsinə kopyalayıb yapışdırın.

VBA kodu: İlk məktubun bir hüceyrədə kapital olub olmadığını yoxlayın

Sub UpperCaseCheck()
    Dim xRg As Range
    Dim xAsc As Integer
    Set xRg = Range("A1")
    xAsc = Asc(Mid(xRg.Value, 1, 1))
    If xAsc > 64 And xAsc < 91 Then
        MsgBox "First alpha character is capital"
    Else
        MsgBox "First alpha character is not capital"
    End If
End Sub

QeydKodu: A1 ilk məktubun kapital olub-olmadığını yoxlayacaqsınız. Xahiş edirik ehtiyacınız olduğu halda dəyişdirin.

3. Basın F5 kodunu çalıştırmak üçün düyməsini basın. Sonra a Microsoft Excel informasiya qutusu, göstərilən hüceyrədə göstərilən ilk məktubun ekran şəkillərindən aşağıda olduğu kimi sermayə olub olmadığını bildirmək üçün açılır.


Əlaqəli məqalələr:



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.