Com utilitzar les funcions VBA integrades dExcel

Excel VBA ofereix nombroses funcions integrades. Algunes d'aquestes funcions d' Excel VBA prenen arguments, i altres no.

Exemples de funcions d'Excel VBA

Aquí trobareu alguns exemples d'ús de funcions VBA al codi. En molts d'aquests exemples, la funció MsgBox mostra un valor en un quadre de missatge. Sí, MsgBox és una funció VBA, una funció força inusual, però una funció tanmateix. Aquesta funció útil mostra un missatge en un quadre de diàleg i també retorna un valor.

Mostra la data o l'hora del sistema

El primer exemple utilitza la funció Data de VBA per mostrar la data actual del sistema en un quadre de missatge:

Sub ShowDate()
  MsgBox "Avui és: " & Data
End Sub

Tingueu en compte que la funció Data no utilitza cap argument. A diferència de les funcions del full de treball, una funció VBA sense argument no requereix un conjunt buit de parèntesis. De fet, si escriviu un conjunt buit de parèntesis, el VBE els elimina ràpidament.

Per obtenir l'hora del sistema, utilitzeu la funció Hora. I si ho voleu tot, feu servir la funció Ara per retornar tant la data com l'hora.

Trobar una longitud de corda

El procediment següent utilitza la funció VBA Len, que retorna la longitud d'una cadena de text. La funció Len pren un argument: la cadena. Quan executeu aquest procediment, el quadre de missatge mostra el vostre nom i el nombre de caràcters del vostre nom.

Sub GetLength()
  Atenua MyName com a cadena
  Dim StringLength tan llarg
  El meu nom = Application.UserName
  StringLength = Len(MyName)
  MsgBox MyName & " té caràcters " & StringLength & "".
End Sub

Càlcul de la longitud del teu nom.

Excel també té una funció LEN, que podeu utilitzar a les fórmules del vostre full de treball. La versió d'Excel i la funció VBA funcionen igual.

Mostra el nom d'un mes

El procediment següent utilitza la funció MonthName, que retorna el nom d'un mes. MonthName utilitza un argument: un nombre enter entre 1 i 12.

Sub ShowMonthName()
  Dim ThisMonth As Long
  ThisMonth = Mes (Data)
  MsgBox MonthName (Aquest mes)
End Sub

Aquest procediment utilitza la funció Mes per obtenir el mes actual (com a valor) i aquest valor s'assigna a la variable ThisMonth. A continuació, la funció MonthName converteix el valor en text. Per tant, si executeu aquest procediment a l'abril, el quadre de missatge mostrarà el text abril.

De fet, la variable ThisMonth no és necessària. Podeu obtenir el mateix efecte amb aquesta expressió, que utilitza tres funcions VBA:

MonthName(Mes(Data))

Aquí, la data actual es passa com a argument a la funció Month, que retorna un valor que es passa com a argument a la funció MonthName.

Determinació de la mida d'un fitxer

El següent procediment Sub mostra la mida, en bytes, del fitxer executable d'Excel. Troba aquest valor mitjançant la funció FileLen:

Sub GetFileSize()
  Atenua el fitxer com a cadena
  TheFile = "C:\Fitxers de programa (x86)\Microsoft Office\root\Office16\EXCEL.EXE"
  MsgBox FileLen (El fitxer)
End Sub

Observeu que aquesta rutina codifica el nom del fitxer (és a dir, indica explícitament el camí). Això no és una bona idea. És possible que el fitxer no estigui a la unitat C o que la carpeta Excel tingui un nom diferent. La següent afirmació mostra un millor enfocament:

TheFile = Application.Path & "\EXCEL.EXE"

Path és una propietat de l'objecte Aplicació. Simplement retorna el nom de la carpeta on està instal·lada l'aplicació (és a dir, Excel) (sense barra invertida).

Identificació del tipus d'objecte seleccionat

El procediment següent utilitza la funció TypeName, que retorna el tipus de selecció al full de treball (com a cadena):

Sub ShowSelectionType()
  Dim SelType com a cadena
  SelType = TypeName (Selecció)
  MsgBox SelType
End Sub

La selecció pot ser un rang, una imatge, un rectangle, una àrea de gràfic o qualsevol altre tipus d'objecte que es pugui seleccionar.

La funció TypeName és molt versàtil. També podeu utilitzar aquesta funció per determinar el tipus de dades d'una variable.

Funcions d'Excel VBA que fan més que retornar un valor

Algunes funcions de VBA van més enllà del deure. En lloc de simplement retornar un valor, aquestes funcions tenen alguns efectes secundaris útils.

Funcions VBA amb avantatges secundaris útils

Descobrint les funcions d'Excel VBA

Com esbrineu quines funcions ofereix VBA? Bona pregunta. La millor font és el sistema Excel VBA . Una altra manera és escriure VBA , seguit d'un punt. Obtindreu una llista d'elements. Els que tenen una icona verda són funcions. Si aquesta funció no funciona, seleccioneu Eines → Opcions de VBE, feu clic a la pestanya Editor i marqueu l'opció Membres de la llista automàtica.

Una manera de mostrar una llista de funcions de VBA.

Hi ha més de 140 funcions diferents disponibles a VBA. Alguns són tan especialitzats i obscurs que mai els necessitareu. Altres, però, són força útils per a moltes aplicacions.

Les funcions integrades més útils d'Excel VBA

Per obtenir detalls complets sobre una funció concreta de VBA d'Excel , escriviu el nom de la funció en un mòdul VBA, moveu el cursor a qualsevol lloc del text i premeu F1.