Explication simple vba
Résolu
akmer
Messages postés
255
Date d'inscription
Statut
Membre
Dernière intervention
-
akmer Messages postés 255 Date d'inscription Statut Membre Dernière intervention -
akmer Messages postés 255 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai le code vba suivant (ci-dessous) et je voudrais bien qu'on m'explique clairement(comme à un enfant de 6ans,lol) à quoi sert le code "Dim Plage As Range" situé au début du programme, je ne comprend pas à quoi sert ce code étant donné que après ce code j'explique les manipulations en vba donc je vois vraiment pas l'utilité.
Si quelqu'un pourrais m'expliquer son code et son utilité gen serais très reconnaisant
Merci d'avance
Sub Titre()
'
' titre Macro
' Macro enregistrée le 03/04/2008 par xxxxxxxxx
Dim Plage As Range
' Activer la feuille
Sheets("Feuil2").Select
' Supprimer toutes les données dans la feuille
Cells.Delete
' Mettre le titre en A1
Range("A1").Value = "ETAT DES DECISIONS" & Chr(129) & "DU __/__/2008 AU __/__/2008"
' Sélectionner la zone pour le titre
Set Plage = Range("A1:I1")
Call FusionCells(Plage, xlCenter, xlCenter, True, True) ' Fusionner les cellules
Call HauteurLigne(Plage, 50) ' Hauteur de ligne
Call Police(Plage, "Arial", "Normal", 17, True) ' Changer la police
Call CouleurFond(Plage, 15) ' Mettre une couleur de fond
' Mettre la bordure
Call Bordure(Plage, xlEdgeLeft, xlDouble, xlThick) 'bordure de gauche
Call Bordure(Plage, xlEdgeTop, xlDouble, xlThick) 'bordure du haut
Call Bordure(Plage, xlEdgeBottom, xlDouble, xlThick) 'bordure du bas
Call Bordure(Plage, xlEdgeRight, xlDouble, xlThick) 'bordure de droite
End Sub
j'ai le code vba suivant (ci-dessous) et je voudrais bien qu'on m'explique clairement(comme à un enfant de 6ans,lol) à quoi sert le code "Dim Plage As Range" situé au début du programme, je ne comprend pas à quoi sert ce code étant donné que après ce code j'explique les manipulations en vba donc je vois vraiment pas l'utilité.
Si quelqu'un pourrais m'expliquer son code et son utilité gen serais très reconnaisant
Merci d'avance
Sub Titre()
'
' titre Macro
' Macro enregistrée le 03/04/2008 par xxxxxxxxx
Dim Plage As Range
' Activer la feuille
Sheets("Feuil2").Select
' Supprimer toutes les données dans la feuille
Cells.Delete
' Mettre le titre en A1
Range("A1").Value = "ETAT DES DECISIONS" & Chr(129) & "DU __/__/2008 AU __/__/2008"
' Sélectionner la zone pour le titre
Set Plage = Range("A1:I1")
Call FusionCells(Plage, xlCenter, xlCenter, True, True) ' Fusionner les cellules
Call HauteurLigne(Plage, 50) ' Hauteur de ligne
Call Police(Plage, "Arial", "Normal", 17, True) ' Changer la police
Call CouleurFond(Plage, 15) ' Mettre une couleur de fond
' Mettre la bordure
Call Bordure(Plage, xlEdgeLeft, xlDouble, xlThick) 'bordure de gauche
Call Bordure(Plage, xlEdgeTop, xlDouble, xlThick) 'bordure du haut
Call Bordure(Plage, xlEdgeBottom, xlDouble, xlThick) 'bordure du bas
Call Bordure(Plage, xlEdgeRight, xlDouble, xlThick) 'bordure de droite
End Sub
A voir également:
- Explication simple vba
- Iphone 14 simple - Guide
- Simple pdf - Télécharger - PDF
- Simple ocr - Télécharger - Bureautique
- Simple file locker - Télécharger - Sécurité
- Simple comic - Télécharger - Vie quotidienne
2 réponses
C'est un objet qui défini une plage de cellule (Range). Dans ton code c'est la plage A1 à I1 (la zone de titre). Tu fais appel ensuite à différentes fonctions de mise en page (format cellule) en passant cette plage en paramètre. Ca évite d'avoir à faire appel aux fonctions pour chaque cellule de A1 à I1.
;o)
polux
;o)
polux
j'ai compris après pas mal de relecture