El Projecte | Sobre nosaltres | Contribuir | Donacions | Llicència
HOME Els meus cursos Finalitzats
◄ Anterior
◄

Operadors en VBA

Següent ►
►

En aquest tema, explorarem els diferents tipus d'operadors disponibles en VBA (Visual Basic for Applications). Els operadors són símbols que indiquen a l'ordinador que realitzi operacions específiques sobre una o més variables. Els operadors en VBA es poden classificar en diverses categories:

  1. Operadors aritmètics
  2. Operadors de comparació
  3. Operadors lògics
  4. Operadors de concatenació de cadenes
  5. Operadors d'assignació

  1. Operadors aritmètics

Els operadors aritmètics s'utilitzen per realitzar operacions matemàtiques bàsiques com la suma, resta, multiplicació, etc.

Operador Descripció Exemple Resultat
+ Suma 5 + 3 8
- Resta 5 - 3 2
* Multiplicació 5 * 3 15
/ Divisió 6 / 3 2
\ Divisió entera 7 \ 3 2
Mod Mòdul (residu) 7 Mod 3 1
^ Exponenciació 2 ^ 3 8

Exemple pràctic

Sub ExempleOperadorsAritmetics()
    Dim a As Integer
    Dim b As Integer
    Dim resultat As Integer
    
    a = 10
    b = 3
    
    resultat = a + b ' Suma
    Debug.Print "Suma: " & resultat
    
    resultat = a - b ' Resta
    Debug.Print "Resta: " & resultat
    
    resultat = a * b ' Multiplicació
    Debug.Print "Multiplicació: " & resultat
    
    resultat = a / b ' Divisió
    Debug.Print "Divisió: " & resultat
    
    resultat = a \ b ' Divisió entera
    Debug.Print "Divisió entera: " & resultat
    
    resultat = a Mod b ' Mòdul
    Debug.Print "Mòdul: " & resultat
    
    resultat = a ^ b ' Exponenciació
    Debug.Print "Exponenciació: " & resultat
End Sub

  1. Operadors de comparació

Els operadors de comparació s'utilitzen per comparar dos valors. El resultat d'una comparació és un valor booleà (True o False).

Operador Descripció Exemple Resultat
= Igual a 5 = 3 False
<> Diferent de 5 <> 3 True
> Major que 5 > 3 True
< Menor que 5 < 3 False
>= Major o igual que 5 >= 3 True
<= Menor o igual que 5 <= 3 False

Exemple pràctic

Sub ExempleOperadorsComparacio()
    Dim a As Integer
    Dim b As Integer
    
    a = 10
    b = 3
    
    Debug.Print "a = b: " & (a = b)
    Debug.Print "a <> b: " & (a <> b)
    Debug.Print "a > b: " & (a > b)
    Debug.Print "a < b: " & (a < b)
    Debug.Print "a >= b: " & (a >= b)
    Debug.Print "a <= b: " & (a <= b)
End Sub

  1. Operadors lògics

Els operadors lògics s'utilitzen per combinar expressions booleanes.

Operador Descripció Exemple Resultat
And I (tots dos han de ser certs) True And False False
Or O (almenys un ha de ser cert) True Or False True
Not No (inverteix el valor) Not True False

Exemple pràctic

Sub ExempleOperadorsLogics()
    Dim a As Boolean
    Dim b As Boolean
    
    a = True
    b = False
    
    Debug.Print "a And b: " & (a And b)
    Debug.Print "a Or b: " & (a Or b)
    Debug.Print "Not a: " & (Not a)
End Sub

  1. Operadors de concatenació de cadenes

Els operadors de concatenació de cadenes s'utilitzen per unir dues o més cadenes de text.

Operador Descripció Exemple Resultat
& Concatenació de cadenes "Hola" & " " & "Món" "Hola Món"

Exemple pràctic

Sub ExempleOperadorsConcatenacio()
    Dim text1 As String
    Dim text2 As String
    Dim resultat As String
    
    text1 = "Hola"
    text2 = "Món"
    
    resultat = text1 & " " & text2
    Debug.Print "Concatenació: " & resultat
End Sub

  1. Operadors d'assignació

Els operadors d'assignació s'utilitzen per assignar valors a les variables.

Operador Descripció Exemple Resultat
= Assignació a = 5 a és 5

Exemple pràctic

Sub ExempleOperadorsAssignacio()
    Dim a As Integer
    a = 5
    Debug.Print "Valor de a: " & a
End Sub

Exercicis pràctics

Exercici 1: Operacions aritmètiques

Escriu un programa que calculi la suma, resta, multiplicació, divisió i mòdul de dos nombres introduïts per l'usuari.

Solució

Sub ExerciciOperacionsAritmetiques()
    Dim num1 As Integer
    Dim num2 As Integer
    
    num1 = InputBox("Introdueix el primer nombre:")
    num2 = InputBox("Introdueix el segon nombre:")
    
    Debug.Print "Suma: " & (num1 + num2)
    Debug.Print "Resta: " & (num1 - num2)
    Debug.Print "Multiplicació: " & (num1 * num2)
    Debug.Print "Divisió: " & (num1 / num2)
    Debug.Print "Mòdul: " & (num1 Mod num2)
End Sub

Exercici 2: Comparació de valors

Escriu un programa que compari dos nombres introduïts per l'usuari i mostri si són iguals, diferents, si un és major que l'altre, etc.

Solució

Sub ExerciciComparacioValors()
    Dim num1 As Integer
    Dim num2 As Integer
    
    num1 = InputBox("Introdueix el primer nombre:")
    num2 = InputBox("Introdueix el segon nombre:")
    
    Debug.Print "num1 = num2: " & (num1 = num2)
    Debug.Print "num1 <> num2: " & (num1 <> num2)
    Debug.Print "num1 > num2: " & (num1 > num2)
    Debug.Print "num1 < num2: " & (num1 < num2)
    Debug.Print "num1 >= num2: " & (num1 >= num2)
    Debug.Print "num1 <= num2: " & (num1 <= num2)
End Sub

Conclusió

En aquest tema, hem après sobre els diferents tipus d'operadors en VBA i com utilitzar-los en els nostres programes. Hem vist exemples pràctics de cada tipus d'operador i hem realitzat exercicis per reforçar els conceptes apresos. Ara estem preparats per avançar cap a les estructures de control en VBA.

◄ Anterior
◄
Següent ►
►
El Projecte | Sobre nosaltres | Contribuir | Donacions | Llicència
© Copyright 2024. Tots els drets reservats