Excel - Base de datos

   
Vista:

Base de datos

Publicado por Filtro Base de datos (1 intervención) el 10/09/2015 19:12:59
Buen día, espero estén bien. Quisiera pedir ayuda o que alguien me explique de favor por que cuando ejecuto mi macro únicamente me filtra datos que sean letras, cuando quiero filtras alguna celda con numero no se ejecuta.

Saludos

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
Sub Filter()
 
    Application.ScreenUpdating = False
 
    Sheets("Filter").Select
    Range("C24").Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Clear
 
 
 
 
     Sheets("RawData").Range(("Table1[#All]")).AdvancedFilter Action:=xlFilterCopy, CriteriaRange:= _
        Sheets("RawData").Range("Table1[#All]"), CopyToRange:=Sheets("Filter").Range("C24"), Unique:=False
 
 
    Columns("C:C").Select
    Selection.ColumnWidth = 24
    Columns("D:D").Select
    Selection.ColumnWidth = 15
    Columns("E:E").Select
    Selection.ColumnWidth = 17.14
    Columns("F:F").Select
    Selection.ColumnWidth = 11.5
    Columns("G:G").Select
    Selection.ColumnWidth = 15
    Columns("H:H").Select
    Selection.ColumnWidth = 15
    Columns("I:I").Select
    Selection.ColumnWidth = 17
    Columns("J:J").Select
    Selection.ColumnWidth = 17
    Columns("K:K").Select
    Selection.ColumnWidth = 23
    Columns("L:L").Select
    Selection.ColumnWidth = 15
    Columns("M:M").Select
    Selection.ColumnWidth = 15
    Columns("N:N").Select
    Selection.ColumnWidth = 10
    Columns("O:O").Select
    Selection.ColumnWidth = 19
    Columns("P:P").Select
    Selection.ColumnWidth = 18
    Columns("Q:Q").Select
    Selection.ColumnWidth = 10
    Columns("R:R").Select
    Selection.ColumnWidth = 15
    Columns("S:S").Select
    Selection.ColumnWidth = 19
    Columns("T:T").Select
    Selection.ColumnWidth = 26
    Columns("U:U").Select
    Selection.ColumnWidth = 20
    Columns("V:V").Select
    Selection.ColumnWidth = 23
    Columns("W:W").Select
    Selection.ColumnWidth = 24
    Columns("x:x").Select
    Selection.ColumnWidth = 24
    Columns("y:y").Select
    Selection.ColumnWidth = 21
    Columns("z:z").Select
    Selection.ColumnWidth = 24
 
 
 
 
    Range("C24").Select
 
     Application.ScreenUpdating = True
 
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Base de datos

Publicado por GMG (105 intervenciones) el 11/09/2015 12:06:24
el problema estará en el filtro avanzado.

¿lo que no le estás metiendo como condición de filtro la misma tabla que quieres filtrar?

Sin ver el contenido del documento no te puedo ayudar más.

Espero que te sirva de algo. Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar