Para Hector miguel!!!!

14/04/2005 - 08:13 por DANILO ARANGO | Informe spam
HOLA HECTOR!!!
TE ACUERDAS DE ESTE CODIGO!!!

Sub PonerClave()
Application.ScreenUpdating = False
Dim Clave, clavei, Desplaza, Celda As Range, Sig As Byte
Clave = Array("Ing")
Desplaza = Array(-11)
For Each Celda In Selection
Celda.Offset(, -11).Resize(, 10).ClearContents
For Sig = LBound(Clave) To UBound(Clave)
If LCase(Celda) = LCase(Clave(Sig)) Then Celda.Offset(, Desplaza(Sig))
= "X": Exit For
Next
Next
End Sub

Como le hago para que en la parte de Clave = Array("Ing") se le pueda
trabajar con numeros por ejemplo algo asi:
Clave = Array >00

GRACIAS DE ANTEMANO

Preguntas similare

Leer las respuestas

#6 DANILO ARANGO
19/04/2005 - 20:47 | Informe spam
HOLA HM
Estuve estudiando el archivo que manejo y lo que quiero hacer es marcar una
X los salarios iguales o menores de 400000 esto lo queremos hacer para llevar
una relacion de esto.
En la columna J tenemos SALARIOS y en la columna K van marcadas las X.
J K
ejem: SALARIOS S.INFERIORES
400000 X
500000
400000 X

Muchas Gracias..
Saludos
Respuesta Responder a este mensaje
#7 Manuel Romero
19/04/2005 - 23:45 | Informe spam
Pones la siguiente formula en K1 (por ejemplo)

=SI(J1<@0000,"X","")

"DANILO ARANGO" escribió en el
mensaje news:
HOLA HM
Estuve estudiando el archivo que manejo y lo que quiero hacer es marcar


una
X los salarios iguales o menores de 400000 esto lo queremos hacer para


llevar
una relacion de esto.
En la columna J tenemos SALARIOS y en la columna K van marcadas las X.
J K
ejem: SALARIOS S.INFERIORES
400000 X
500000
400000 X

Muchas Gracias..
Saludos
Respuesta Responder a este mensaje
#8 DANILO ARANGO
29/04/2005 - 18:14 | Informe spam
HOLA HM

Necesito eimplementar el codigo para una columna numerica:

Tengo la columna T que son Salarios, estos no pueden ser mayores de
$ 15.000.000, por que es un salario muy grande y para lo que manejo este
tendria que ser modificado.
Lo que necesito vaya recorriendo la columna y cuando encuentre el valor
mayor a 15000000 saque un mensaje diciendo que la el salario en la celda
. es mayor !VERIFICAR!

EJEMPLO:

COLOMNA T
1 1000000
2 500000
3 30000000
4
5 15000000
6 800000

GRACIAS POR TU AYUDA
SALUDOS
Respuesta Responder a este mensaje
#9 Héctor Miguel
30/04/2005 - 05:04 | Informe spam
hola, Danilo !

... implementar el codigo para una columna numerica:
... la columna T... son Salarios... no pueden ser mayores de $ 15.000.000... tendria que ser modificado.
... cuando encuentre el valor mayor a 15000000... mensaje diciendo que... en la celda... es mayor !VERIFICAR! [...]



[supongo que] necesitarias un codigo 'intermedio' [previo al que 'realmente' vaya a 'hacer lo suyo'] :))
[o que este 'interrumpiendo' el proceso 'efectivo'] :-(

[me parece que] podrias 'evitar' [tanto] codigo si utilizas formatos condicionales ;)
[p.e.] selecciona TODA la columna T y usa una formula en los FC +/- de... =T1>000000
aplica una trama, color de texto, bordes [etc.] de tu preferencia y podras 'visualizar' los que no 'pasan' ;)

[incluso] si la introduccion de los datos es por el usuario... usar 'reglas de validacion' para 'impedirselo' :))

comentas?
saludos,
hector.
Respuesta Responder a este mensaje
#10 DANILO ARANGO
02/05/2005 - 20:54 | Informe spam
HOLA HM!!

Tu idea es buenisima, asi se ahorra mucho codigo, pero tengo un problema que
yo estos datos los copio de otros libros y al copiarlo no funciona el formato
condicional.

Gracias
Saludos
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida