Curso VBA Excel Tablas dinámicas I Vídeo 41

[@rauseltamayo8219]

Muchas gracias pildoras sus videos son una inspiracion para seguir el camino de la programacion, me gusta su forma de enseñar. Me quito el sombrero ante usted. Saludos

[@pildorasinformaticas]

Rausel Tamayo Muchas gracias por el comentario. Me alegro de que te gusten tanto los vídeos. Un saludo

[@zurielchavez]

eres un verdadero maste!, gracias por los videos sumamente instructivos.

[@jeanvaljean6468]

Si entendí profesor , me encanta las tablas dinámicas 🤗🤗🤗🤗👌👍😎

[@CarlosMartinez-rz2bs]

Excelente como siempre. Muchas gracias.

[@vl9814]

Hola a todos, dejo por aquí código, para crear la tabla y los checkbox como OLEobjects, a la vez con un solo botón, espero que guste. Sub CrearTabla() Dim hoja As Worksheet Set hoja = ThisWorkbook.Worksheets("Tabla Dinamica") 'la version es 15 por que estoy con Office 2013 ActiveWorkbook.PivotCaches.Create(xlDatabase, ThisWorkbook.Worksheets("ARTÍCULOS").Columns("A:E"), xlPivotTableVersion15).CreatePivotTable(hoja.Range("A1"), , , xlPivotTableVersion15).Name = "Tabla" With ActiveSheet.PivotTables("Tabla").PivotFields("SECCIÓN") .Orientation = xlColumnField .Position = 1 End With With ActiveSheet.PivotTables("Tabla").PivotFields("NOMBRE ARTÍCULO") .Orientation = xlRowField .Position = 1 End With ActiveSheet.PivotTables("Tabla").AddDataField ActiveSheet.PivotTables _ ("Tabla").PivotFields("PRECIO "), "Suma de PRECIO ", xlSum 'checkbox, repetir este código por cada checkbox, y cambiar el rango donde se sitúa hoja.OLEObjects.Add(ClassType:="Forms.CheckBox.1").Name = "ceramica" Dim check As OLEObject Set check = hoja.OLEObjects("ceramica") check.Object.Caption = ("Cerámica") With check .Top = hoja.Range("I3").Top .Left = hoja.Range("I3").Left .Height = hoja.Range("I3").Height * 2 End With End Sub -------- No suelo crear mucho código en las hojas y preferí crear el código de filtro en un modulo que luego es llamado desde el código de la hoja, este seria el modulo: Sub filtro_ceramica() Dim hoja As Worksheet Set hoja = ThisWorkbook.Worksheets("Tabla Dinamica") Dim check As OLEObject Set check = hoja.OLEObjects("ceramica") If check.Object.Value = True Then hoja.PivotTables("Tabla").PivotFields("SECCIÓN").PivotItems("CERÁMICA").Visible = False Else hoja.PivotTables("Tabla").PivotFields("SECCIÓN").PivotItems("CERÁMICA").Visible = True End If End Sub

[@jorgeov8656]

Los cursos reforzados con los videos me han parecido muy didácticos y claros. Lo que es interesante cuando cada video viene acompañado con un ejercicio para ejecutar por charla. He encontrado algunos , pero me hacen falta y no se donde están. Me refiero a los que acompañan a VBA para Excel

[@orlandopautasso12]

EXELENTE VIDEO, MUY BIEN EXPLICADO!!!!!!

[@jkar13]

Muy buen aporte para cada uno de los que venimos entrando a este mundo de vba. Solo que si pudiera subir un video con la manipulación de Slicers estaría genial! como bloquear una de esas opciones o como hacerlas invisibles aunque en la pivot table original este... Muchas gracias

[@Ubermensch-nw3iv]

Excelente video muchas gracias

[@darwinrivera8595]

Enserio sos un groso.... Gracias por explicar tan fácilmente estos procesos de programación.

[@pildorasinformaticas]

Gracias a ti por el comentario. Un saludo!!

[@vicewohl]

Saludos, junto con saludar y agradeciendo por los cursos que brindas para aprender VBA, queria consultarte lo siguiente, a la espera de que sigan vigentes a los comentarios de este video: En el min 21:50 al extraer la macro que genera la tabla dinámica, en nuestro caso la tabla dinámica 2 por que se creo una antes (TableName), en mi caso yo grabe una macro para extraer el código y poder usarlo muchas veces más (por lo que se crearian más T-Dinámicas), el problema esque el código quedaría obsoleto para volver a crear dicha tabla, por lo que queria consultar sobre algún objeto o comando de PivotTables o PivotCaches que entregue el número de tablas generadas anteriormente para así agregar un +1 para referirnos a la nueva que se va a crear. Saludos y muchas gracias.

[@JuanAntonioGordo]

Por cierto no te lies con la gente que no quiere aprender sino que le resuelvas su vida, es simplemente un consejo. Vivimos en el mundo del minimo esfuerzo.

[@pildorasinformaticas]

Juan Antonio Gordo Que razón tienes.

[@themiguel3144]

*Excelente..............*

[@pildorasinformaticas]

No he oído nada al respecto. ¿Habéis mirado que están las macros activadas y la configuración de seguridad de Excel correcta en esas máquinas? Un saludo

[@Edison_mm]

Muy valioso aporte, muchas gracias. Mirando el video me surge una duda......¿cómo construyo una macro para que me quite y/o me arrastre campos al área de valores por medio de checkbox?. De antemano, muchas gracias.

[@scarlethflores521]

hola,muy buen video, muy instructivo. ¿Me podría decir como puedo hacerlas manipular el orden de una columna en mi pivot?

[@asiapacifico3000]

por favor cual es el video donde se hable de como saber el nombre de la table dinamica o cual es el proceso que no lo encuentro. Gracias

[@leonorvargasvivanco6491]

excelenteeeeeee

[@pildorasinformaticas]

LEONOR VARGAS VIVANCO Gracias !!

[@valentinbunualeslacruz297]

Sabe alguien el link para descargar el libro Articulos con el que trabaja en este video tutorial. Gracias

[@JuanAntonioGordo]

Por cierto tu explicación de lo que es una tabla dinámica fuera del VBA es genial Se nota que no has dado ni una clase jejejeje

[@jeanvaljean6468]

😡

[@malvercar]

Muy buen vídeo. Como puedo manipular el vba para q en el campo de suma en lugar de número los valores sean de texto? Me explicó. Si una persona tiene agrandado una cita en cierta fecha, en el campo de suma aparezca el nombre de la cita.

[@pildorasinformaticas]

Carlos Maldonado Hola !! Pues lo siento pero no entiendo bien la pregunta. ¿Podrías intentar explicarlo de otra forma a ver si lo entiendo? Un saludo

[@malvercar]

Gracias por contestar a mi pregunta y me explicó. Si Carlos Maldonado tiene citado día 12/08/2015 con el dentistas y así con esos datos, en la tabla dinámica en el área de filas aparezca "Carlos Maldonado" en el área de columnas "12/08/20115" y en el área de la sumatoria "dentista" claro q los datos en la matriz sería nombre: fecha: asunto:esperó q me allá podido explicar.

[@fiorellamilla6920]

Una pregunta: el promedio es la suma de números dividida por la cantidad de números que hay, si me explico bien. En el minuto 14:50 aprox del video, al hacer el promedio de la columna "general", sale 142,3071716, pero el promedio correcto no es 145,9766625 acaso ? Por qué Excel dá otro resultdo?

[@pildorasinformaticas]

Fiorella Milla Hola !! ¿No habrás insertado algún artículo más? Por que a mi me da siempre 142,3071716 Un saludo

[@fiorellamilla6920]

pildorasinformaticas No, nada. Fue mi error. Estaba haciendo la operación manualmente aparte sólo para comprara con Excel y estaba yo considerando solamente la suma del Total General vertical SIN la del Total General Horizontal. He visto que para cambiar la operación matemática que hace Excel por defecto, puedo colocarme en cualquier celda de la tabla dinámica, correcto ?

[@pildorasinformaticas]

Correcto !! Un saludo

[@jeanvaljean6468]

😮😮😮🙄🙄🤦‍♂️🤦‍♂️

[@jeanvaljean6468]

@@fiorellamilla6920 🙄🙄🙄🙄

[@computacionfacil9254]

Excelente, lo que necesito hacer en vba para excel 2007, es que al filtrar la tabla dinamica 1, en tabla dinámica 2 aparezca el mismo filtro. Podrías ayudarme???

[@edisonvladmir7766]

Amigo una pregunta: ¿Existe alguna manera de reflejar el solo el último registro de cada sección (CERAMICA, CONFECCION, DE DEPORTE, FERRETERIA, etc.) mediante el uso de tablas dinámicas? ...me refiero a que se muestre solamente el ultimo valor de cada sección, es decir se vean las fila 7, fila 15, fila 24, fila 32, fila ...n y las otras se oculten.

[@pildorasinformaticas]

Que yo sepa, no. No se me ocurre que función utilizar para obtener los últimos registros de cada grupo.

[@YY1SBG]

Saludos Juan, ante todo Felicitaciones por tu excelente canal, un gran aporte!! Tengo una duda, más que duda un problema en este ejercicio. he seguido todos los pasos llegando al punto en el que programo los botones de radio para cambiar el cálculo, actualizo el código de los 4 botones cambiando el caption y el nombre del PivotFields a buscar en cada With de cada uno de los botones con el nombre "Cálculo" exactamente en el miuto 19 comentas que hay que cambiar también desde Excel la configuración del campo de valor con el mismo nombre "Cálculo" bien todo eso lo hago pero aparentemente esto último no lo hace es decir no retiene el cambio que le hago al nombre del campo de valor desde excel por ello cada vez que pulso uno de los botones de radio al ejecutar el código no encuentra el PivotField que debería ser para todos los botones "Cálculo" pero en lugar de eso Excel le vuelve a dar el nombre original. Mi pregunta es si desde código VBA se puede corregir esto, ¿se puede almacenar en una variable el nombre del PivotField apenas entre al código del botón y usar esta variable en el With - End With? Cómo se podría hacer eso o simplemente desde Excel, estoy usando Excel 2013. Gracias Juan...

[@pildorasinformaticas]

Hola: excepto por la tilde que le pones al campo Cálculo, no sabría decirte cuál es el problema. Esta cuestión en concreto da igual la versión de Excel que utilices. Respecto a guardar el nombre de un campo en una variable y utilizarlo después desde código, no lo he intentado nunca que yo recuerde. No sabría decirte si tendría éxito o no. Siento no ser de más utilidad en esta ocasión. Un saludo!!

[@YY1SBG]

Gracias Juan, si logro solventa, les aviso, por si hay alguien le ocurriera...

[@gabrieleduardobeltranesqui9316]

Hola, buenas tardes ¿Cómo puedo hacer que una tabla dinámica no se expanda cuando se actualiza? ¿Existe algún código en Visual Basic?

[@rpb9486]

Hola: Sabrás que inconveniente hay con las máquinas de marca HP con las Macros, una amiga hizo sus macros unas con grabadoras y otras con VBA y no funcionaban intentó en otras máquinas y funcionan sin ningún inconveniente. El único carácter homogéneo que encontramos para que no funcione fue la marca de la máquina ya que con otras marcas no tuvimos inconveniente.

[@jeanvaljean6468]

😮😮😮

[@JoseNunez-hd6xv]

Hola excelente canal, tenguna duda sobre un ejercicio que no puedo realizar en excel, ya busque en internet y nada soluciona, necesito realizar una macro que me pueda crear 4 tablas dinamicas cada una en una hoja diferente. Pero me da error, creo que es la tabla dinamica lo que ocasiona el error, me sale en amarillo en VBA lo siguiente: ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ "Empleados_C!R1C1:R149C13", Version:=xlPivotTableVersion15).CreatePivotTable _ TableDestination:="r-a!R1C1", TableName:="Tabla dinámica1", DefaultVersion _ :=xlPivotTableVersion15 Que puediera hacer? tiene alguna solución? de antemano gracias

[@juancesarsolanofranco9322]

Hola Juan, Mi consulta es tabla dinamica y su origen o fuente de datos. Estimado, como sabemos toda tabla dinamica tiene su origen o fuente de datos , según su rango o nombre del rango. Pero mi problema es que cuando quiero ingresar mas informacion en la fuente de datos de origen tengo que estar cambiando manualmente el nombre del rango existente. No hay una manera de que ese rango existente acepte o incorpore automaticamente esa nueva informacion ? Saludos.

[@pildorasinformaticas]

JUAN CESAR SOLANO FRANCO Hola !! Yo conozco dos formas de hacer esto. La primera es convertir el rango de la fuente de datos en tabla, desde el menú convertir datos en tabla de Excel. De esta forma si en un futuro agregas más registros a la fuente de datos, estos serán reconocidos automáticamente por la tabla dinámica como parte de la fuente de datos. La segunda forma que conozco es programando en VBA. Utilizando la propiedad CurrentRegion del objeto Range, para que reconozca las celdas adyacentes a una celda dada. Esto es más complejo, lo explico en el curso de VBA. Un saludo

[@juancesarsolanofranco9322]

Hola Juan, por favor apoyame con lo siguiente : Quisiera hacer un codigo vba en hoja excel que con solo poniendo la primera letra de una palabra, luego aparezca completamente . ejemplo: d = deposito . Si yo pongo "d "en cualquier celda de la columna E:E me salga automaticamente la palabra "deposito". ¿cual seria el código ? Saludos

[@juancesarsolanofranco9322]

Muchas gracias de antemano. Me sirvio mucho tu ultima respuesta. Saludos

[@pildorasinformaticas]

Hola. En el editor VBA, haz doble clic en la hoja donde quieras que funcione lo que pides y pega este código: Private Sub Worksheet_Change(ByVal Target As Range) ActiveCell.Offset(-1, 0).Select ActiveCell.Offset(1, 0).Select End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If ActiveCell.Value = "d" Then ActiveCell.Value = "depósito" End If End Sub

[@pildorasinformaticas]

Hay que introducir la "d" en la celda y pulsar enter Un saludo

[@JuanAntonioGordo]

me encanta ver como se raja la gente de tus videos, no lo digo xq sean malos. lo que me llama la atención es por ejemplo este que tiene 11172 visualizaciones y en el video 42 solo 5727, esto indica que solo seguimos los fieles jeje. Me imagino que entran aquí con el atractivo titulo de tablas dinámicas y cuando ven el contenido se rajan por no haber seguido tus magnificos videos anteriores. Pais de vagos. jeje

[@carloszapata2055]

+Juan Antonio Gordo Pésimo comentario.

[@pedrolopezgonzales3611]

Como haces para crear una tabla dinámica si tu base de datos aumenta. Por ahora al grabar la macro también se ha grabado el rango que seleccionaste, pero si en un futuro la base aumenta? seguirá apuntando al mismo rango.

[@pildorasinformaticas]

Hola ! A lo largo del curso se ven diferentes técnicas de seleccionar rangos dinámicos. Utilizando Range("a1").CurrentRegion.Select podremos seleccionar un rango dinámico en la BBDD para que tenga las filas que tenga siempre se seleccione en su totalidad. En la práctica final de este curso se trata este asunto. Un saludo

[@pedrolopezgonzales3611]

pildorasinformaticas Hola, ok lo veré muchas gracias. Qué número de practica final o video es?

[@pildorasinformaticas]

No recuerdo exactamente en que vídeo hablo de esto en concreto. La práctica finaliza en el vídeo 53 (creo). Si vas a las listas de reproducción, verás todos los vídeos que forman parte del curso. Un saludo

[@pedrolopezgonzales3611]

pildorasinformaticas ok, muchas gracias!

[@William-ContabilidadFaroConsul]

[@juancesarsolanofranco9322]

Estimado Juan, por favor necesito que me apoyes con un ejemplo de macro o código VBA que pueda consolidar dos hojas excel ( una de ingreso y otra de gastos) en una sola tabla dinámica . Alguien que conozca, por favor . Saludos

[@pildorasinformaticas]

JUAN CESAR SOLANO FRANCO El código VBA que hace esto quizás sea demasiado largo para ponerlo por aquí. Para hacer lo que tú pides puede que sea suficiente con utilizar la función consolidar (versión 2013) o consolidación de datos (versiones antiguas) disponible en la ficha datos antes de realizar la tabla dinámica. Es decir, primero consolida los datos de dos o mas hojas en una sola utilizando la función consolidar, y después realiza la tabla dinámica. Si por motivos X necesitas esto pero en código VBA, entonces pon a grabar una macro y realiza las acciones antes descritas. verás que en el editor de VBA la grabadora de macros te ha creado un módulo con el código VBA. Todo lo necesario para hacer esto se explica en mi curso de programación VBA Excel. Un saludo

[@juancesarsolanofranco9322]

Hola Juan.Gracias por tu respuesta; Bueno es usando el codigo Vba. He realizado la grabacion para macro. Pero al ver el codigo terminado por la grabacion, se me hace complejo realizar algun cambio a mi gusto del codigo , ya que no lo manejo muy bien. Si tuvieras algún codigo vba de consolidacion, facil de entender por favor responder. Saludos

[@juancesarsolanofranco9322]

este es mi correo : [e-mail] Para enviar el codigo . Gracias