Ver Mensaje Individual
  #8 (permalink)  
Antiguo 27/12/2008, 05:38
albersil
 
Fecha de Ingreso: marzo-2008
Mensajes: 8
Antigüedad: 16 años, 1 mes
Puntos: 0
Respuesta: Sustituir punto por coma o viceversa

Cita:
Iniciado por Avellaneda Ver Mensaje
Bueno, el tema es de hace casi cuatro años.

Poner en un mismo formulario 42 controles del mismo tipo e independientes, me parece una programación mal estructurada.

Si los TextBox los pones en un array, solamente tienes que poner este código:

Código:
Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)
Select Case Index
Case 1, 34, 42
    If KeyAscii = Asc(".") Then KeyAscii = Asc(",")
End Select
End Sub
Suponiendo que en los TextBox que quieres controlar la tecla, sean el Text1(1), Text1(34) y Text1(42). Si fuera en todos, le quitas el Select Case.



En el caso de que no estén en un array de controles, sí tienes que poner el mismo código para cada uno de los TextBox.


Gracias por la respuesta y perdona por mi ignorancia en programación, pero es que mi nivel es muy inferior y solo sabía hacerlo así. He leido un montón y no he encontrado ningún sitio donde digan cómo se hace un array de controles con VBA para EXCEL, es más, en algunos sitios dicen que no es posible, así que estoy en un callejón sin salida. Si tú sabes cómo hacerlo, te lo agradecería un montón. Salu2.