Ejemplos de macros en excel

Páginas: 5 (1234 palabras) Publicado: 19 de enero de 2011
' Macro grabada el 23/07/2010 por LADE

' Ubicación C:\Documents and Settings\ldelgado\Application Data\Microsoft\Excel\XLSTART\personal.xlsb

Function IsOpen(FileName As String) As Boolean

Dim wb As Workbook

For Each wb In Application.Workbooks

If UCase(wb.Name) = UCase(FileName) Then

IsOpen = True

Exit Function

End If

Next wb

IsOpen = False

End Function

Subdispatcher()

'

' dispatcher Macro

' Macro grabada el 03/08/2008 por Authorized User

'

' Acceso directo: CTRL+d

'

strnombre = ActiveSheet.Parent.FullName

folio = Range("i9").Value

Fecha = Range("i6").Value

Diir = Range("f17").Value

numCliente = Range("e5").Value

Turno = Range("e9").Value

Despachador = Range("a88").Value

Capturista = Range("c97").ValueTecnico = Range("e88").Value

Clasificacion = Range("e97").Value

T1 = Range("e8").Value

T2 = Range("g25").Value

T3 = Range("g26").Value

T4 = Range("g28").Value

T6 = Range("g31").Value

Dep = Range("h97").Value

Reporto = Range("f15").Value

Prob = Range("f20").Value

sol = Range("a34").Value

open_cuu

Range("A:A").Select

WhileActiveCell.Value ""

ActiveCell.Offset(1, 0).Range("A1").Select

Wend

ActiveCell.FormulaR1C1 = folio

'ActiveCell.FormulaR1C1 = ("CUU / ") & Folio & (" / 2011")

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Fecha

ActiveCell.Next.Select

'ActiveCell.FormulaR1C1 = dir1

ActiveCell.FormulaR1C1 = Diir'ActiveCell.Next.Select

'ActiveCell.FormulaR1C1 = num

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = numCliente

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Turno

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Despachador

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Capturista

ActiveCell.Next.SelectActiveCell.FormulaR1C1 = Tecnico

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Clasificacion

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = T1

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = T2

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = T3

ActiveCell.Next.SelectActiveCell.FormulaR1C1 = T4

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = T6

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Dep

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Reporto

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Prob & " " & sol

ActiveCell.Offset(0, -14).Range("A1").Select

ActiveWorkbook.Close (True)open_Relacion_diaria

Range("folio").Select

While ActiveCell.Value ""

ActiveCell.Offset(1, 0).Range("A1").Select

Wend

'ActiveCell.FormulaR1C1 = ("CUU / ") & Folio & (" / 2011")

ActiveCell.FormulaR1C1 = folio

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Fecha

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = Diir'ActiveCell.FormulaR1C1 = dir1

ActiveCell.Next.Select

ActiveCell.FormulaR1C1 = numCliente

'Application.Goto Reference:="DatosDia"

'selection.Sort Key1:=Range("c17"), Order1:=xlAscending, 'Header:=xlNo, _

' OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _

' DataOption1:=xlSortNormal

ActiveWorkbook.Close (True)'open_strnombre

'Terminar

' Limpiar

'Etiqueta

'nueva

'Abrir_Docs

Application.ScreenUpdating = True

End Sub

Sub Terminar()

'Windows(milibro).Activate

'para activar el libro del nombre asignado

Range("A34:k41").Select

With Selection

.HorizontalAlignment = xlCenter...
Leer documento completo

Regístrate para leer el documento completo.

Estos documentos también te pueden resultar útiles

  • Macros En Excel

    ...Cómo escribir una macro utilizando el Editor de Visual Basic Capítulo siguiente: 2 - Cómo ejecutar una Macro Las macros que vamos a ver a lo largo de este curso las vamos a ir programando directamente con el Editor de Visual Basic que viene incorporado con el mismo Excel. Para ponerlo en funcionamiento deberemos realizar los siguientes pasos: 1.- Dentro del menú Herramientas - Macro deberemos escoger la opción:...

    Leer más
    651 Palabras 3 Páginas
  • Macros de excel

    ...Comunicación. Miguel Ángel Delgado Suarez. Yeimi Paola Cortes R. Cód: 20072150022. …MACROS… Una macro es una abreviatura de Macroinstrucción, serie de instrucciones que se almacenan para que se pueda ejecutar de forma secuencial mediante una sola llamada u orden de ejecución. Es una instrucción compleja, formada por otras instrucciones más sencillas. Esto permite la automatización de tareas repetitivas. Las macro suelen almacenarse en el...

    Leer más
    1315 Palabras 6 Páginas
  • EXCEL MACROS

    ...EXCEL FORMULAS Y MACROS Importar datos de Word a Excel inShare Al importar datos a Excel (en este caso texto) de un documento Word podemos aplicar la función VBA de Create Object. Esta función nos deja ‘conectar’ con los otros programas Office. De esta manera es bastante sencillo mandar datos entre Excel y el resto del suite Office de Microsoft. Este ejemplo de Excel VBA presenta una manera...

    Leer más
    510 Palabras 3 Páginas
  • Macros Excel

    ...Definición de los diversos parámetros................................................2 2. Elección del tipo de carburante…………………………………….………2 3. Macro referida a la contaminación del suelo…………………………......4 3.1. Limpieza de las zonas de la hoja “Hidrocarburovap”………………………......4 3.2. Definición de los cálculos y colocación en las celdas correspondientes…....5 4. Macro referida a la contaminación del agua………………………………9 4.1. Limpieza de las zonas de la hoja...

    Leer más
    1358 Palabras 6 Páginas
  • macro excel

    ...LA ADMINISTRACION CIENTIFICA TAYLOR: (1856-1915) fundador de la administración científica, nació en Filadelfia Estados Unidos, se educó con principios rígidos y una mentalidad de fuerte disciplina, dedicación para el trabajo y el ahorro, inicio su carrera como operario de MIDVALE STEEL CO. Pero pronto ascendió a capataz y luego jefe de taller; tras graduarse en el STEVEN INSTITUTE trabajo ahí como ingeniero, en esa época imperaba el sistema de pago a destajo, por pieza o por tarea los...

    Leer más
    1096 Palabras 5 Páginas
  • Excel macros

    ...Ciclo: II Curso: Ofimática Avanzada para Ingenieros Tema: Excel Trabajo de Investigación: Macros 2010 Macros - Excel Macros Concepto: Una Macro es una serie de pasos acumulados cronológicamente que se almacenan en una ubicación específica, por ejemplo en: Microsoft Word, Microsoft Excel, Microsoft Access. La palabra “Macro” proviene del término...

    Leer más
    640 Palabras 3 Páginas
  • Macros en excel

    ...Las macros de Excel nos permiten automatizar tareas que realizamos cotidianamente de manera que podamos ser más eficientes en nuestro trabajo. Una macro no es más que una serie de comandos o instrucciones que permanecen almacenados dentro de Excel y que podemos ejecutar cuando sea necesario y cuantas veces lo deseemos. Aunque las macros son un tema avanzado de Excel puedes consultar los siguientes artículos...

    Leer más
    592 Palabras 3 Páginas
  • Macro Excel

    ...Escuela Lugar de Ejecución Tema: Excel Formulas, Funciones y Macros Objetivos Específicos Conocer los conceptos básicos en relación a la generación de macros, formulas y funciones en MS Excel Objetivos Generales Generar formulas en una hoja de calculo de MS Excel a partir de un enunciado. Aplicar funciones en una hoja de calculo de MS Excel. Generar macros en una hoja de calculo de MS...

    Leer más
    1158 Palabras 5 Páginas

OTRAS TAREAS POPULARES

Conviértase en miembro formal de Buenas Tareas

INSCRÍBETE - ES GRATIS