VBA- Achar Planilhas

[tfb100 0]

olá

 

Como faço para fazer uma pequisa entre planilhas?

EX: tenho 10 planilhas

digito um codigo

 

Plan1.range("b1")= '123' \\ um codigo qualquer

 

dai a plan8.range("b1") é = '123'

 

quero selecionar a planilha que tiver esse codigo

 

as planinhas são nomes de pessoas, então nunka ira se chamar plan1, plan2, etc...

estou fazendo um ponto eletronico em VBA, preciso achar a planilha corresponte a o codigo digitado

 

obrigado!!

[mibnetweb 0]

Uma idéia seria usar:

 

Sheets(x).Name -> onde x é o numero da planilha, ex: 1,2,3...

 

Assim você descobre o nome da planilha.

 

Você poderia fazer um loop e guardar o nome das planilhas em um array e depois fazer a busca.

[mibnetweb 0]

Dá uma olhada neste exemplo:

 

	If Sheets(txtconsulta.Text).Range("b" & linha) = "" Then
		datainicial = Now()
		Sheets(txtconsulta.Text).Range("b" & linha) = datainicial
	 End If

Onde: txtconsulta.text irá receber o "nome da planilha".

 

Isso é só uma idéia, a partir dai você pode desenvolver outras soluções...

 

 

Abraço