VINCULAR VARIOS COMBOBOX EXCEL VBA - UBIGEO PERÚ
Mediante el uso de programación vba he desarrollado un aplicativo el cual permite seleccionar la ubicación geografica (Perú) desde un formulario. Esto se logra vinculando varios combobox.
El libro esta conformado por 3 hojas que son DEPARTAMENTO, PROVINCIA, DISTRITO en donde esta almacenada la información que mostraremos en el formulario.
Cada una de ellas tiene un codigo que lo identifica.
Por ejemplo:
-Hoja "departamento": se encuentra "Lima" y su codigo es "15"
-Hoja "Provincia": se encuentra la provincia de "Barranca" con su codigo de provincia igual a "02" y su codigo de departamento "15" (Codigo 15 es Departamento Lima) .
-Hoja "Distrito": Se encuentra "Paramonga" con codigo de distrito "02", codigo de provincia "02" y codigo de departamento "15".
Y asi sucesivamente, cada distrito esta amarrado a una provincia y este a su vez a un departamento mediante el codigo. Esto permite identificar la relacion que existe entre ellos ala hora de seleccionarlos en el formulario.
Vamos a pasar a mostrar el formulario, presionamos el boton de color azul "UBIGEO" que esta dentro de la hoja "DEPARTAMENTO", se abrira el formulario el cual nos muestra 3 combobox que hacen lo siguiente.
Al seleccionar un departamento nos muestra todas las provincias que
pertenecen a ese departamento, y al seleccionar provincia nos muestran
todos los distritos que pertenece a el departamento y provincia
elegidas.
CODIGO
Si desean adaptar este libro para sus respectivos paises, pueden reemplazar la información que se encuentra en cada hoja., luego entran al editor de Visual basic mediante la combinacion de teclas Alt+ f11.
Y cambiamos el siguiente código que esta encerrado en color amarillo. ya que ahi selecciona el rango de las celdas que contiene informacion de los departamentos.
Aqui les dejo el link del aplicativo: Descargar Ubigeo en excel
Sitio web dedicado a la enseñanza y desarrollo de aplicaciones y tutoriales en Microsoft excel con VBA
jueves, 4 de septiembre de 2014
miércoles, 20 de agosto de 2014
Funcion contar.si
FUNCION CONTAR.SI
Descripcion: Cuenta las celdas, dentro del rango, que no están en blanco y que cumplen los criterios especificados.
Sintaxis
CONTAR.SI(rango;criterio)
Para su mayor comprensión vamos a realizar un ejemplo de dicha función.
Celda D20: En esta celda muestra la cantidad de alumnos que hay por cada distrito desde el rango D8:D16, la formula seria la siguiente =CONTAR.SI($D$8:$D$16,C20)
$D$8:$D$16= Rango a contar.
C20: Referencia de la celda que contiene el nombre del distrito.
Se copia la formula hasta la celda D26
Celda H20: Cuenta la cantidad de alumnos segun el sexo en el rango C8 a C16.
La formula seria la siguiente: =CONTAR.SI(C8:C16,"M")
Celda H23: Cuenta la cantidad de alumnos aprobados o desaprobados tomando como rango H8:H16
La formula seria la siguiente: =CONTAR.SI(H8:H16,">10")
Descripcion: Cuenta las celdas, dentro del rango, que no están en blanco y que cumplen los criterios especificados.
Sintaxis
CONTAR.SI(rango;criterio)
Para su mayor comprensión vamos a realizar un ejemplo de dicha función.
$D$8:$D$16= Rango a contar.
C20: Referencia de la celda que contiene el nombre del distrito.
Se copia la formula hasta la celda D26
Celda H20: Cuenta la cantidad de alumnos segun el sexo en el rango C8 a C16.
La formula seria la siguiente: =CONTAR.SI(C8:C16,"M")
Celda H23: Cuenta la cantidad de alumnos aprobados o desaprobados tomando como rango H8:H16
La formula seria la siguiente: =CONTAR.SI(H8:H16,">10")
Obtener nombre de mes en excel vba
Si bien es cierto se puede obtener el nombre del mes mediante la función texto:
Por ejemplo: =TEXTO("20/08/2014","MMMM").
Pero en ocasiones cuando deseamos trabajar con formularios en vba deseamos mostrar los meses del año en texto Enero a Diciembre en texto.
En este caso utilizaremos la funcion MonthName
Sintaxis:
MonthName(Month As Long,[Abbreviate as Boolean=Falso])As String
Parametros
Month: Ingresar un numero para el nombre del mes por ejemplo de 1 a 12
Abbreviate: Valor booleano verdadero o falso, al elegir verdadero se abrevia: Ejemplo Ene,Feb
Ejemplos:
Crearemos un formulario en excel vba para eso realizamos los siguientes pasos:
-Alt + F11
-Menu Insertar - > UserForm
Insertaremos 2 cotroles: un cuadro combinado llamado ComboBox1 y un boton llamado CommandButton1.
Vamos a cargar en el combobox1 los meses del año de enero a diciembre. Al darle clic en CommandButton1 se cargaran los meses del año en texto.
Private Sub CommandButton1_Click()
Dim i As Integer
For i = 1 To 12
ComboBox1.AddItem MonthName(i, False)
Next i
End Sub
Espero les haya sido de utilidad
Por ejemplo: =TEXTO("20/08/2014","MMMM").
Pero en ocasiones cuando deseamos trabajar con formularios en vba deseamos mostrar los meses del año en texto Enero a Diciembre en texto.
En este caso utilizaremos la funcion MonthName
Sintaxis:
MonthName(Month As Long,[Abbreviate as Boolean=Falso])As String
Parametros
Month: Ingresar un numero para el nombre del mes por ejemplo de 1 a 12
Abbreviate: Valor booleano verdadero o falso, al elegir verdadero se abrevia: Ejemplo Ene,Feb
Ejemplos:
Crearemos un formulario en excel vba para eso realizamos los siguientes pasos:
-Alt + F11
-Menu Insertar - > UserForm
Insertaremos 2 cotroles: un cuadro combinado llamado ComboBox1 y un boton llamado CommandButton1.
Vamos a cargar en el combobox1 los meses del año de enero a diciembre. Al darle clic en CommandButton1 se cargaran los meses del año en texto.
Private Sub CommandButton1_Click()
Dim i As Integer
For i = 1 To 12
ComboBox1.AddItem MonthName(i, False)
Next i
End Sub
jueves, 10 de abril de 2014
CURSO EXCEL 2010 - CLASE # 3 Operaciones con archivos
Esta clase trata de operaciones con archivos como crear, guardar, cerrar y abrir un archivo de excel.
Cabe resaltar que todas estas opciones se encuentran dentro de la pestaña archivo.
Iremos realizando paso a paso cada una de estas operaciones con los archivos de excel. Sin duda es lo basico que debemos aprender para no tener ningún problema a la hora de trabajar con excel.
sábado, 15 de febrero de 2014
Curso excel 2010 - Clase # 2 Interfaz
La interfaz de excel 2010 es el entorno donde se realiza todo el trabajo con esta aplicación. En este entorno podemos encontrar los siguientes elementos:
La barra de herramientas de acceso rapido
Banda de opciones
Menu archivo
Barra de titulo
Area de trabajo
lunes, 3 de febrero de 2014
Personalizar Guardar datos con separador de comas en excel
Una de las opciones de Microsoft excel es poder guardar el libro en diferentes tipos de archivo, esta vez trabajaremos con el tipo "CSV (Delimitado por comas). El cual podemos abrir con notepad y exportarlo a otros programas de base de datos como Sql server y tantos otros que existen.
Muy bien, pero no solamente podemos delimitarlo por comas (,) si no también por otros tipos de caracteres, como por ejemplo el pipe ( | ).
Para eso realizaremos los siguientes pasos.
1. Nos dirigimos al panel de control
2.Clic en Configuración regional y de idioma
Nos aparecerá una ventana como esta
3.clic en el botón que dice Configuración adicional...
Y nos aparecera una nueva ventana como esta
4. Nos dirigimos a la lista desplegable llamada: Separador de listas
Y cambiamos la coma ( , ) por el pipe ( | ), se escribe con la combinación de teclas alt + 124
Una vez hecho el cambio le damos aceptar a las dos ventanas.
Ahora nos dirigimos a Microsoft excel donde se encuentra la información que queremos guardar
Damos clic en guardar como
Y en tipo elegimos: CSV (Delimitado por comas), le damos clic en guardar
Luego abrimos el archivo guardado con Notepad. Y listo nos quedará así
De este modo tenemos listo nuestro archivo para poder exportarlo a otro programa de base de datos.
Para poder poner como delimitador de lista la coma ( , ) se debe realizar los pasos anteriores en el panel de control.
Muy bien, pero no solamente podemos delimitarlo por comas (,) si no también por otros tipos de caracteres, como por ejemplo el pipe ( | ).
Para eso realizaremos los siguientes pasos.
1. Nos dirigimos al panel de control
2.Clic en Configuración regional y de idioma
Nos aparecerá una ventana como esta
3.clic en el botón que dice Configuración adicional...
Y nos aparecera una nueva ventana como esta
4. Nos dirigimos a la lista desplegable llamada: Separador de listas
Y cambiamos la coma ( , ) por el pipe ( | ), se escribe con la combinación de teclas alt + 124
Una vez hecho el cambio le damos aceptar a las dos ventanas.
Ahora nos dirigimos a Microsoft excel donde se encuentra la información que queremos guardar
Damos clic en guardar como
Y en tipo elegimos: CSV (Delimitado por comas), le damos clic en guardar
Luego abrimos el archivo guardado con Notepad. Y listo nos quedará así
De este modo tenemos listo nuestro archivo para poder exportarlo a otro programa de base de datos.
Para poder poner como delimitador de lista la coma ( , ) se debe realizar los pasos anteriores en el panel de control.
viernes, 17 de enero de 2014
Como saber si una celda tiene formula o funcion
Indicar.celda - Validar si una celda contiene formulas o funciones
Si en alguna ocasión alguien ha necesitado validar si una celda contiene una formula o función, estan en el post indicado.
En esta oportunidad mostrare un videotutorial, donde explicare detalladamente como realizarlo, utilizando la macrofunción indicar.celda.
Valido para Versiones de excel: 2007, 2010 y 2013
Fuente: Canal de youtube Cursoslab
Cargar registros de una hoja en ListView Excel VBA
Ejemplo en Excel VBA donde se cargara una lista de paises a un listview. Esto se realizara al cargar el formulario.
Para eso ncesitamos los siguientes controles.
- Userform
- Listview
- Button
Para insertar el listview damos clic derechoa nuestra caja de herramientras y nos saldra Controles adicionales..., presionamos en esa opcion y nos aparecera un cuadro como este.
En esta ventana seleccionamos la opción que dice: " Microsoft Listview Control 6.0 (SP6)
Y nos cargara la herramienta listview con la que trabajaremos
Nos vamos a codigo e insertamos el siguiene codigo
Private Sub UserForm_Initialize()
Me.ListView1.Width = 295
With ListView1
.Gridlines = True ' Activa las lineas por cada fila
.View = lvwReport 'En modo reporte
.FullRowSelect = True ' permite seleccionar una fila completa
.ColumnHeaders.Add Text:="CODIGO", Width:=40
.ColumnHeaders.Add Text:="PAIS", Width:=240
End With
Call Actualizar
End Sub
Sub Actualizar()
Dim i As Integer
Dim UFila As Integer
Dim item As ListItem
With Sheets("Paises")
UFila = .Range("A2", .Range("A2").End(xlDown)).Count
For i = 2 To UFila
Set item = ListView1.ListItems.Add(Text:=.Cells(i, 1))
item.SubItems(1) = .Cells(i, 2)
Next i
End With
End Sub
Private Sub CommandButton1_Click()
End
End Sub
Pueden encontrar el ejemplo en la siguiente ruta:
Cargar registros a un listview con excel vba
Para eso ncesitamos los siguientes controles.
- Userform
- Listview
- Button
Para insertar el listview damos clic derechoa nuestra caja de herramientras y nos saldra Controles adicionales..., presionamos en esa opcion y nos aparecera un cuadro como este.
En esta ventana seleccionamos la opción que dice: " Microsoft Listview Control 6.0 (SP6)
Y nos cargara la herramienta listview con la que trabajaremos
Nos vamos a codigo e insertamos el siguiene codigo
Private Sub UserForm_Initialize()
Me.ListView1.Width = 295
With ListView1
.Gridlines = True ' Activa las lineas por cada fila
.View = lvwReport 'En modo reporte
.FullRowSelect = True ' permite seleccionar una fila completa
.ColumnHeaders.Add Text:="CODIGO", Width:=40
.ColumnHeaders.Add Text:="PAIS", Width:=240
End With
Call Actualizar
End Sub
Sub Actualizar()
Dim i As Integer
Dim UFila As Integer
Dim item As ListItem
With Sheets("Paises")
UFila = .Range("A2", .Range("A2").End(xlDown)).Count
For i = 2 To UFila
Set item = ListView1.ListItems.Add(Text:=.Cells(i, 1))
item.SubItems(1) = .Cells(i, 2)
Next i
End With
End Sub
Private Sub CommandButton1_Click()
End
End Sub
Pueden encontrar el ejemplo en la siguiente ruta:
Cargar registros a un listview con excel vba
Macro para Consolidar varios libros en uno solo
A quien no le ha pasado que cuando trabaja con excel y necesita consolidar varios archivos que tienen el mismo formato deben hacerlo uno por uno, ya que excel no les da la opcion de consolidar varios archivos en uno solo. Y eso hace que uno demore más su trabajo y tenga que pasarse mas tiempo realizando ese trabajo.
pero...
¿En que versiones de excel puedo utilizarlo?
Bien, la macro esta hecha para que puedan ser usado en Microsoft excel 2007 en adelante.
Y solo aceptan archivos con la extension "*.xlsx"
¿Cómo funciona?
Bien empezemos explicando como funciona y de que manera podemos aplicarlo a nuestro trabajo.
Descargamos y abrimos el archivo
Para ejecutar la macro tenemos presionamos ALT + F8.
-Elegimos la macro "Open Files" y luego clic en el boton ejecutar.
-Pedirá el o los archivos que deseas consolidar
Luego de esto la macro unificara todos los archivos que seleccionaste en uno solo.
Espero te haya servido esta macro.
Puedes descargar el programa desde este enlace:
Consolidar multiples archivos en uno solo
pero...
¿En que versiones de excel puedo utilizarlo?
Bien, la macro esta hecha para que puedan ser usado en Microsoft excel 2007 en adelante.
Y solo aceptan archivos con la extension "*.xlsx"
¿Cómo funciona?
Bien empezemos explicando como funciona y de que manera podemos aplicarlo a nuestro trabajo.
Descargamos y abrimos el archivo
Para ejecutar la macro tenemos presionamos ALT + F8.
-Pedirá el o los archivos que deseas consolidar
Luego de esto la macro unificara todos los archivos que seleccionaste en uno solo.
Espero te haya servido esta macro.
Puedes descargar el programa desde este enlace:
Consolidar multiples archivos en uno solo
martes, 14 de enero de 2014
Curso excel 2010 - Clase #1 Introducción
Sean bienvenidos al curso de Microsoft Excel 2010.
Empezando con la serie de videos de este curso, iniciamos con el video # 1, en el cual explicamos el concepto de excel y las hojas de calculo, Para que nos sirve y como podemos darle uso en los diferentes ambitos de nuestra labor y estudios.
Además te enseño las distintas maneras de abrir el programa Excel.
Acerca de Exceltutos
Exceltutos es un blog que nace con la idea de aportar al mundo de internet la enseñanza del programa Microsoft excel, y esta dirigida a aquellas personas autodidactas que deciden aprender por esta via muy utilizada actualmente en todo el mundo.
¿Que cosas se publicaran aqui?
Se publicaran cursos de excel tanto basico, intermedio, y avanzado. Utilizando las funciones de excel y Visual basic para aplicaciones (VBA)
¿Con que versión de excel se trabajaran?
Se trabajara normalmente con las versiones de excel de 2007 al 2013, aunque también se incluye la version 2003
Formatos de contenidos
Los formatos en los que se publicaran los contenidos seran en forma escrita, video y se subiran archivos de ejemplo para que el usuario pueda trabajar.
¿Quién esta detras de todo esto?
Bueno, dejenme presentarme. Mi nombre es Freddy y soy programador en programas como visual basic, SQL server. Pero hago constante uso de la herramienta Microsoft excel, es por eso que me animé a crear este blog, para que otras personas que estan iniciando en el mundo de excel puedan resolver sus dudas, aprender un poco más. Y por mi parte seguir aprendiendo cada dia mas de este programa que es muy utilizado en muchos ambitos, como en las universidades, colegios, empresas financieras, contables etc. (Y asi me pasaria listando varias más)
Los invito a todos a disfrutar de este blog, y ayudarme a mejorarlo cada día con sus sugerencias, comentarios (buenos o malos)y aportes.
Suscribirse a:
Entradas (Atom)
Cargar multiples archivos txt en SSIS
Fuentes Archivos planos Descargar AQUÍ los archivos Consulta SQL de creacion de tabla Despacho en SQL Server CREATE TABLE [dbo].[Despacho]...
-
Macro para crear un libro de Excel por cada filtro Puedes decargar la macro desde este link
-
En este video explico como utilizar la macro que sirve para transformar información que se encuentra de manera horizontal a vertical, esto e...
-
Ejemplo en Excel VBA donde se cargara una lista de paises a un listview. Esto se realizara al cargar el formulario. Para eso ncesitam...