Tutoriales macros y vba

Esta función definida por el usuario (UDF) sirve para extraer los acrónimos de una cadena de texto (el primer caracter de cada palabra.

Option Explicit
Public Function ACRONIMOS(ByVal sText As String, _
               Optional ByVal bJustCapitals As Boolean = False) As String
Dim inextspace As Integer
Dim sfirstcharacter As String
Dim sword As String
    sText = VBA.Trim(sText)
    Do While VBA.Len(sText) > 0
       inextspace = VBA.InStr(1, sText, " ")
       If inextspace > 0 Then
          sword = VBA.Trim(VBA.Left(sText, inextspace - 1))
          sText = VBA.Right(sText, VBA.Len(sText) - inextspace)
       Else
          sword = sText
          sText = ""
       End If
       sfirstcharacter = VBA.Left(sword, 1)
       If bJustCapitals = True Then
          If (VBA.Asc(sfirstcharacter) >= 65 And VBA.Asc(sfirstcharacter) <= 90) Then
             ACRONIMOS = ACRONIMOS & VBA.UCase(sfirstcharacter)
          End If
       End If
       If bJustCapitals = False Then ACRONIMOS = ACRONIMOS & VBA.UCase(sfirstcharacter)
    Loop
End Function

Cuando tenemos una hoja de cálculo compleja, a menudo es necesario comprobar las fórmulas para asegurarnos de que todo funciona correctamente y los resultados son los que deseamos. Esto puede hacerse mirando las celdas implicadas en cada fórmula haciendo clic en cada una de ellas. Si se trata de una hoja con muchas fórmulas, esta operación puede ser muy larga y tediosa.

Cuando Excel 2007 salió al mercado, los menús clásicos fueron sustituidos por la cinta de opciones. Pero esto no es realmente cierto. Los viejos menús siguen ocultos tras la nueva cara de Excel. Te presentamos una macro con la que puedes dejar de añorar los comandos de la barra de herramientas Estándar, tal como los conocimos cuando comenzamos a trabajar con Excel.

Una tarea común en Excel es abrir archivos de datos, tomar alguna información y cerrar el archivo para no abrirlo nunca más. Con el tiempo, estos archivos temporales van creciendo, a menos que los borremos meticulosamente. Este código añade una nueva opción al menú Archivo: Cerrar y Borrar. Esto permite que el libro activo se cierre y elimine. También elimina el nombre de archivo de la lista de archivos abiertos recientemente.