modificar codigo

Solo consultas sobre macros y código VBA Excel.

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

modificar codigo

Notapor yamid triana » 16 Mar 2006 13:13

buenos dias estoy adjuntando codigo que muy amablemente me suministraron para calcular descuento en la misma celda pero he intentado cambiarlopara que solo funcione en una columna especifica ya que debo trabajarlo con descuento diferente en otras columnas
muchas gracias
No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
yamid triana
Miembro Frecuente
Miembro Frecuente
 
Registrado: 07 Mar 2006 10:02
Ubicación: cali

Re: modificar codigo

Notapor Tavo77 » 16 Mar 2006 13:20

Buenos dí­as, cambia el código por el siguiente:
Código: Seleccionar todo
Private Sub Worksheet_Change(ByVal Target As Range)

Dim valor As Double
Application.EnableEvents = False
valor = Target.Value
Select Case Target.Column
    Case 1 'en la columna A
        Target.Value = valor * 0.82
    Case 2 'en la columna B
        Target.Value = valor * 0.72
    Case 3 'en la columna C
        Target.Value = valor * 0.62
    'Case 4 .... Case n para las demás columnas
    Case Else 'en cualquier otra columna no especificada anteriormente
        Target.Value = valor
End Select
Application.EnableEvents = True

End Sub
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
Tavo77
Miembro Frecuente
Miembro Frecuente
 
Registrado: 25 Ago 2005 20:43
Ubicación: Costa Rica


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 5 invitados