un gran favor

05/02/2008 - 18:01 por Rodrigo | Informe spam
Amigos...

Les adjunto un excel, es el diseño de una ruta de visita a clientes

en la primera hoja esta una especie de calendario

luego vienen 3 libros, SNKAC; BEBDAS; CAFE

en esos libros sus cabeceras tiene el nombre del cliente, el numnero y
si aparece un 1 es que es que ese dia debe visitarse y calcula los
productos que debe llevar, si es 0(cero), no hace el calculo de
productos, luego se traspasan la sumatoria de todos los productos de
los clientes que estan en 1, en GUIA--S, GUIA-B, GUIA-C.

lo que requiero hacer es que cuando dicho cliente este en 0(cero), las
columnas correspondientes se oculten y solo queden visibles las que
estan con un uno en la hoja de ruta(rutafebrero)

Por favor, ayudenme, el jefe me esta hinchando, jeje


saludos a todos

Preguntas similare

Leer las respuestas

#6 Rodrigo
15/02/2008 - 16:16 | Informe spam
excelente funciona de maravilla, muchas uchas gracias..

puedo provechar de hacerte ptra pregunta

o habro un tema nuevo..

saludos


On 7 feb, 23:09, "Héctor Miguel"
wrote:
hola, Rodrigo !

> el libro tiene las sgts hojas rutafebrero, snack, bebidas, cafe, guias-s, guiascb, guias-c
> En rutafebrero tengo el listado de clientes luego una columna en HOY donde asigno un 1 o dejo en blanco
> si es uno significa que ese dia debe visitarse, en SNACK, BEBIDAS y CAFE aparece el 1 en el clente de visita
> es estas hojas, estan los productos en la primera columna, y en las siguientes y sucesivas
> como bacecera el nombre del cliente, su codigo, el1 asignado y la cantidad de producto que se debe llevar
> la cual se muetra solo si el 1 esta presente... pueden bajar el archivo desdehttp://www.amivending.cl/ruta.xls
> ... tengo que hacerlo todos los dias, y prefiero ocultar lo que no es
> porque debo envairlo a bodega para que preparen el peido para el otro dia(el dia de ruta)...
> ... como hacerlo... he enviado a distintos abastecedores a un mismo lugar un mismo dia..(jeje)

para des/re/ocultar en tus hojas snack, bebidad y cafe las columnas que en su fila 2 tengan un 0 (cero)...
prueba con una macro +/- como la siguiente, la copias/pegas en un modulo de codigo normal y la corres en esas hojas como activas:

Sub Oculta_columnas()
  Dim Col As Byte, Rango As String
  For Col = 5 To [iv2].End(xlToLeft).Column Step 3
    If Cells(2, Col) = 0 Then Rango = Rango & Cells(2, Col).Offset(, -2).Resize(, 3).Address(0, 0) & ","
  Next
  Cells.EntireColumn.Hidden = False
  If Rango <> "" Then Range(Left(Rango, Len(Rango) - 1)).EntireColumn.Hidden = True
End Sub

saludos,
hector.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida