Ինչպե՞ս պատճենել Combo Box- ի արժեքը Excel- ում ակտիվ բջիջում:

Որոշ դեպքերում կարող է անհրաժեշտ լինել ընտրված արժեքը Combo Box- ից պատճենել ակտիվ բջիջ: Սովորաբար, դուք պետք է մուտք գործեք Combo Box, պատճենեք և տեղադրեք այն ակտիվ բջիջում ձեռքով: Այս հոդվածը ներկայացնում է հարմար մեթոդ `ակտիվ բջիջը ավտոմատ կերպով թարմացնելու համար` միաժամանակ ընտրելով արժեքները Combo Box- ում:

Պատճենեք Combo Box- ի արժեքը ակտիվ բջիջում VBA կոդով

VBA 1. Կոմբոյի տուփի արժեքը պատճենեք ակտիվ բջիջին Հրամանի միջոցով
VBA 2. Ավտոմատ պատճենեք համակցված տուփի արժեքը ակտիվ բջիջում

Պատճենեք Combo Box- ի արժեքը ակտիվ բջիջում VBA կոդով

Ստորև ներկայացված VBA կոդերը կարող են օգնել ձեզ ինքնաբերաբար պատճենել combo box արժեքը ակտիվ բջիջում: Խնդրում եմ արեք հետևյալ կերպ.

VBA 1. Կոմպոզիցիայի տուփի արժեքը պատճենեք ակտիվ բջիջին հրամանի կոճակի միջոցով

1. Նախ, անհրաժեշտ է հրամանի կոճակը մտցնել աշխատաթերթի մեջ, ինչպես ցույց է տրված նկարում:

2. Աջ կտտացրեք հրամանի կոճակին, ապա կտտացրեք Դիտել կոդը աջ կտտացնելու ցանկից: Տեսեք,

3. Պատուհանման մեջ Microsoft Visual Basic հավելվածների համար պատուհան, փոխարինեք բնօրինակ կոդը Code պատուհանում ստորև նշված VBA կոդով:

VBA կոդ. Պատճեն Combo Box- ի արժեքը ակտիվ բջիջում

Private Sub CommandButton1_Click()
   ActiveCell.Value = Me.ComboBox1.Text
End Sub

ՆշումԿոդում CommandButton1- ը տեղադրված հրամանի կոճակի անունն է, իսկ ComboBox1- ը Combo Box- ի անունն է, որից դուք պատճենելու եք արժեքը: Խնդրում ենք փոխել դրանք, ինչպես ձեզ հարկավոր է:

4. Սեղմեք ալտ + Q ստեղները փակելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

Այսուհետ, երբ անհրաժեշտ է պատճենել համակցված տուփի արժեքը ակտիվ բջիջում, խնդրում ենք պարզապես ընտրեք բջիջը, այնուհետև կտտացրեք Հրահանգի կոճակին ՝ դա կատարելու համար:

VBA 2. Ավտոմատ պատճենեք համակցված տուփի արժեքը ակտիվ բջիջում

Ստորև ներկայացված VBA կոդը կարող է օգնել ձեզ ավտոմատ կերպով թարմացնել ակտիվ բջիջը `միաժամանակ ընտրելով արժեքները Combo Box- ում: Կարող եք անել հետևյալ կերպ.

1. Համոզվեք, որ Դիզայնի ռեժիմ միացված է տակ Երեվակիչ էջանիշը.

2. Աջ կտտացրեք Կոմբո տուփին, որտեղից պատճենելու եք արժեքը, ապա կտտացրեք Դիտել կոդը աջ կտտացնելու ցանկից: Տեսեք,

3. Պատուհանման մեջ Microsoft Visual Basic հավելվածների համար պատուհանում, փոխարինեք բնօրինակը ծածկագիրը Կոդ ստորև նշված VBA կոդով պատուհան:

VBA կոդ. Պատճեն Combo Box- ի արժեքը ակտիվ բջիջում

Private Sub ComboBox1_Change()
  ActiveCell.Value = Me.ComboBox1.Value
End Sub

ՆշումԿոդում, ComboBox1- ը Combo Box- ի անունն է, որտեղից պատճենելու եք արժեքը:

4. Սեղմեք ալտ + Q ստեղները ՝ Microsoft Visual Basic հավելվածների համար պատուհանը փակելու համար, և Developրագրավորող ներդիրի տակ անջատելու Նախագծման ռեժիմը

Այսուհետ, Combo Box- ից արժեք ընտրելիս այս ընտրված գրառումն ինքնաբերաբար կցուցադրվի ակտիվ բջիջում:

Առնչվող հոդվածներ:

• Ինչպե՞ս Excel- ում ցուցադրել ամսաթվի ձևաչափը համակցված տուփի արտադրանքի մեջ:
• Ինչպե՞ս թաքցնել կամ ցուցադրել հրամանի կոճակը Excel- ում նշված բջջային արժեքի հիման վրա:
• Ինչպե՞ս բացել հատուկ աշխատանքային թերթը Excel- ում Combo Box- ի ընտրված արժեքով:
• Ինչպե՞ս կանխել կամ անջատել Excel- ում համակցված տուփի մուտքագրումը:
• Ինչպե՞ս դուրս գրվել կոճակից դուրս Excel- ում հատուկ բջիջ ընտրելու համար: