Excel y visual basic
-
Upload
egidio-mosquer-copete -
Category
Education
-
view
150 -
download
0
Transcript of Excel y visual basic
![Page 1: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/1.jpg)
Excel & visual basic
EGIDIO MOSQUERA C.
![Page 2: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/2.jpg)
Objetivo Conocer el entorno generador de código para Excel desde visual basic
Competencia:Al finalizar el primer semestre los estudiantes pueden desarrollar programas sencillos utilizando en entorno de visual Basic desde el Excel, entre estos “Realizar un programa que sirva para la elección de personeros de la institución”
![Page 3: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/3.jpg)
Proceso inicial
Ruta inicial para ingresar a Excel 2010 Inicio Todos los programas Microsoft office Microsoft Excel
Ruta para acceder al entorno de visual basic Alt + F11
![Page 4: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/4.jpg)
ESPACIO PARA INTRODUCCIR CODIGO PARA PROGRAMAR CELDAS Y HOJAS DE EXCEL
![Page 5: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/5.jpg)
Ejemplo 1:
Lo primero es guardar el libro o archivo de Excel para ello seguimos estos pasosArchivoGuardar comoLe asignamos un nombre cortoLibro de Excel habilitado para macros
![Page 6: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/6.jpg)
Ejemplo 1: código para mostrar un mensaje en una celda Escribir en el editor de código de visual basic lo siguiente:Sub prog001()activeCell.Value = “HOLA MUNDO”End sub Vamos a Microsoft Excel y seleccionamos una celda haciendo click Luego volvemos a visual basic Hecemos click en ejecutar Volvemos a Excel para mirar que ha pasado con nuestra celda
seleccionada
![Page 7: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/7.jpg)
Explicación ProcedimientoSub nombreDelprocedimiento
Sentencia 1Sentencia 2…..…..…..
End sub
![Page 8: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/8.jpg)
Explicación
ActiveCell Significa celda activa o seleccionada
activeCell.Value = “HOLA MUNDO”Significa que el valor de la celda activa
es HOLA MUNDO
![Page 9: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/9.jpg)
Ejemplo 2: Digirar el siguiente texto en el editor de código de visualSub PROG004()
Worksheets("HOJA2").ActivateActiveSheet.Range("d5").Value = "hola todos"ActiveSheet.Range("d5").Font.Bold = True
End Sub
![Page 10: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/10.jpg)
Ejemplo 3:
Estructura withNos puede servir para hacer nuestros códigos mas sencillosCuando se usa esta estructura es necesario comenzar con un punto asi:
![Page 11: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/11.jpg)
Ejemplo 3: Escribir el siguiente código en el editor de visual basic
Sub prog003()With activesheet.range(“a7”).value = “pepe”.Font.bold = true.Font.color = RGB(0,255,0)End with
End sub
![Page 12: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/12.jpg)
Ejercicio
Realice un programa en basic el cual en una celda activa escriba el nombre de los dos integrantes del equipo en color azul, rojo, en verde utilizando la negrita.
![Page 13: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/13.jpg)
Programación orientada a objetos
Objetos: Es la forma física de representar las cosas.Ejemplo: “la palabra carro” representa todos los carros del mundo entre ellos camiones, autos, buses, etc. El carro en concreto es un objeto.En Excel un objeto puede ser:WorkSheet = es un objeto de la clase “hoja de calculo”Rango = objeto “rango”Column = es otro objeto
![Page 14: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/14.jpg)
PropiedadesSon una serie de características que tienen los objetos, por ejemplo el color, textura etc.
Métodos.Hace referencia a las acciones de los objetos por ejemplo “Clear range”
El operador puntoSe utiliza para referirse a una propiedad o un método ejemploActivecell.value = “ “La lectura del código siempre se hace de derecha a izquierda
![Page 15: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/15.jpg)
Las variablesEn el basic declaramos variables anteponiendo la palabra Dim. las variables mas comunes del basic son las siguientes: Byte = Numero entero 28 esdecir de 0 - 255 Boolean = True o false Integer = entero entre – 32768 y 32768 Long = entero entre – 2147483648 y 2147483648 String = Tipo entero Double = Tipo decimal
![Page 16: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/16.jpg)
EjemplosSub programa002()
Dim vari As Stringvari = InputBox("Escriba algo")ActiveCell.Value = vari
End SubInputBox(“Mensaje")Determina la aparición de una ventana que contiene el “mensaje” y campo donde podemos escribir y luego damos aceptar
![Page 17: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/17.jpg)
Ejemplo 2
Sub programa003()Dim texto, celda As String
celda = InputBox("Escriba la celda donde quieres escribir")texto = InputBox("escribe lo que quieres que aparezca")ActiveSheet.Range(celda).Value = texto
End Sub
![Page 18: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/18.jpg)
Ejemplo 3
Sub programa004()Dim base, altura As Doublebase = InputBox("valor de la base")altura = InputBox("valor de la altura")ActiveCell.Value = base * altura
End Sub
![Page 19: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/19.jpg)
Ejercicios Escriba un código en basic que calcule el área
de un trapecio Escriba un código en basic para calcular la
longitud de una circunferencia Escriba un código en basic para calcular área y
perímetro de un cuadrado
![Page 20: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/20.jpg)
ESTRUCTURAS SENTENCIAS Y
CONDICIONALES Las estructuras son las palabras propias del lenguaje, las cuales sirven al programador como herramientas para desarrollar un programa
ESTRUCTURA “If--then” Sirve para tomar decisiones, cuando la condición requerida por el if no se cumple recurrimos el termino “Else” asi el programa ejecutara otro bloque de sentenciasAl terminar las sentencias se cierra la estructura con el termino “End if”
![Page 21: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/21.jpg)
Ejemplos estructura if end ifSub programa005()
Dim numero As integerNumero = inputbox(“escribe un numero entero”)If numero < 100 then
Activecell.value = “num = & numero”Activecell.offset(1,0).value = “el numero es menor que 100”
End ifEnd sub
![Page 22: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/22.jpg)
Ejemplos estructura if…thenSub programa006()
Dim numero As Integer numero = InputBox("escribe un numero entero") If numero < 100 Then
ActiveCell.Value = "numero" ActiveCell.Offset(1, 0).Value = "el numero es menor que
100" Else ActiveCell.Value = "numero" ActiveCell.Offset(1, 0).Value = "el numero es mayor que
100" End If
End Sub
![Page 23: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/23.jpg)
EjemplosSub programa007() Dim numero As Integer numero = InputBox("escribe un numero entero") If numero < 100 Then ActiveCell.Value = "numero" ActiveCell.Offset(1, 0).Value = "el numero es menor que 100" ActiveCell.Offset(1, 0).Font.Bold = RGB(255, 0, 0) Else ActiveCell.Value = "numero" ActiveCell.Offset(1, 0).Value = "el numero es mayor que 100" End IfEnd Sub
![Page 24: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/24.jpg)
If anidados
Dentro de una estructura if se puede introducir una o varias estructuras de las mismas, es solo tener en cuenta al momento de cerrarlas, cada una se sierra de forma separada
![Page 25: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/25.jpg)
Ejemplos Sub programa009()
Dim cant, precio As Double Dim descue As Double cant = InputBox("cantidad=") ActiveCell.Offset(1, 0).Value = "cantidad =" & cant precio = InputBox("precio = ") ActiveCell.Offset(2, 0).Value = "pre =" & precio ActiveCell.Offset(3, 0).Value = "Total sin descuento = " & (cant * precio) If cant * precio = 750 Then descue = 3 ElseIf cant * precio < 750 Then descue = 2.8 Else descue = 3.5 End If ActiveCell.Offset(5, 0).Value = "descuento = " & descue & "%" ActiveCell.Offset(6, 0).Value = "esdecir = " & (cant * precio * descue / 100) ActiveCell.Offset(8, 0).Value = "Total = " & (cant * precio - cant * precio * descue / 100)
![Page 26: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/26.jpg)
Nota Else If:Nos permite escribir muchas sentencias en una misma línea de código.
![Page 27: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/27.jpg)
INTRODUCCIÓN A LA PROGRAMACIÓN FORMULARIOS Y CONTROLES DE VISUAL BASIC APLICADO
DESDE EXCEL
![Page 28: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/28.jpg)
INTRODUCCIÓN A LA PROGRAMACIÓN
¿Que es la programación?Es pasar un algoritmo a un lenguaje de programación determinado. ¿Que es un algoritmo?Conjunto de instrucciones que especifican una secuencia de operaciones a realizar en orden, para resolver un sistema especifico de problemas.¿Qué es la lógica?Disciplina que estudia las estructuras o formas del pensamiento, con el propósito de establecer razonamientos validos.
![Page 29: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/29.jpg)
INTRODUCCIÓN A LA PROGRAMACIÓN¿Que es un programa?Conjunto ordenado de instrucciones que se dan al computador indicándole las operaciones o tareas que deseamos que realice¿Lenguaje de programación?Son herramientas que nos permiten crear programas y software. Algunos lenguajes de programación: Delphi Visual Basic C, c++ Pascal, HTML Java, etc..
![Page 30: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/30.jpg)
TIPOS DE LENGUAJES DE PROGRAMACIÓN
Lenguaje de maquina Lenguaje de bajo nivel Lenguajes de alto nivel
![Page 31: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/31.jpg)
MIS PROMEROS PASOS EN VISUAL
¿Que es visual basic?Es un programa, el cual es en si mismo un lenguaje nivel, con el cual se pueden desarrollar aplicaciones para cualquier necesidad.(usuarios o empresas)
![Page 32: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/32.jpg)
Iniciando basic desde Excel
Ruta de acceso Microsotf office Microsotf Excel Guardamos el archivo Luego la combinación Alt + F11
![Page 33: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/33.jpg)
![Page 34: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/34.jpg)
Insertando formulario
Desde el basic Menú insertar UserForm
Nos aparece un formulario donde podemos insertar controles los cuales estan en la barra de herramientas
![Page 35: Excel y visual basic](https://reader035.fdocument.pub/reader035/viewer/2022062306/588030a71a28ab9f0f8b67d1/html5/thumbnails/35.jpg)
Modificamos las características del formulario Caption: sirve para modificar el nombre del UserForm Backcolor: Sirve para modificar el color de fondo Font: Tipo de letra ForeColor: Se usa para causar efectos sobre el fondo del
formulario