{"text_format":"1","workbook":"xlsx","n_sheets":3,"sheets":["Sin Macro","Con Macro","Hoja3"],"not_rendered":{"charts":2,"images":3,"macros":1,"external_links":0,"defined_names":0,"comments":0,"pivot_tables":0},"unopened":[],"bounds":{"document_bytes":16777216,"sheet_cells":100000,"rows_first":2000,"rows_last":500,"rows_between":2000,"halvings":0,"cell_chars":16384,"cell_head_chars":4096},"cells_cut":0,"cells_raw":0,"read":"whole","date_system":"1900"}

{"sheet":"Sin Macro","index":0,"n_rows":43,"n_cols":4,"rows_kept":43,"cut":false,"hidden":false,"merged":[[1,0,1,7],[3,0,3,7],[5,0,5,7],[13,0,13,7],[42,0,42,7]]}
[]
["Gráfico Cilindro Agrupado"]
[]
["El gráfico cilindro agrupado (gráfico agrupado) es una de las herramientas integradas que proporciona Microsoft Excel para mostrar visualmente la información para revisar, compartir y analizar datos. Los gráficos agrupados reúnen información basada en diversas categorías, las tablas agrupadas muestran esos valores de lado a lado. Los gráficos agrupados se leen más fácilmente y eliminan la necesidad de cambiar entre dos gráficas separadas de información similar."]
[]
["El primer paso para la creación de un cilindro agrupado es organizar los datos de manera adecuada en nuestra hoja de Excel. Es importante no dejar filas o columnas en blanco entre los datos. A continuación se presenta un ejemplo de las ventas cuatrimestrales de una empresa en los tres países donde se encuentra."]
[]
[]
["País","Ventas C1  (S/.) ","Ventas C2  (S/.) ","Ventas C3  (S/.) "]
["Perú",10675,11034,10348]
["Argentina",13807,12345,13958]
["Chile",12799,13443,12947]
[]
["Para crear el gráfico de cilindro agrupado seleccionamos la tabla de datos, luego nos dirigimos a la ficha Insertar y pulsamos el botón Columna para seleccionar el gráfico correspondiente:"]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
[]
["Para generar el mismo gráfico en macros podemos utilizar el grabador obteniendo el siguiente código:\n\nSub CilindroAgrupado()\n    \n    Range(\"A9:D12\").Select\n    ActiveSheet.Shapes.AddChart.Select\n    ActiveChart.ChartType = xlCylinderColClustered\n    ActiveChart.SetSourceData Source:=Range(\"Hoja1!$A$9:$D$12\")\n\nEnd Sub"]

{"sheet":"Con Macro","index":1,"n_rows":17,"n_cols":4,"rows_kept":17,"cut":false,"hidden":false,"merged":[[1,0,1,7],[14,0,14,7]]}
[]
["Gráfico Cilindro Agrupado con Macros"]
[]
[]
["País","Ventas C1  (S/.) ","Ventas C2  (S/.) ","Ventas C3  (S/.) "]
["Perú",10675,11034,10348]
["Argentina",13807,12345,13958]
["Chile",12799,13443,12947]
[]
[]
[]
[]
[]
[]
["Para generar el mismo gráfico en macros podemos generar un código de la siguiente manera:\n\n1° Creamos un UserForm que contenga un RefEdit1 para ingresar el rango de datos y dos CommandButton, uno para crear el gráfico y otro para salir del UserForm.\n\n2° Creamos un CommandButton \"Crear Gráfico Cilindro Agrupado\" en la hoja activa para mostrar el UserForm. \n\n3° Dentro del UserForm definimos el código que creará el gráfico.\n\n4° Definimos nuestra variable Rango.\nDim Rango As String\n\n5° Inciamos la generación del código dentro CommandButton \"Crear\"\nPrivate Sub CommandButton1_Click()\n\n6° Usamos la estructura If Then Else, si el valor ingresado en el RefEdit1 es diferente de 0 entonces\nIf Len(Trim(RefEdit1.Text)) <> 0 Then\n\n7° La variable Rango toma el valor de RefEdit1\nRango = RefEdit1.Value\n\n8° Ordenamos la adición de un gráfico (AddChart) en la hoja activa. \n    ActiveSheet.Shapes.AddChart.Select\n\n9° Seleccionamos el tipo de gráfico (ChartType), en nuestro caso el cilindro agrupado.\n    ActiveChart.ChartType = xlCylinderColClustered\n\n10° Por último se ajusta el origen de datos indicando el rango de la tabla.\n    ActiveChart.SetSourceData Source:=Range(Rango)\n\n11° De lo contrario\nElse\n\n12° Se muestra un mensaje para ingresar un nuevo rango.\nMsgBox \"Ingrese Nuevo Rango\"\n\n13° Termina If\nEnd If\n\n14° Fin del código.\nEnd Sub"]
[]
["Entonces el código de nuestra macro queda de la siguiente manera:"]

{"sheet":"Hoja3","index":2,"n_rows":0,"n_cols":0,"rows_kept":0,"cut":false,"hidden":false,"merged":[]}