Sut i wirio a yw'r llythyren gyntaf mewn cell benodol yn gyfalaf yn Excel?
Efallai y bydd yn hawdd gwneud pob llythyren yn gyfalaf mewn cell yn Excel. Fodd bynnag, a ydych chi'n gwybod sut i wirio a yw'r llythyr cyntaf yn gyfalaf ai peidio mewn cell benodol yn Excel? Bydd yr erthygl hon yn cyflwyno cod VBA i'ch helpu chi i'w gyflawni.
Gwiriwch a yw'r llythyren gyntaf mewn cell benodol yn gyfalaf â chod VBA
Gwiriwch a yw'r llythyren gyntaf mewn cell benodol yn gyfalaf â chod VBA
Gwnewch fel a ganlyn i gymhwyso'r cod VBA i wirio a yw'r llythyren gyntaf mewn cell yn gyfalaf ai peidio yn Excel.
1. Gwasgwch y Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau. Ac yna copïwch a gludwch y cod VBA canlynol i mewn i ffenestr y Cod.
Cod VBA: Gwiriwch a yw'r llythyren gyntaf yn gyfalaf mewn cell
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
Nodyn: Yn y cod, A1 yw'r gell y byddwch chi'n gwirio a yw'r llythyren gyntaf yn gyfalaf. Newidiwch ef yn ôl yr angen.
3. Gwasgwch y F5 allwedd i redeg y cod. Yna a Microsoft Excel blwch deialog yn ymddangos i ddweud wrthych a yw'r llythyren gyntaf yn y gell benodol honno'n gyfalaf ai peidio fel y nodir isod y sgrinluniau a ddangosir.
Erthyglau cysylltiedig:
- Sut i wirio a yw gwerth cell rhwng dau werth yn Excel?
- Sut i wirio a yw'r gell yn dechrau neu'n gorffen gyda chymeriad penodol yn Excel?
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!