Cuestión : El ms tiene acceso a ADP 2003 usar 2 cajas combinadas dependientes pero error el conseguir

Hola, el

I ha intentado el código de acceso estándar para usar una caja combinada dependiente. pero no consiguiendo cualquie alegría con el ADP a un DB del ms sql. ¡El proyecto del ADP divulga un error con usar [las formas]! ¡[formexample]! ¿[combo2] ayuda del

Please? class= del

Respuesta : El ms tiene acceso a ADP 2003 usar 2 cajas combinadas dependientes pero error el conseguir

Hola Bruj,

Estudié el problema y descubrí la nueva y asombrosa cosa para mí. Nunca antes de que haya resuelto una tarea donde había necesario utilizar Activecell.
Encontré que cuando asignamos fórmula a la condición del formato, está traducida como si siendo aplicado al Activecell. Tan si hemos compuesto una fórmula para la célula izquierda superior de la gama de los CF (si se asume que tiene referencias relativas/absolutas apropiadas que se ampliarán sobre la gama) debemos fijar Activecell a la célula izquierda superior de la gama de los CF. La manera más fácil de hacer esto es seleccionar la gama de los CF. Usted tenía tan razón en general sobre la selección.

Espero que esta macro sea conveniente para usted.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:

Workbook_Open secundario privado ()
lastRow dévil como de largo
Con las hojas de trabajo (“Sheet1”)
    . CANCELACIÓN  de Cells.FormatConditions.Delete 'TODO EL FORMATO de COND
    lastRow =. Rows.Count
    Con. Gama (“A3: O” y el lastRow)   'FIJARON el objeto del defecto, todas las expresiones que comenzaban con
                                    '“.” le referirá. Observar jerarquizado “con”
        . Seleccionar                     'para fijar ActiveCell a la esquina izquierda superior de la gama
        tipo de .FormatConditions.Add: =xlExpression, Formula1: = " =COUNTIF ($E$3: $E3, $E3) >1 "
        .FormatConditions (1).Interior.ColorIndex = 44
        .FormatConditions (1).StopIfTrue = verdad
        tipo de .FormatConditions.Add: =xlExpression, Formula1: = " =COUNTIF ($E$3: $E$ " y lastRow y “, $E3) >1”
        .FormatConditions (2).Interior.ColorIndex = 37
        tipo de .FormatConditions.Add: =xlExpression, Formula1: = " =UPPER ($K2) = del "" """ SÍ
        .FormatConditions (3).Interior.Color = '    rojo vbRed
    Extremo con
Extremo con
Submarino del extremo
Otras soluciones  
 
programming4us programming4us