Notifications
Clear all

RowSource

5 Posts
4 Usuários
0 Reactions
1,026 Visualizações
valdecirrk
(@valdecirrk)
Posts: 230
Estimable Member
Topic starter
 

Bom ida

tenho uma coluna com o nome dos estados e ao lado várias colunas com o cabeçalho com o nome do estado e as cidades abaixo.
como fazer para que o combobox entenda quando eu colocar selecionar um Estado, por exemplo, Santa Catarina, ele lista somente as cidades respcitvas.
direto na planilha, trabalho com a função indireto(), que funciona, mas como fazer isso em VBA?

 
Postado : 03/11/2014 8:04 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

http://profwillianexcel.forumeiros.com/ ... da-e-procv
viewtopic.php?f=23&t=13092

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/11/2014 8:17 am
Reinaldo
(@rlm)
Posts: 246
Estimable Member
 

Segue um modelo

Reinaldo

 
Postado : 03/11/2014 9:27 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Faça uma pesquisa por combobox encadeado, tem várias maneiras de fazer isso que depende da disposição dos seus dados. Qualquer coisa anexe seu arquivo.

Tipo:
http://www.tomasvasquez.com.br/blog/microsoft-office/vba-criando-combobox-encadeados

http://www.tomasvasquez.com.br/forum/viewtopic.php?f=6&t=2517&p=11257&hilit=combobox+encadeado#p11257

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 03/11/2014 9:42 am
(@denisw)
Posts: 64
Trusted Member
 

dentro do combo box das cidades cidade
Estado é o nome da planilha onde estão cadastrados os estados. uma coluna com as cidades e outra com uf dos estados ( estados em ordem ascendente.)

Private Sub cboCidade_Change()
If cboestados.Value = "AC" Then
cbocidade.RowSource = "ESTADOS!B2:B23"
ElseIf cboestados.Value = "AL" Then
cbocidade.RowSource = "ESTADOS!B24:B125"
ElseIf cboestados.Value = "AM" Then
cbocidade.RowSource = "ESTADOS!B126:B187"
ElseIf cboestados.Value = "AP" Then 'e assim por diante.

 
Postado : 05/11/2014 12:56 pm