Ինչպե՞ս կանխել Excel- ի բջիջներում դատարկ կամ բացակայող գրառումները:
Ենթադրելով, որ դուք ստեղծում եք աշխատաթերթ A1: B10 տիրույթի աղյուսակ և անհրաժեշտ է կանխել, որ դատարկ բջիջը հայտնվի այս աղյուսակի տիրույթում, ինչպե՞ս հասնել դրան: Այս հոդվածը ներկայացնում է մի եղանակ ՝ ավտոմատ կերպով պատուհանի տուփը բացելու համար, եթե խմբագրման ժամանակ դատարկ գրառումը հայտնվում է որոշակի աղյուսակի տիրույթում: Խնդրում ենք հոդվածում քայլ առ քայլ հետևել մեթոդին:
Կանխել դատարկ կամ բացակայող գրառումները բջիջներում ՝ օգտագործելով VBA կոդ
Կանխել դատարկ կամ բացակայող գրառումները բջիջներում ՝ օգտագործելով VBA կոդ
A1: B10- ը այն տիրույթն է, որտեղ դուք պետք է ներս ստեղծեք աղյուսակ, իսկ A1, B1- ը պարունակում է սեղանի վերնագրերը, ինչպես ցույց է տրված նկարում: Խնդրում ենք արեք հետևյալը `աղյուսակը կազմելու ընթացքում A2: B10 տիրույթում դատարկ կամ բացակայող գրառումները չհայտնաբերելու համար:
1. Այն աշխատաթերթում, որը դուք թույլ չեք տա դատարկ գրառումներ որոշակի տիրույթում, աջով կտտացրեք թերթիկի ներդիրին և այնուհետև կտտացրեք Դիտել կոդը աջ կտտացնելու ցանկից:
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, պատճենեք և կպցրեք ստորև նշված VBA կոդը օրենսգրքի պատուհանում: Տեսեք,
VBA կոդ. Կանխել դատարկ կամ բացակայող գրառումները մի շարք բջիջներում
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Then Exit Sub
Dim isect As Range
On Error Resume Next
Set isect = Application.Intersect(Target, Range("A2:B10"))
If Not (isect Is Nothing) Then
If Target.Column = 1 Then
If Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0 Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
Else
If (Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0) Or (Len(Target.Value) > 0 And Len(Target.Offset(0, -1).Value) = 0) Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
End If
End If
End Sub
ՆշումVBA կոդում A2: B10- ը բջիջների շարք է, որը դուք չեք ցանկանում ներսում թողնել դատարկ բջիջ: Խնդրում ենք փոխել ընդգրկույթը, որքան ձեզ հարկավոր է:
Այսուհետ, երբ բաց եք թողնում դատարկ բջիջը և անմիջապես լրացնում նշված բջիջի հաջորդ բջիջը, կստանաք a Excel- ի համար նախատեսված գործիքներ երկխոսության տուփ, ինչպես ցույց է տրված նկարում
Առնչվող հոդվածներ:
- Ինչպե՞ս կանխել տվյալների մուտքագրումը Excel- ում աշխատաթերթի հատուկ բջիջներ:
- Ինչպե՞ս կանխել Excel- ում բազմաթիվ աշխատանքային թերթերի ընտրությունը:
- Ինչպե՞ս կանխել Excel- ում որոշակի աշխատանքային թերթի ջնջումը:
- Ինչպե՞ս կանխել բջիջների հատուկ պարունակության ջնջումը Excel- ում:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: