Ինչպե՞ս կանխել խնայողությունը, եթե Excel- ում որոշակի բջիջ դատարկ է:
Օրինակ, դուք աշխատանքային թերթիկում ձև եք մշակել և կիսում եք ձեր գործընկերների հետ: Հուսով եք, որ ձեր գործընկերները լրացնում են իրենց անունները հատուկ բջիջում `նշելու համար, թե ովքեր են մուտքագրել այս ձևը, հակառակ դեպքում նրանց խանգարում եք ձևը պահպանել, ինչպե՞ս կարող եք անել: Այստեղ ես կներկայացնեմ VBA մակրո, որպեսզի կանխեմ աշխատանքային գրքի պահպանումը, եթե հատուկ բջիջը դատարկ է Excel- ում:
- Վերաօգտագործել ցանկացած բան. Ավելացրեք առավել օգտագործված կամ բարդ բանաձևերը, գծապատկերները և ցանկացած այլ բան ձեր նախընտրածներին և հետագայում արագորեն օգտագործեք դրանք:
- Ավելի քան 20 տեքստի առանձնահատկություններ. Հանեք համարը տեքստային տողից; Հանել կամ հեռացնել տեքստերի մի մասը; Թվերն ու արժույթները վերածեք անգլերեն բառերի:
- Միաձուլել գործիքներըԲազմաթիվ աշխատանքային գրքեր և թերթեր մեկում; Միավորել բազմաթիվ բջիջներ / տողեր / սյուններ ՝ առանց տվյալների կորստի: Միաձուլեք կրկնօրինակ տողերն ու գումարը:
- Պառակտման գործիքներՏվյալները պառակտել բազմակի թերթերի ՝ հիմնված արժեքի վրա. Մեկ աշխատանքային գրքույկ ՝ բազմակի Excel, PDF կամ CSV ֆայլեր; Մեկ սյունակ մի քանի սյունակներից:
- Կպցնել բաց թողնելը Թաքնված / Filտված շարքեր; Հաշվելը և գումարը ըստ Ֆոնի գույնի; Personalանգվածային տարբերակով ստացողներին ուղարկեք անհատականացված էլ.
- Սուպեր ֆիլտր Ստեղծեք զտման առաջադեմ սխեմաներ և կիրառեք ցանկացած թերթի վրա; Տեսակ ըստ շաբաթվա, օրվա, հաճախականության և ավելին; ֆիլտր համարձակ, բանաձևերով, մեկնաբանությամբ ...
- Ավելի քան 300 հզոր հատկություններ; Աշխատում է Office 2007-2021 և 365-ի հետ; Աջակցում է բոլոր լեզուներին; Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում:
Կանխել խնայողությունը, եթե Excel- ում որոշակի բջիջ դատարկ է
Գործող աշխատանքային գիրքը չպահելուց խուսափելու համար, եթե Excel- ում որոշակի բջիջը դատարկ է, կարող եք հեշտությամբ կիրառել հետևյալ VBA մակրոը:
Քայլ 1. Բացեք Microsoft Visual Basic հավելվածների համար պատուհանը ՝ սեղմելով ալտ + F11 միաժամանակ ստեղներ:
Քայլ 2. Exploreրագրի Explorer- ում ընդլայնեք VBAProject (ձեր աշխատանքային գրքի անունը. Xlsm) և Microsoft Excel- ի օբյեկտները, ապա կրկնակի կտտացրեք այն Այս գործառույթը, Տեսեք ձախ էկրանի նկարը.
Քայլ 3. ThisWorkbook- ի բացման պատուհանում տեղադրեք հետևյալ VBA մակրոը.
VBA մակրո. Կանխեք խնայողությունը, եթե կոնկրետ բջիջը դատարկ է
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Update by ExtendOffice 20220907
Dim xFileName As String
Dim xStr As String
Dim xStrWSH As String
Dim xWSh As Worksheet
Dim xWShs As Sheets
Dim xWSh1 As Worksheet
Dim xWB As Workbook
xStrWSH = "xHidWSH_LJY"
On Error Resume Next
Set xWB = Application.ActiveWorkbook
Set xWShs = xWB.Worksheets
Set xWSh = xWShs.Item(xStrWSH)
If xWSh Is Nothing Then
Set xWSh1 = xWShs.Add
xWSh1.Name = xStrWSH
xWSh1.Visible = xlSheetVeryHidden
Cancel = False
Else
If Trim(Application.Sheets("Sheet1").Range("A1").Value) = "" Then
Cancel = True
MsgBox "Save cancelled"
End If
End If
End Sub
Նշում: 1. Վերը նշված VBA կոդի 26-րդ շարքում նշված է «Թերթ 1» կոնկրետ աշխատաթերթի անվանումն է, և «A1«հատուկ բջիջ է, և դուք կարող եք դրանք փոխել ըստ ձեզ անհրաժեշտության:
2. VBA մուտքագրելուց հետո Այս գործառույթը, նախ պետք է պահպանել աշխատանքային գրքույկը։ Եվ հետո դուք կարող եք ուղարկել մակրո-միացված ֆայլը ուրիշներին:
Եթե ներկայիս աշխատանքային գրքում որոշակի բջիջը դատարկ է, այն պահելու ժամանակ, դուրս կգա նախազգուշական երկխոսության տուփ և կպատմի ձեզ »:Պահելը չեղարկված է"Տե՛ս հետևյալ նկարը էկրանին.
Առնչվող հոդվածներ
Ինչպե՞ս ստուգել կամ գտնել, արդյոք բջիջը պարունակում է հատուկ տող / տեքստ / բառ Excel- ում:
Ինչպե՞ս պատճենել տողերը, եթե սյունակը պարունակում է հատուկ տեքստ / արժեք Excel- ում:
Ինչպե՞ս պատճենել բջիջները, եթե սյունակը պարունակում է որոշակի արժեք / տեքստ Excel- ում:
Գրասենյակի արտադրողականության լավագույն գործիքները
Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով
- Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
- Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
- Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
- Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
- Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
- Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
- Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
- Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
- Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:


























