Mostrando entradas con la etiqueta macros. Mostrar todas las entradas
Mostrando entradas con la etiqueta macros. Mostrar todas las entradas

martes, 28 de mayo de 2013

Macro para modificar el ZOOM de una hoja de cálculo Excel 2007 - 2010.


Modificar el ZOOM de una hoja de cálculo en Excel 2007 y 2010.

Para aumentar o disminuir el Zoom de una hoja de cálculo en Excel 2007 y 2010 debemos utilizar los siguientes códigos:


ActiveWindow.Zoom = 10 ...El zoom de la hoja es del 10%
ActiveWindow.Zoom = 50 ...El zoom de la hoja es del 50%
ActiveWindow.Zoom = 100 ...El zoom de la hoja es del 100%
ActiveWindow.Zoom = 200 ...El zoom de la hoja es del 200%



En nuestro Curso de Macros podrás aprender a crear potentes aplicaciones que te ayudarán a ahorrar gran cantidad de tiempo al crear reportes, informes, consolidar datos, etc.


Publicaciones relacionadas: 

Macro para mostrar y ocultar las líneas de cuadrícula en Excel.


Ocultar las líneas de cuadrícula con Macro.

Para ocultar o mostrar las líneas de cudrícula con macros utilizamos los siguientes códigos:

ActiveWindow.DisplayGridlines = False - Ocultar líneas de cuadrícula

ActiveWindow.DisplayGridlines = True - Mostrar líneas de cuadrícula

La siguiente imagen muestra la hoja de Excel con las líneas de cuadrícula ocultas.


Macros para dar formato a textos y a celdas en Excel.


Macros que te servirán para dar formato a textos y a celdas en Excel.


Dar formato a textos o a celdas por medio de Macros es algo indispensable para cualquiera que se quiere iniciar en este maravilloso mundo de Macros en Excel. Los siguientes códigos te ayudarán a crear procedimientos para dar formato a tus textos.

Estos códigos trabajan con la celda activa.

ActiveCell.Font.Bold = True ...' Convierte en Negritas la fuente (texto) de la celda activa.
ActiveCell.Fonto.Bold = False ...' Desactiva las Negritas de la celda activa.


Si quieres especificar la celda que tiene que cambiar a Negritas entonces debes poner Range, Ejemplo:

Range("A1").Font.Bold = True ...'Convierte en negritas la fuente de la celda A1.


Para convertir a negritas un rango de celdas escribimos:

Range("A1:A10").Font.Bold = True ...'Convierte en negritas la fuente del rango de celdas A1:A10.


También puedes seleccionar la celda A1 y después cambiar el formato a Cursiva de la celda seleccionada:

Range("A1").Select ...'Selecciona la celda A1
Selection.Font.Italic = True ...'Convierte a Cursiva la celda seleccionada



Para subrayar el texto de la celda A1 utilizamos:

Range("A1").Font.Underline = xlUnderlineStyleSingle 


Si queremos doble subrayado:

Range("A1").Font.Underline = xlUnderlineStyleDouble


Podemos también cambiar el nombre y tamaño de la fuente de la celda A1:

Range("A1").Font.Size = 16
Range("A1").Font.Name = "Arial"




O el color de la fuente de A1:

Range("A1").Font.ColorIndex = 5 ...'Convierte a color azul la fuente de la celda A1. 
Range("A1").Font.Color = RGB( 255, 0 , 0 ) ...'Convierte a color rojo la fuente de la celda A1.




Si quieres conocer los números de color que aplican a ColorIndex sigue este link  Macro obtener los 56 colores de ColorIndex Excel VBA.


Se utiliza Interior para cambiar el color de una celda en lugar de Font:

Range("A1").Interior.ColorIndex = 5 ...'Convierte a color azul la celda A1. 
Range("A1").Interior.Color = RGB( 255, 0 , 0 ) ...'Convierte a color rojo la celda A1.




Para combinar celdas utilizamos MergeCells:

Range("A1:B1").MergeCells = True ...'Combina las celdas A1:B1.


Para descombinarlas utilizamos:

Range("A1:B1").MergeCells = False


Si deseamos ajustar el texto ponemos WrapText:

Range("A1:B1").WrapText = True ...'False si queremos deshabilitar el ajuste de texto.


Con estos sencillos códigos ya podemos crear una macro que cambie los formatos de las diferentes celdas o rangos a nuestro gusto y de manera automática.


En nuestro
 Curso de Macros podrás aprender a crear potentes aplicaciones que te ayudarán a ahorrar gran cantidad de tiempo al crear reportes, informes, consolidar datos, etc.


Contáctanos: atencioncap@ecapmexico.net
Teléfono en Guadalajara: (52) 33 1404-6565 

Macro para mostrar y ocultar títulos de filas y columnas en Excel 2007 - 2010.


Mostrar y ocultar títulos.
Si queremos ocultar los títulos de filas y columnas con macros debemos utilizar los siguientes códigos:

ActiveWindow.DisplayHeadings = False ...'Oculta títulos de filas y columnas
ActiveWindow.DisplayHeadings = True ...'Muestra títulos de filas y columnas

Para ocultar los títulos de filas y columnas al abrir un libro de Excel debemos de escribir el siguiente código en ThisWorkbook que se encuentra en el Explorador de Proyectos.


Sub
 Workbook_Open()

ActiveWindow.DisplayHeadings = 
False 

End Sub


Macro para ocultar o mostrar las barras de desplazamiento horizontal y vertical en en Excel 2007 y 2010.


Ocultar o mostrar las barras de desplazamiento horizontal y vertical en Excel 2007 y 2010.
Si queremos diseñar una hoja de cálculo donde no deben estar visibles las barras de desplazamiento horizontal y vertical debemos usar los siguientes códigos:


ActiveWindow.DisplayVerticalScrollBar = 
True ...Muestra la barra de desplazamiento vertical

ActiveWindow.DisplayVerticalScrollBar = False ...Oculta la la barra de desplazamiento vertical
ActiveWindow.DisplayHorizontalScrollBar = True ...Muestra la barra de desplazamiento horizontal
ActiveWindow.DisplayHorizontalScrollBar = False ...Oculta la barra de desplazamiento horizontal

Esta imagen muestra la hoja de cálculo con las barras de desplazamiento horizontal y vertical ocultas.





En nuestro
 Curso de Macros podrás aprender a crear potentes aplicaciones que te ayudarán a ahorrar gran cantidad de tiempo al crear reportes, informes, consolidar datos, etc.

Publicaciones relacionadas: Macro para mostrar y ocultar las etiquetas de las hojas de cálculo Excel 2007 - 2010.

Contáctanos: atencioncap@ecapmexico.net


martes, 23 de abril de 2013

Función personalizada CUENTACOLOR que sirve para contar celdas con colores.


Función CUENTACOLOR para contar celdas con colores.
Este archivo contiene la función personalizada CUENTACOLOR y sirve para contar celdas que contengan un determinado color de un reporte o base de datos.

Tiene dos argumentos:


CUENTACOLOR
 (Rango, Celda_color)



1.- Rango. Es el rango de celdas de colores.

2.- Celda_color. Es la celda donde se encuentra el color que deseamos contar.

Para que esta función trabaje en cualquier archivo de Excel es necesario instalarlo como complementos. 
Para que trabaje solo en el archivo que contiene la función simplemente habilitamos macros.





Puedes aprender cómo crear funciones personalizadas en nuestro Curso de Macros para Contabilidad, Administración y Finanzas.

Función personalizada MAXCONDICIONAL para obtener el valor máximo según una condición.


Función personalizada MAXCONDICIONAL.

La función personalizada MAXCONDICIONAL sirve para obtener el valor máximo de una lista según cierta condición.
MAXCONDICIONAL.

Sintaxis = MAXCONDICIONAL(rango_criterios, criterio, rango_resultado)

Descripción.
Busca un valor dentro de un rango y devuelve el valor máximo con respecto a un rango de resultado.

Argumentos.

Rango_criterios: Es un rango de celdas que se compone de una sola columna donde se encuentran los criterios para calcular su valor máximo.

Criterio: Es el criterio que deseamos saber su valor máximo.

Rango_resultado: Es el rango donde se van a buscar los valores máximos. (Debe ser un rango con valores numéricos).


En la siguiente imagen, tenemos una lista de clientes a los cuales les otorgamos ciertos días de crédito, es muy importante conocer cuál es el valor máximo de días vencidos para saber su estatus de crédito. Por ejemplo, el cliente ALDO RODRÍGUEZ SANZ tiene tres facturas pendientes de pago, la primera tiene más de 60 días de crédito, aunque la siguiente tiene un estatus menor y la tercera aún no ha vencido, para nosotros este cliente se considera en estado general de "> 60 Días".





Esta función es una macro, para que puedas trabajar con ella es necesario habilitar macros.
Para trabajar con esta función en cualquier archivo de Excel es necesario instalarlo como Complemento de Excel.


Esta y muchas otras funciones las podrás aprender en nuestro curso de Excel Avanzado para Contabilidad, Administración y Finanzas.

Contáctanos: atencioncap@ecapmexico.net



Macro para mostrar y ocultar las etiquetas de las hojas de cálculo Excel 2007 - 2010.


Ocultar las etiquetas de las hojas con Macro.

Cuando creamos archivos donde no es necesario mostrar los nombres de las hojas, estos códigos nos sirven para ocultar o mostrar las etiquetas de dichas hojas en Excel 2007 y 2010.

ActiveWindow.DisplayWorkbookTabs = False - Ocultar etiquetas de hojas.

ActiveWindow.DisplayWorkbookTabs = True - Mostrar etiquetas de hojas.


Si deseamos programar una macro que al abrir un archivo se oculten las etiquetas de las hojas debemos entrar a ThisWorkbook en el explorador de proyectos de Visual Basic Applications (VBA) e insertar el siguiente código.


Sub
 
Workbook_Open() 

ActiveWindow.DisplayWorkbookTabs = False

End Sub

La siguiente imagen muestra el libro sin las etiquetas de las hojas.





En nuestro
 Curso de Macros para contabilidad, administración y finanzas podrás aprender muchos códigos y macros que te ayudarán a mejorar notablemente tu trabajo diario.

Contáctanos: atencioncap@ecapmexico.net


Macro para Abrir archivos con GetOpenFilename (Cuadro de diálogo Abrir) en Excel.


Macro que muestra el cuadro de diálogo Abrir en Excel.

El siguiente código sirve para mostrar el cuadro de diálogo Abrir que nos servirá para abrir cualquier archivo, en este caso de Excel. Este tipo de macros se utilizan cuando el usuario necesita abrir libros para poder depurarlos, extraer datos, alimentar con nueva información, etc.

Este código muestra el cuadro de diálogo Abrir.   Libro = Application.GetOpenFilename




Al seleccionar el archivo y darle Abrir, la ruta donde se encuentra y el nombre se guardan en la variable Libro.



Este código abre el Libro3.

Workbooks.Open Libro


Solo copia y pega en un módulo de Visual Basic Applications esta macro:


Sub abrir_libro()  

Libro = Application.GetOpenFilename
Workbooks.Open Libro


End Sub



En nuestro Curso de Macros para contabilidad, administración y finanzas podrás aprender muchas herramientas que te ayudarán a mejorar notablemente tu trabajo diario.


Contáctanos: atencioncap@ecapmexico.net


jueves, 28 de marzo de 2013

Función personalizada BUSCARCONDICIONAL2 para buscar dos condiciones en diferentes columnas.


Función personalizada BUSCARCONDICIONAL2.

La función personalizada BUSCARCONDICIONAL2 busca dos condiciones en una matriz y devuelve el valor que corresponda según la columna de resultado.

BUSCARCONDICIONAL2.

Sintaxis = BUSCARCONDICIONAL2(matriz_buscar_en, condición1, columna1, condición2, columna2, columna_resultado)

Descripción.
Buscar dos valores dentro de una matriz, debemos asignar las columnas de búsqueda y devuelve el dato que corresponda a la columna donde se encuentra el resultado.

Argumentos.

Matriz_buscar_en: Es la tabla, rango, base de datos, donde se hará la búsqueda.

Condición1: Es el primer valor que estamos buscando.

Columna1:
 Es el número de columna de la matriz donde se hará la búsqueda de la condición1.

Condición2: 
Es el segundo valor que estamos buscando.

Columna2: 
Es el número de columna de la matriz donde se hará la búsqueda de la condición2.


Columna_resultado:
 Es el número de columna donde se encuentra el resultado deseado.

En el siguiente ejemplo utilizamos la función BUSCARCONDICIONAL2 para encontrar la venta del mes de FEBRERO de JUAN.

La condición1 es JUAN y la columna de Nombre es la 3, la condición2 es el Mes, y es la columna 1, la columna de resultado es la 2.





El resultado es 2,000.00 como se muestra en la siguiente imagen.






Esta función es una macro, para que puedas trabajar con ella es necesario habilitar macros.
Para trabajar con esta función en cualquier archivo de Excel es necesario instalarlo como Complemento de Excel.

Publicaciones relacionadas: Buscar datos en Excel con la función BUSCARV, Función personalizada BUSCARCONDICIONAL,Función personalizada BUSCARV2.

Esta y muchas otras funciones las podrás aprender en nuestro curso de Excel Avanzado para Contabilidad, Administración y Finanzas.





En este link puedes descargar el archivo Descargar BUSCARCONDICIONAL2


Función personalizada BUSCARV2 donde determinamos la columna a buscar y la de resultado.


Función personalizada BUSCARV2.

La función personalizada BUSCARV2 sirve para buscar un valor dentro de una matriz, debiendo asignar la columna de búsqueda y la de resultado.

Al trabajar con la función BUSCARV en ocasiones es necesario cambiar el orden de las columnas para que el valor buscado coincida con la primera columna de la matriz_buscar_en, con esta función BUSCARV2 ya no será necesario hacer esos cambios, ya que solo debemos asignar la columna de búsqueda.


BUSCARV2.

Sintaxis = BUSCARV2(matriz_buscar_en, valor_buscado, columna_buscar, columna_resultado, ordenado)

Descripción.
Busca un valor en una columna dentro de una matriz y devuelve el valor que coincida en la columna de resultado.

Argumentos.

Matriz_buscar_en: Es la tabla, rango, base de datos, donde se hará la búsqueda.

Valor_buscado: Es el valor que queremos buscar dentro de la matriz_buscar_en.

Columna_buscar: Es el número de columna de la matriz_buscar_en donde deseamos hacer la búsqueda

Columna_resultado: 
Es el número de columna de la matriz_buscar_en donde se encuentra el resultado.


Ordenado: Capturamos 1 ó VERDADERO si queremos encontrar el valor aproximado, 0 ó FALSO si deseamos encontrar el valor exacto.

En la siguiente imagen, estamos haciendo la búsqueda de la comisión de JUAN. Se aprecia que la matriz la estamos tomando desde la columna A, por lo tanto la columna de nombre es la 2 y la de resultado es la 4.






Esta función es una macro, para que puedas trabajar con ella es necesario habilitar macros.
Para trabajar con esta función en cualquier archivo de Excel es necesario instalarlo como Complemento de Excel.

Publicaciones relacionadas: Buscar datos en Excel con la función BUSCARV, Función personalizada BUSCARCONDICIONAL.

Esta y muchas otras funciones las podrás aprender en nuestro curso de Excel Avanzado para Contabilidad, Administración y Finanzas.


Aquí puedes descargar el archivo descargar Función BUSCARV2.


Función personalizada BUSCARCONDICIONAL para hacer una búsqueda cuando hay dos condiciones.

Hacer una búsqueda con dos condiciones con la función personalizada BUSCARCONDICIONAL.

La función personalizada BUSCARCONDICIONAL se puede decir que es una mezcla entre BUSCAR y BUSCARV. Ya que siempre devuelve el valor de la última columna de la matriz asignada y solo busca los valores exactos.

Al trabajar con la función BUSCARV en ocasiones nos sentimos frustrados ya que necesitamos hacer esa misma búsqueda pero que también cumpla con otra condición.

La función personalizada BUSCARCONDICIONAL nos va a ayudar precisamente a eso.


BUSCARCONDICIONAL.

Sintaxis = BUSCARCONDICIONAL(matriz_buscar_en, condición1, condición2)

Descripción.
Buscar dos valores dentro de una matriz y devuelve el dato que corresponda a la última columna.

Argumentos.

Matriz_buscar_en: Es la tabla, rango, base de datos, donde se hará la búsqueda.

Condición1: Es el primer valor que estamos buscando, siempre hará dicha búsqueda en la primera columna de matriz_buscar_en.


Condición2: Es el segundo valor que estamos buscando, siempre se hará la búsqueda en la seguna columna dematriz_buscar_en.


En la siguiente imagen utilizamos la función BUSCARCONDICIONAL para encontrar la comisión de JORGE del mes de FEBRERO. Simplemente con BUSCARV no lo hubiéramos podido hacer.




El código que utilizamos para crear la función BUSCARCONDICIONAL es el siguiente. Si quieres puedes copiarlo y pegarlo en un módulo dentro del mismo archivo en Visual Basic Applications. Si no estás familiarizado con estos términos solo descarga el archivo.


Function BUSCARCONDICIONAL(matriz_buscar_en As Range, Condicion1, Condicion2)     
   For I = 1 To matriz_buscar_en.Rows.Count          
      If matriz_buscar_en(I, 1) = Condicion1 And matriz_buscar_en(I, 2) = Condicion2 Then
         BUSCARCONDICIONAL = matriz_buscar_en(I, matriz_buscar_en.Columns.Count)
      End If
   Next
End Function




Esta función es una macro, para que puedas trabajar con ella es necesario habilitar macros.
Para trabajar con esta función en cualquier archivo de Excel es necesario instalarlo como Complemento de Excel.

Publicaciones relacionadas: Buscar datos en Excel con la función BUSCARV


Esta y muchas otras funciones las podrás aprender en nuestro curso de Excel Avanzado para Contabilidad, Administración y Finanzas.

Contáctanos: Atencionecap@ecapmexico.net

En este link pudes hacer la descarga del archivo Descargar archivo BUSCARCONDICIONAL

miércoles, 13 de marzo de 2013

Función personalizada UNIR para concatenar los valores de un rango.


Función personalizada UNIR.
UNIR.
Sintaxis = UNIR(rango, unión)

Descripción.
Une con un texto intermedio (espacio, pipe, diagonal, punto y coma, etc.) una serie de valores contenidos en un rango


Argumentos:

Rango = Conjunto de celdas que se van a unir.
Unión
 
= Es el texto, espacio, pipe, diagonal, punto y coma, etc. que irá en medio de los valores del rango.


Esta función UNIR sirve, al igual que CONCATENAR y AMPERSAND, para unir diferentes textos, solo UNIR es más simple ya que no tenemos que ir a cada valor y unirlo.

La siguiente imagen muestra un reporte DIOT (Declaración Informativa de Operaciones con Terceros) donde tenemos que unir todas las celdas de la fila 5 (A5:V5), podemos ver que se utilizó el signo de Ampersand "&", también se pudo utilizar la función CONCATENAR.




Aplicando la función personalizada UNIR llegamos al mismo resultado.




Otro ejemplo de esta función personalizada es cuando queremos unir los nombres y apellidos para crear nombres completos. Veamos el siguiente ejemplo:





Para aplicar esta función deben estar habilitadas las macros Habilitar Macros en Excel 2007 y 2010. 
También puedes instalar como complementos esta función para utilizarla en cualquier archivo de Excel. Instalar complementos Excel 2007 y 2010.


Publicaciones relacionadas: Función CONCATENAR de Excel, Para qué sirve el signo "&" Ampersand en Excel.


Esta y muchas otras funciones las podrás aprender en nuestro Curso de Excel Avanzado para Contadores.


CONTÁCTANOS: 
ECAP@ECAPMEXICO.NET
TELÉFONO EN GUADALAJARA:  0133 36322719 

jueves, 28 de febrero de 2013

Función personalizada ELIGE para obtener un valor de una lista según su posición.


Función personalizada ELIGE para seleccionar un valor de una lista según un número de índice. Esta función se deriva de ELEGIR de Excel.

Función ELIGE de Excel.


ELIGE.


Sintaxis = ELIGE(núm_índice, rango)

Descripción.

Selecciona un valor de una lista según su número de índice o posición.


Argumentos:

Núm_índice = Es número entero que indica la posición donde se encuentra el valor que deseamos elegir.

Rango
 
= Es la lista donde se encuentran los valores a elegir.


Esta función ELIGE se utiliza para obtener el valor de una lista cuando conocemos su posición dentro de la misma.

En esta imagen estamos utilizando un Cuadro combinado (Control de formulario) para elegir de la lista una ciudad. Si seleccionamos Guadalajara, como esta ciudad se encuentra en la segunda posición de la lista devolverá un 2 en la celda B1.




La función ELIGE la estamos configurando para que tome la posición que indica B1 dentro del rango D2:D4. El resultado de la funciónELIGE será 820.00 ya que esté valor se encuentra en el segundo lugar. Si seleccionamos Monterrey de la lista entonces devolvará 780.00.




Podemos ver el resultado de la función cuando elegimos la ciudad de Guadalajara.





Obtén el archivo de esta liga Descargar función personalizada ELIGE.


Publicaciones relacionadas: Cómo configurar un Cuadro combinado .


Esta y muchas otras funciones las podrás aprender en nuestro Curso de Excel Avanzado para Contadores.

CONTÁCTANOS: ECAP@ECAPMEXICO.NET
TELÉFONO EN GUADALAJARA:  0133 36322719

lunes, 25 de febrero de 2013

DIOT 2013 carga batch gratis.

Cómo Generar la DIOT 2013.


Para generar la carga batch de la DIOT 2013, primero se deben llenar los campos correspondientes: Tipo de proveedor, Clave tipo de operación, RFC, etc. Este archivo soporta hasta 500 registros.




Al llenar los campos solo se tiene que dar clic al botón "Generar DIOT". Nos muestra el siguiente cuadro, aquí seleccionamos el lugar donde queremos guardar el archivo, le podemos cambiar el nombre y le damos Guardar. El archivo se guardará como .txt (delimitado por tabulaciones).




IMPORTANTE:
 Para que la macro que está asignada al botón "Generar DIOT" pueda trabajar en el archivo, es necesario habilitar macros, para habilitar macros sigue este link Habilitar Macros en Excel 2007 y 2010 es un tutorial donde te explica cómo hacerlo.

Este archivo lo puedes descargar de la siguiente liga DIOT 2013 carga batch.



Ya conoces nuestro curso de Macros para Contabilidad, Administración y Finanzas?

Contáctanos: atencionecap@ecapmexico.net
Teléfono en Guadalajara: 0133 3632-2719 

viernes, 22 de febrero de 2013

Función personalizada SUMANEGATIVOS (UDF) para sumar números negativos en Excel.


Función personalizada SUMANEGATIVOS (UDF) para sumar sólo números negativos de un rango, evitando también cualquier fórmula o función de Excel.

El código de VBA (Visual Basic Applications) quedaría de la siguiente manera:




En la celda B6 insertamos la función SUMANEGATIVOS, podemos ver que el resultado es 6 ya que no está tomando en cuenta los negativos.





Aprende a crear este tipo de funciones en nuestro curso de Macros para Contabilidad, Administración y Finanzas.

CONTÁCTANOS: ATENCIONECAP@ECAPMEXICO.NET
TELÉFONO EN GUADALAJARA:  0133 36322719