Conas bosca téacs a áireamh bunaithe ar roghnú combobox ar UserForm in Excel?

Má tá tábla agat tá Ainm agus colún Uimhir Foirne mar atá thíos an pictiúr a thaispeántar. Anois ní mór duit Foirm Úsáideora a chruthú leabaithe le bosca teaglama a bhaileoidh na hainmneacha go léir istigh ann agus bosca téacs a líonfaidh an líon foirne comhfhreagrach agus ainm á roghnú as an mbosca teaglama. Is féidir leis an modh san alt seo cabhrú leat é a fháil síos.

Bosca téacs daonra bunaithe ar roghnú combobox ar Userform le VBA

Bosca téacs daonra bunaithe ar roghnú combobox ar Userform le VBA

Déan mar a leanas le do thoil chun bosca téacs a fháil le luach comhfhreagrach bunaithe ar roghnú combobox ar Fhoirm Úsáideora.

1. Brúigh an Eile + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > Foirm úsáideora. Féach an pictiúr:

3. Ansin cuir isteach rialú bosca Teaglama agus rialú bosca Téacs sa Fhoirm Úsáideora cruthaithe mar atá thíos an pictiúr a thaispeántar.

4. Deaschliceáil ar aon spás bán den Fhoirm Úsáideora, agus ansin cliceáil Féach an cód ón roghchlár comhthéacs. Féach an pictiúr:

5. Sa fhuinneog tosaigh Foirm Úsáideora (Cód), cóipeáil agus greamaigh an cód VBA thíos chun an ceann bunaidh a athsholáthar.

Cód VBA: Bosca téacs daonra bunaithe ar roghnú combobox ar Fhoirm Úsáideora

Dim xRg As Range
'Updated by Extendoffice 2018/1/30
Private Sub UserForm_Initialize()
    Set xRg = Worksheets("Sheet5").Range("A2:B8")
    Me.ComboBox1.List = xRg.Columns(1).Value
End Sub
Private Sub ComboBox1_Change()
    Me.TextBox1.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 2, False)
End Sub

nótaí: Sa chód, is é A2: B2 an raon ina bhfuil na luachanna a líonfaidh tú ar leithligh sa bhosca teaglama Userform agus sa bhosca téacs. Agus is é Bileog5 ainm an bhileog oibre ina bhfuil an raon sonraí. Athraigh iad de réir mar is gá duit.

6. Brúigh an Eile + Q eochracha chun imeacht as an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

7. cliceáil Forbróir > Ionsáigh > Cnaipe Ordú (Rialú ActiveX) chun cnaipe ordaithe a chur isteach sa bhileog oibre.

8. Cliceáil ar dheis ar an táb bileog agus roghnaigh Féach an cód ón roghchlár cliceáil ar dheis. Ansin cóipeáil agus greamaigh cód VBA isteach i bhfuinneog an chóid.

Cód VBA: Taispeáin foirm úsáideora

Private Sub CommandButton1_Click()
'Updated by Extendoffice 2018/1/30
    UserForm1.Show
End Sub

9. Múch an Mód Dearaidh sa leabhar oibre.

Cliceáil an cnaipe ordaithe chun an fhoirm úsáideora shonraithe a oscailt. Ansin feiceann tú go mbailítear gach ainm sa bhosca teaglama. Agus ainm á roghnú as an mbosca teaglama, cuirfear an uimhir chomhfhreagrach foirne isteach sa bhosca téacs go huathoibríoch mar atá thíos an pictiúr a thaispeántar.

Earraí gaolmhara:

• Conas bosca teaglama a áireamh le sonraí sonraithe ar Leabhar Oibre oscailte?
• Conas cealla eile a daonra go huathoibríoch agus luachanna á roghnú ar liosta anuas Excel?
• Conas cealla eile a daonra go huathoibríoch agus luachanna á roghnú ar liosta anuas Excel?
• Conas torthaí cuardaigh google a áireamh ar an mbileog oibre in Excel?