Ինչպե՞ս կանխել Excel- ում բացվող ցուցակով բջիջի վրա պատճենումն ու տեղադրումը:
Տվյալների վավերացման բացվող ցուցակով բջջի համար, երբ այլ բջիջից բովանդակություն պատճենեք և տեղադրեք դրան, բացվող ցուցակը կվերանա և կփոխարինվի նոր տեղադրման բովանդակությամբ: Որոշ դեպքերում դուք ցանկանում եք կանխել այլ բովանդակության պատճենումը և տեղադրումը բջիջի վրա բացվող ցուցակով, ի՞նչ կանեիք դրանով զբաղվելու համար: Այս հոդվածում դուք կստանաք այս խնդրի լուծման VBA մեթոդ:
Կանխեք պատճենեք և տեղադրեք բջիջը Excel- ում բացվող ցուցակով
Կանխեք պատճենեք և տեղադրեք բջիջը Excel- ում բացվող ցուցակով
1. Բացեք աշխատաթերթը բացվող ցուցակի բջիջով, որը ցանկանում եք կանխել պատճենումը և տեղադրումը:
2. Մամուլ ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic ծրագրեր պատուհան.
3. Մեջ Microsoft Visual Basic ծրագրեր պատուհանը, կրկնակի կտտացրեք ձախ էջի ընթացիկ աշխատաթերթի անունը, ապա պատճենեք և կպցրեք ստորև նշված VBA կոդը օրենսգրքի խմբագրին: Տեսեք,
VBA կոդ. Կանխել պատճենումը և տեղադրումը բջիջի վրա բացվող ցուցակով
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20200903
Dim xValue As String
Dim xCheck1 As String
Dim xCheck2 As String
Dim xRg As Range
Dim xArrCheck1() As String
Dim xArrCheck2() As String
Dim xArrValue()
Dim xCount, xJ As Integer
Dim xBol As Boolean
' If Target.Count > 1 Then
' Exit Sub
' End If
xCount = Target.Count
ReDim xArrCheck1(1 To xCount)
ReDim xArrCheck2(1 To xCount)
ReDim xArrValue(1 To xCount)
Application.EnableEvents = False
On Error Resume Next
xJ = 1
For Each xRg In Target
xArrValue(xJ) = xRg.Value
xArrCheck1(xJ) = xRg.Validation.InCellDropdown
xJ = xJ + 1
Next
Application.Undo
xJ = 1
For Each xRg In Target
xArrCheck2(xJ) = xRg.Validation.InCellDropdown
xJ = xJ + 1
Next
xBol = False
For xJ = 1 To xCount
If xArrCheck2(xJ) <> xArrCheck1(xJ) Then
xBol = True
Exit For
End If
Next
If xBol Then
MsgBox "The selected cells containg data validation drop-down lists, no pasting allowed."
Else
xJ = 1
For Each xRg In Target
xRg.Value = xArrValue(xJ)
xJ = xJ + 1
Next
End If
Application.EnableEvents = True
End Sub
4. Մամուլ ալտ + Q ստեղները դուրս գալու համար Microsoft Visual Basic ծրագրեր պատուհան.
5. Երբ բովանդակությունը տեղադրեք բացվող ցուցակով բջիջին, կհայտնվի երկխոսության տուփ ՝ հիշեցնելու համար, որ կպցնելն անթույլատրելի է: Տեսեք,
ՆշումԱյս VBA- ն ուղղակի աշխատում է մեկ բջիջների տեղադրման մեջ: Եթե պատճենեք և տեղադրեք բազմաթիվ բջիջներում, դա չի գործի:
Excel- ում հեշտությամբ ստեղծեք բացվող ցուցակ վանդակում:
The Բացվող ցուցակ ՝ տուփերով օգտակարությունը Excel- ի համար նախատեսված գործիքներ կարող է օգնել ձեզ հեշտությամբ ստեղծել բացվող ցուցակ նշած տուփերով ՝ նշված տիրույթում, ընթացիկ աշխատաթերթում, ընթացիկ աշխատանքային գրքում կամ բացված աշխատանքային գրքույկներում ՝ ելնելով ձեր կարիքներից:
Ներբեռնեք Kutools- ի Excel- ի 30-օրյա անվճար ուղեգիծը ամբողջությամբ հիմա:
Առնչվող հոդվածներ քանակը:
Ինչպե՞ս ստեղծել բացվող ցուցակ Excel- ում բազմաթիվ վանդակում:
Excel- ի շատ օգտվողներ հակված են բացման ցուցակ ստեղծել բազմաթիվ վանդակում, որպեսզի ամեն անգամ ցուցակից ընտրեն բազմաթիվ իրեր: Իրականում, Դուք չեք կարող ստեղծել տվյալների վավերացումով բազմաթիվ ցուցանակներով ցուցակ: Այս ձեռնարկում մենք ցույց կտանք ձեզ Excel- ում բազմաթիվ ցուցանակներով բացվող ցուցակ ստեղծելու երկու եղանակ: Այս ձեռնարկը տրամադրում է խնդիրը լուծելու մեթոդը:
Excel- ում ստեղծեք մեկ այլ աշխատանքային գրքից բացվող ցուցակ
Տվյալների վավերացման բացվող ցուցակը աշխատանքային գրքում ստեղծելը բավականին հեշտ է: Բայց եթե տվյալների վավերացման համար անհրաժեշտ ցուցակի տվյալները տեղակայվեն մեկ այլ աշխատանքային գրքում, ի՞նչ կանեիք: Այս ձեռնարկում դուք կսովորեք, թե ինչպես մանրամասնորեն ստեղծել Excel- ի մեկ այլ աշխատանքային գրքից թողարկված ցանկի ցուցակ:
Excel- ում ստեղծեք որոնելի բացվող ցուցակ
Բազմաթիվ արժեքներով բացվող ցուցակի համար պատշաճ գտնելը հեշտ գործ չէ: Նախկինում մենք ներմուծել ենք բացվող ցուցակը ավտոմատ կերպով լրացնելու մեթոդ, երբ առաջին տառը մուտքագրեք բացվող վանդակում: Ինքնալրացման գործառույթից բացի, դուք կարող եք նաև բաց թողնել ցանկը որոնելի դարձնել `բացվող ցուցակում պատշաճ արժեքներ գտնելու գործում աշխատանքային արդյունավետությունը բարձրացնելու համար: Բացվող ցուցակը որոնելի դարձնելու համար փորձեք այս ձեռնարկի մեթոդը:
Excel- ի բացվող ցուցակում արժեքներ ընտրելիս ավտոմատ կերպով լրացրեք այլ բջիջներ
Ասենք, որ դուք ստեղծել եք բացվող ցուցակ `հիմնվելով B8: B14 բջիջների տիրույթի արժեքների վրա: Բացվող ցուցակում ցանկացած արժեք ընտրելիս ցանկանում եք, որ համապատասխան արժեքները C8: C14 բջիջների տիրույթում ավտոմատ կերպով լրացվեն ընտրված խցում: Խնդրի լուծման համար, այս ձեռնարկի մեթոդները կօգնեն ձեզ:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: