Foros del Web » Programación para mayores de 30 ;) » .NET »

conversion a mayusculas

Estas en el tema de conversion a mayusculas en el foro de .NET en Foros del Web. Buenas, a ver si alguien me puede ayudar con esto. Estoy intentando que cuando un usuario introduzca datos en un rango de campos se conviertan ...
  #1 (permalink)  
Antiguo 04/06/2015, 02:44
 
Fecha de Ingreso: junio-2015
Mensajes: 1
Antigüedad: 7 años, 3 meses
Puntos: 0
conversion a mayusculas

Buenas, a ver si alguien me puede ayudar con esto.
Estoy intentando que cuando un usuario introduzca datos en un rango de campos se conviertan automáticamente en mayúsculas,
tengo este modulo:
Option Explicit
Public Function AMayusculas(strTexto As String) As String
AMayusculas = UCase(strTexto)
End Function

y luego esto:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
Set KeyCells = Range("B7,B8, B9,B10,B12,B13,B21,B22,B23,B25,B26,B32,B33,B36,B37 ,B38,B42,B44,B45,B46")
If Not Intersect(Target, KeyCells) Is Nothing Then
Target.Value = AMayusculas(Target.Value)
End If
End Sub


pero me da errores, espacio de pila insuficiente,....

soy novato en esto, alguien me puede ayudar? trabajo con Excel 2013
Gracias de antemano

Etiquetas: excel, vb
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 13:51.