[Resolvido]Textbox + array: é possível?

Boa tarde.

Necessito tornar visível dez textbox que estão "invisíveis", mas não quero fazer instrução no VBA de uma por uma.
Pensei o seguinte: criar as dez caixas, com nomes como CAIXA(1), CAIXA(2), CAIXA(3), etc.

E, rocar um "for - next" para preenche-las:

FOR A = 1 to 10
Caixa(A).visible = True
NEXT A

Mas, não está funcionando.

Isso é possível?
Alguma outra alternativa?

Paulo

Ops!
Agora consegui com o seguinte:

Mudando o nome das textbox para CAIXA1, CAIXA2, CAIXA3, etc.

Còdigo:

Código:

Dim AAA As Integer, NUMCAIXA As String

For AAA = 1 To 3
   NUMCAIXA = "CAIXA" & AAA
   Me.Controls(NUMCAIXA).Visible = True
Next AAA

Funcionou, mas aceito sugestões.

Paulo

Boa tarde,

Acho que a única coisa pra dar uma "melhorada" no seu código é retirar a variável NUMCAIXA. Não vai dar diferença nenhuma em termos de desempenho, mas é mais "profissional" quando se olha para exclusão de variáveis inúteis, que no nível correto, pode causar bastante perda de desempenho.

Código:

For i = 1 To 3 Step 0
  Me.Controls("CAIXA" & i).Visible = True
  i = i + 1
Next i

Abraço.

Valeu, obrigado.

Bom dia,

Não se esqueça de marcar o tópico como resolvido.

Abraço.