............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

MACRO SELECCIONA TRABAJADOR DE BASE DATOS SIN FECHA DE CESE

Ver el tema anterior Ver el tema siguiente Ir abajo

MACRO SELECCIONA TRABAJADOR DE BASE DATOS SIN FECHA DE CESE

Mensaje por HPINCO el Jue Feb 16, 2012 8:10 pm

HOLA AMIGOS QUISIERAN QUE ME AYUDEN CON ESTA MACROS BUENO AVANCE EN ALGO LA IDEA ES QUE DE UNA BASE DE DATOS PRE ESTABLECIDA SOLO ME ESCOGA A LAS PERSONAS QUE NO TIENEN FECHA DE CESE PARA LUEGO REALIZAR UN CALCULO EN UNA PLANILLA DE REMUNERACIONES; AVANCE ALGO PERO SEGUROS USTEDES CON PLENO CONOCIMIENTO EN EL TEMA ME AYUDARAN; LES CUENTO SOY NOVATISIMO EN ESTO. GRACIAS
Archivos
PLANILLA SECTOR PUBLICO.xlsm No tienes los permisos para descargar los archivos.(26 KB) Descargado 24 veces

HPINCO

Masculino Cantidad de envíos : 4
Edad : 33
Ciudad - Pais : Virú
Version de Excel : 2007
Fecha de inscripción : 07/11/2011

Volver arriba Ir abajo

Re: MACRO SELECCIONA TRABAJADOR DE BASE DATOS SIN FECHA DE CESE

Mensaje por Toldeman el Vie Feb 17, 2012 2:34 am

Hola.

Has probado a utilizar un autofiltro.

Código:
Columns("G:G").Select
    Selection.AutoFilter
    Range("$G$5:$G$29").AutoFilter Field:=1, Criteria1:="=" & ""
    [G5].Select

Un saludo.

Toldeman
Moderador
Moderador

Masculino Cantidad de envíos : 60
Edad : 52
Ciudad - Pais : España
Version de Excel : 2007
Fecha de inscripción : 05/04/2009

Volver arriba Ir abajo

LE EXPLICO MEJOR

Mensaje por HPINCO el Vie Feb 17, 2012 5:16 pm

Hola mi estimado amigo TOLDEMAN si usted vio el archivo en realidad lo que deseo hacer es que los trabajadores que no tengan fecha de cese tendrian que incluirse en la hoja planilla mensual osea mediante la macro solo puedan extraese hacia la hoja planilla mensual desde la hoja base de datos los trabajadores sin fecha de cese; su respeusta es buena siempre y cuando yo lo trabaje en una misma hoja vea la macro que estuve intentando realizar pero hasta ahi nadamas di cuando ejecuto solo me da de las primeras 5 filas pero usted verá que son mas entonces no se como culminar la macro. gracias por su ayuda

HPINCO

Masculino Cantidad de envíos : 4
Edad : 33
Ciudad - Pais : Virú
Version de Excel : 2007
Fecha de inscripción : 07/11/2011

Volver arriba Ir abajo

Re: MACRO SELECCIONA TRABAJADOR DE BASE DATOS SIN FECHA DE CESE

Mensaje por Toldeman el Sáb Feb 18, 2012 5:35 am

Hola.

Ejecuta esta macro desde la hoja base de datos:

Código:
Sub filtro()
Application.ScreenUpdating = False
Columns("G:G").Select
    Selection.AutoFilter
    Range("$G$5:$G$29").AutoFilter Field:=1, Criteria1:="=" & ""
    [G5].Select
    Range("B5:E5").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Sheets("Planilla Mensual").Activate
[B7].Select
    Selection.PasteSpecial Paste:=xlPasteValues
[B7].Select
    Sheets("BD Trabajadores").Activate
    Application.CutCopyMode = False
    Range("G5").Select
    Selection.AutoFilter
End Sub

Un saludo.

Toldeman
Moderador
Moderador

Masculino Cantidad de envíos : 60
Edad : 52
Ciudad - Pais : España
Version de Excel : 2007
Fecha de inscripción : 05/04/2009

Volver arriba Ir abajo

FUNCIONA PERO DA UN EROR

Mensaje por HPINCO el Mar Feb 21, 2012 10:23 pm

HOLA MI ESTIMADO MUCHAS GRACIAS POR LA AYUDA EN REALIDAD FUNCIONA PERO ME TIRA UN ERROR 1004 EN TIEMPO DE EJECUCION A QUE SE DEBERA AMIGO, OTRA CONSULTA ES SIEMPRE TENGO QUE DARLE PEGAR PARA QUE SE PEGUEN LOS DATOS O SE PUEDE HACER AUTOMATICAMENTE TAMBIEN

HPINCO

Masculino Cantidad de envíos : 4
Edad : 33
Ciudad - Pais : Virú
Version de Excel : 2007
Fecha de inscripción : 07/11/2011

Volver arriba Ir abajo

Re: MACRO SELECCIONA TRABAJADOR DE BASE DATOS SIN FECHA DE CESE

Mensaje por moises melgar el Vie Feb 24, 2012 1:10 pm

Checa bien los rangos y donde estas ejecutando el codigo, seguro el detalle es ese, menciona en que linea te sale ese error.
De mientras tengo otra idea, el uso de un bucle para poder pasar de celda en celda y las que cumplen con el crierio vacias se escriban en la otra pestaña
Código:
Sub bucle()
Dim fila As Long
Application.ScreenUpdating = False
Hoja3.Range("B8:D" & Hoja3.Range("B" & Rows.Count).End(xlUp).Offset(1, 0).Row).ClearContents
    For x = 6 To Hoja2.Range("B" & Rows.Count).End(xlUp).Row
        If Hoja2.Range("G" & x).Value = "" Then
            fila = Hoja3.Range("B" & Rows.Count).End(xlUp).Offset(1, 0).Row
            Hoja3.Range("B" & fila).Value = Hoja2.Range("B" & x).Value
            Hoja3.Range("C" & fila).Value = Hoja2.Range("C" & x).Value
            Hoja3.Range("D" & fila).Value = Hoja2.Range("E" & x).Value
        End If
    Next x
Application.ScreenUpdating = True
End Sub

Archivos
PLANILLA SECTOR PUBLICO.xlsm No tienes los permisos para descargar los archivos.(29 KB) Descargado 27 veces
avatar
moises melgar
Jr_Moderator

Masculino Cantidad de envíos : 531
Edad : 28
Ciudad - Pais : Coatzacoalcos - Mexico
Version de Excel : 2007 - 2010
Fecha de inscripción : 25/05/2010

Volver arriba Ir abajo

Re: MACRO SELECCIONA TRABAJADOR DE BASE DATOS SIN FECHA DE CESE

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.