Ինչպե՞ս լրացնել Userform ComboBox- ը Excel- ում բոլոր թերթիկների անուններով:

Այս հոդվածում խոսվում է ընթացիկ աշխատանքային գրքի բոլոր թերթիկների անունները Excel- ում օգտվողի ձևի Combo Box- ում լրացնելու մասին:

Օգտատերերի ձևաթուղթը լրացրեք VBA կոդով բոլոր թերթիկների անուններով

Օգտատերերի ձևաթուղթը լրացրեք VBA կոդով բոլոր թերթիկների անուններով

Հետևյալ VBA կոդը կարող է օգնել ձեզ մուտքագրել ընթացիկ աշխատանքային գրքի բոլոր թերթիկների անունները օգտվողի ձևի համակցված վանդակում: Խնդրում եմ, արեք հետևյալ կերպ.

1. Սեղմեք ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, խնդրում ենք, մուտքագրելով Userform ՝ կտտացնելով Տեղադրել > Օգտագործողի ձև ինչպես ցույց է տրված նկարում

3. Դրանից հետո նկարեք և տեղադրեք կոմբինատային վահանակի օգտագործողի ձևի մեջ: Տեսեք,

4. Տեղադրված համակցված վանդակի վրա սեղմեք աջով և ընտրեք Դիտել կոդը համատեքստային ընտրացանկից: Տեսեք,

5. Բացման մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, խնդրում ենք պատճենել և կպցնել ներքևում գտնվող VBA կոդը, որպեսզի օրիգինալը փոխարինվի Code պատուհանում:

VBA կոդ. Օգտատերերի ձևաթուղթը լրացրեք ընթացիկ աշխատանքային գրքի բոլոր թերթիկների անուններով

Private Sub UserForm_Initialize()
    Dim I As Long
    Me.ComboBox1.Clear
    For I = 1 To Sheets.Count
        Me.ComboBox1.AddItem Sheets(I).Name
    Next
    Me.ComboBox1.Value = ActiveSheet.Name
End Sub

ՆշումԿոդում ComboBox1-ը տեղադրված Combo Box-ի անունն է: Խնդրում ենք փոխել այն ձեր սեփականով:

6. Սեղմեք F5 կոդը գործարկելու բանալին: Բացման Userform-ում կարող եք տեսնել, որ ընթացիկ աշխատանքային գրքի բոլոր թերթերի անունները ցուցադրվում են համակցված վանդակում, ինչպես ստորև ներկայացված էկրանի պատկերը.

Related Articles:

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