Jump to content

Insertar columnas segun condicion


Ramo72

Recommended Posts

Buenas

Necesito ayuda con un problema

El mismo consiste en la imposibilidad de establecer el codigo correcto para efectuar una insercion de columnas en funcion de una condicion preestablecida.

En el adjunto tenemos un listado de fechas horizontal donde para cada una existe en la celda superior una formula que arroja un numero del 1 al 7 haciendo referencia a un dia de la semana. Lo que yo quiero es insertar una columna despues de cada 7 (que seria cada domingo, a fin de establecer subtotales semanales.

No he podido realizar un codigo respecto a esto que funcione como deseo. Alguna idea?

Necesito si o si que sea mediante macros.

Saludos

insertarcolumnas.rar

Link to comment
Share on other sites

Gracias, Ama, voy a estudiar ese codigo, por que no conocia sa sintaxis.

Yo me las ingenie para armarlo asi esto, poniendo un -1 al final como referencia. Igualmente sirve, pero es bastante mas lento dado el loop.

Sheets("Hoja1").Range("E2").Activate
Do While ActiveCell.Offset(1, 0) <> -1
ActiveCell.Offset(0, 1).Activate
If ActiveCell = 7 Then
ActiveCell.ClearContents
ActiveCell.Offset(0, 0).EntireColumn.Select
Selection.Insert Shift:=xlToLeft, CopyOrigin:=xlFormatFromRightOrAbove
Sheets("Hoja1").Range("E2").Activate
Else
End If
Loop

End Sub[/CODE]

Creo que el tema esta cerrado.

Nuevamente gracias.

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Crear macros Excel

  • Posts

    • La función contar.si.conjunto me funcionó y me dio la cantidad correcta de "envíos a domicilio" dentro de "general" y "crm" pero como hay clientes que dentro del mes repiten el servicio me dan un número general, yo necesitaría al resultado que me dan contar.si.conjunto descontar los clientes duplicados, es decir, que usaron el servicio más de una vez. Gracias por tu tiempo!!!
    • Hola a todos; Os dejo una macro donde al iniciar el formulario se carga la imagen desde una Url. -Primero la descarga a una ruta y después la elimina. Dejo aquí la macro por si le interesa a alguno.   Saludos. MCargarImagenUrl.xlsm
    • o... a reserva de que tu modelo "real" tenga elementos que no "se ven" en tu consulta ? prueba con la muestra del adjunto (aunque hay mas alternativas), funciona desde xl-2007 cuentaUnicos vCondiciones (ayudaExcel).xlsx
    • en tanto aclaras esta parte: mira por aqui: - Función CONTAR.SI.CONJUNTO
    • Hola a todos, es mi primer post y realmente necesito la ayuda, mi nombre es German y tengo el siguiente problema a resolver, tengo una base de datos que se actualiza constantemente con la que esta abajo, necesito obtener los siguientes resultados: ¿cuantos "envios a domicilio" de "general" se hicieron obteniendo como resultados valores unicos (contar los datos unicos sobre esos criterios)? y la misma resupuesta sobre "clientes crm". Desde ya muchas gracias, no me da la capacidad para resolver este problema! Gracias de nuevo! Evelin Beltran 159 Envio a Domicilio General Camila Nansen 248 Envio a Domicilio General Alejandra Uspallata 305 Envio a Domicilio General Ana Marìa "La Poro" Damas Mendocinas 647 Envio a Domicilio General Georgina Gallini 1268 Envio a Domicilio General Susana Mazza 1019 Envio a Domicilio General Valu Galdos 638 Envio a Domicilio General Irene Jose Hernandez 1337 Envio a Domicilio clientes cmr Liendo Olivé 1546 Envio a Domicilio General Cristina J. C. Paz 646 Envio a Domicilio General Sebastian Esteco 745 Envio a Domicilio General MARIA DE NAPOLI. Envio a Domicilio clientes cmr Cristina J. C. Paz 646 Envio a Domicilio General Julia J. C. Paz 656 Envio a Domicilio clientes cmr Isabel Triunvirato 521 Envio a Domicilio General Ana Marìa "La Poro" Damas Mendocinas 647 Envio a Domicilio General Julia J. C. Paz 656 Envio a Domicilio clientes cmr      
  • Recently Browsing

    • No registered users viewing this page.
×
×
  • Create New...

Important Information

Privacy Policy