27 de agosto de 2015
Aplicar formatos personalizados para expresar números en miles, millones, millardos, billones en una tabla dinámica
El manejo de tablas dinámicas se ha globalizado, y en la sección de valores encontraremos con frecuencia cifras altas que hacen parte de nuestro análisis.
Algunas personas les gusta ver estas enormes cifras expresadas en Miles, Millones, Millardos o Billones; es por eso que en esta nueva publicación aprenderemos a aplicar formatos numéricos para lograr esta conversión.
Antes de comenzar conoceremos los formatos numéricos que se usarán
Recomendamos visitar nuestra publicación ¿Cómo definir formatos personalizados en Excel? , la cual le ayudará a aprender cómo aplicarlos para celdas o rangos.
Para nuestro ejercicio, tenemos actualmente una tabla donde los valores se encuentran en el cuadrante 'VALORES' de la tabla dinámica y lo hemos llamado Suma de Saldo Final (tercera columna a la derecha). Deseamos verlos en Millones , ¿Qué debemos hacer?
Seguir los siguientes pasos:
1. Los pasaremos a millones, por lo tanto el formato personalizado es #.###,0.. con 2 decimales sería #.###,00.. con 3 decimales sería #.###,000.. pueden observar que el número de decimales depende de la cantidad de ceros que coloquemos en nuestro formato personalizado.
Nota: Si no aparece la lista de campos, ubíquese dentro de la tabla dinámica, haga clic derecho y elija la opción Mostrar lista de campos.
3. En la nueva ventana que aparece, elija la opción Formato Numérico.
4. Ahora debemos aplicar nuestro formato personalizado, por lo tanto debemos elegir la categoría Personalizada y posteriormente en la casilla Tipo colocar nuestro formato personalizado #.###,0.. luego haga clic en aceptar.
Podemos cambiar el formato personalizado las veces que deseemos.
Esperamos que este instructivo haya sido de utilidad para ustedes.
Ver Video a continuación.
Si te gustó, síguenos en Twitter para recibir nuestras actualizaciones y trucos
27 de enero de 2015
Ordene alfabéticamente las hojas de un libro de Excel
Tener gran cantidad de hojas en nuestros libros de Excel se ha vuelto una necesidad en nuestras labores , ya sea que manejemos una lista de vendedores, proveedores , alumnos , productos , etc y que en realidad sea necesario tenerlas.
Ahora es posible por medio de una sencilla macro organizar nuestras hojas en orden alfabético ya sea ascendente o descendente.
Para nuestro ejemplo, tenemos un libro de Ventas por Vendedor que es necesario actualizar constantemente, porque se han retirado personas e ingresado nuevas , cada hoja tiene como nombre el vendedor con su respectivo detalle.
Organizarlo manualmente es una posible solución , pero sería muy laborioso buscar un vendedor hoja por hoja, que tal alfabéticamente ?
Ahora, haremos nuestra macro
1. Debemos abrir el editor de Visual Basic , existen varios métodos para abrirlo:
* A través del botón Visual Basic de la ficha Programador
* A través del atajo de teclado: ALT + F11
2. Crearemos un nuevo módulo (Insertar / Módulo)
3. Ahora, colocaremos nuestro código:
Forma ascendente
Ahora en forma descendente
Lo único que falta es probarlas
Luego de tener nuestras macros ya creadas , las podemos visualizar por medio de la pestaña Vista / Macros / Ver macros
Así quedarían nuestras hojas
Ascendente:
Descendente:
Si te gustó, síguenos en Twitter para recibir nuestras actualizaciones y trucos 3. Ahora, colocaremos nuestro código:
Forma ascendente
Sub
Ordenar_HojasAscendente()
For
i= 1
To
Sheets.Count
For
j = i + 1
To
Sheets.Count
If
UCase(Sheets(i).Name) > UCase(Sheets(j).Name)
Then
Sheets(j).Move Before:=Sheets(i)
End
If
Next
j
Next
i
End
Sub
Nuestro código utiliza dos variables para recorrer todas las hojas. La variable “i” indica la hoja actual y la variable “J” será la hoja siguiente a la hoja actual. La función Ucase convierte en mayúsculas el nombre de ambas hojas para poder compararlas correctamente y utilizamos el operador mayor que (>) para saber si la hoja actual es mayor que la hoja siguiente.
Ahora en forma descendente
Sub
Ordenar_HojasDescendente()
For
i = 1
To
Sheets.Count
For
j = i + 1
To
Sheets.Count
If
UCase(Sheets(i).Name) < UCase(Sheets(j).Name)
Then
Sheets(j).Move Before:=Sheets(i)
End
If
Next
jNext
i
End
Sub
Lo único que falta es probarlas
Luego de tener nuestras macros ya creadas , las podemos visualizar por medio de la pestaña Vista / Macros / Ver macros
Así quedarían nuestras hojas
Ascendente:
Suscribirse a:
Entradas (Atom)