Salt la conținutul principal

Cum să verificați dacă prima literă dintr-o celulă specificată este capitală în Excel?

Autor: Siluvia Ultima modificare: 2024-08-14

Poate fi ușor să scrieți toate literele cu majusculă într-o celulă din Excel. Cu toate acestea, știți cum să verificați numai dacă prima literă este majusculă sau nu într-o celulă specificată în Excel? Acest articol va introduce un cod VBA pentru a vă ajuta să îl realizați.

Verificați dacă prima literă dintr-o celulă specificată este capitală cu codul VBA


Verificați dacă prima literă dintr-o celulă specificată este capitală cu codul VBA

Vă rugăm să faceți următoarele pentru a aplica codul VBA pentru a verifica dacă prima literă dintr-o celulă este majusculă sau nu în Excel.

1. apasă pe Alt + F11 tastele simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastra, faceți clic pe Insera > Module. Și apoi copiați și lipiți următorul cod VBA în fereastra Cod.

Cod VBA: verificați dacă prima literă este cu majusculă într-o celulă

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

notițe: În cod, A1 este celula pe care o veți verifica dacă prima literă este majusculă. Vă rugăm să îl modificați după cum aveți nevoie.

3. apasă pe F5 tasta pentru a rula codul. Apoi o Microsoft Excel caseta de dialog apare pentru a vă spune dacă prima literă din acea celulă specificată este majusculă sau nu, așa cum se arată în capturile de ecran de mai jos.

caseta promptă pentru a reaminti că prima literă este majusculă sau nu



Articole pe aceeaşi temă:

Cele mai bune instrumente de productivitate de birou

🤖 Kutools AI Aide: Revoluționați analiza datelor pe baza: Execuție inteligentă   |  Generați codul  |  Creați formule personalizate  |  Analizați datele și generați diagrame  |  Invocați funcțiile Kutools...
Caracteristici populare: Găsiți, evidențiați sau identificați duplicatele   |  Ștergeți rândurile goale   |  Combinați coloane sau celule fără a pierde date   |   Rundă fără Formula ...
Super căutare: VLookup cu mai multe criterii    VLookup cu valori multiple  |   VLookup pe mai multe foi   |   Căutare fuzzy ....
Listă derulantă avansată: Creați rapid o listă derulantă   |  Listă drop-down dependentă   |  Listă derulantă cu selectare multiplă ....
Manager de coloane: Adăugați un număr specific de coloane  |  Mutați coloanele  |  Comutați starea vizibilității coloanelor ascunse  |  Comparați intervale și coloane ...
Caracteristici prezentate: Focus pe grilă   |  Vedere de proiectare   |   Big Formula Bar    Manager registru de lucru și foi   |  Biblioteca de resurse (Text automat)   |  Data Picker   |  Combinați foi de lucru   |  Criptare/Decriptare celule    Trimiteți e-mailuri după listă   |  Super Filtru   |   Filtru special (filtrează bold/italic/barat...) ...
Top 15 seturi de instrumente12 Text Instrumente (Adăuga text, Eliminați caractere,...)   |   50+ Diagramă Tipuri de (Gantt Chart,...)   |   40+ Practic Formule (Calculați vârsta pe baza zilei de naștere,...)   |   19 inserare Instrumente (Introduceți codul QR, Inserați imaginea din cale,...)   |   12 Convertire Instrumente (Numere la cuvinte, conversie valutara,...)   |   7 Merge & Split Instrumente (Rânduri combinate avansate, Celule divizate,...)   |   ... și altele

Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp.  Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...


Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!