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:
Na hUirlisí Táirgiúlachta Oifige is Fearr
Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%
- Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
- Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
- Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
- Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
- Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
- Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
- Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
- Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
- Níos mó ná 300 gné chumhachtach. Tacaíochtaí Office / Excel 2007-2019 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d’fhiontar nó d’eagraíocht. Gnéithe iomlána triail saor in aisce 30 lá. Ráthaíocht ar ais airgid 60 lá.
Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca
- Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
- Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
- Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
