management
A+
Les classeurs Les classeurs sont désignés par le mot « Workbook ». Ils peuvent être ouvert, fermé, enregistré, activé, masqué, supprimé par une instruction VB. Quelques exemples d’instructions sur les classeurs : ‘Ajouter un nouveau classeur Workbooks. Add ‘Fermer un classeur. Le nom du classeur ou son index peut to nextÇEge être Indiqué. Fermer le classeur a ActiveWorkbook. Close ‘Ouvrir un classeur. Workbooks. Open ‘Activer un classeur. Certaines méthodes de l’objet Workbook possèdent des arguments. Quelques exemples . variable. Maëeuille ActiveSheet.
Name Masquer une feuille. Worksheets(« Feui11 « ). Visible ‘Supprimer une Feuille. Worksheets(« Feui11 « ). Delete Les exemples précédents font référence aux feuilles du classeur actif. Vous pouvez également faire référence aux feuilles des autres classeurs ouverts : ‘Copier la Feui12 de Classeur. xls dans un nouveau classeur Workbooks( » Classeur. Les cellules Une plage de cellules est désignée par l’objet ‘Range ». Pour faire référence à la plage de cellule « Al :BIO », on utilisera Ranget’A1 ‘Effacer les données et le mise en forme de la plage de cellule « Al :B10 » Range(« A1 O »).
Clear L’objet Range permet également de faire référence ? plusieurs plages de cellules non contiguës. ‘Séléctionner les plages de cellule « Al :B5 » et « D2:FIO » PAG » OF d l’enregistreur de macro produirait comme code : Range(« A1 Selection. Copy Windows(« Classeur2 »). Activate ActiveSheet. Paste Sheetst »î-euill « ). select Application. CutCopyMode False Windows(« Classeur1 « ). Activate Voici maintenant le code tel qu’il pourrait être écrit sur une seule ligne de code: Ranget’A1 copy Workbooks( » Feui12 On peut utiliser une autre syntaxe pour faire référence à une cellule : la ligne ‘peut être remplacée par.
En utilisant des variables objets (très utiles lorsque votre programme fait souvent référence aux mêmes plages de cellules), le code pourrait devenir : Dim Cell As Range, Ce12 As Range set cell = Set Ce12 = PAGF3CFd Range(« A1 1′) With Cell . Font Bold = True *Italic = True . Name = « Courier » Size = 10 . color = RG3(255, O, 0) End With A partir d’une cellule de référence, vous pouvez faire appel aux autres cellules par l’instruction « Offset ». La syntaxe est Range(Cellule de référence). Offset(Nombre de lignes, Nombre de colonne). ur écrire 5 dans la cellule i’B2″, on pourrait utiliser : ‘Ecrire une valeur à la suite d’une liste de valeur dans la colonne Dim NbEnreg As Integer ‘NbEnreg correspond au nombre d’enregistrement de la colonne NbEnreg – Range(« A1 0) = IO Les arguments (Nombre de lignes, Nombre de colonnes) de l’instruction Offset sont facultatifs et leur valeur par défaut est O. La dernière ligne de code de l’exemple précédent aurait pu s’écrire : Range(« A1 « ). Offset(NbEnreg) 10 Exécuter un code VBA (une macro) à partir dun bouton situé dans la feuille Excel : Une fois que le code VBA e registré vous pouvez