Easy-Micro


ESPACEMEMBRE Structures de contrôles VBA
With End With

Bloc d'instruction With End With

Cette instruction permet d'exécuter une série d'instructions se rapportant à un même objet ou à un même type défini par l'utilisateur. Elle permet une exécution du code plus rapide et évite les saisies répétitives car vous n'écrivez qu'une seule fois le nom de l'objet ou de la variable.

Exemple: Ecrire la date du jour dans la cellule active
Sub BlocWith()
With ActiveCell
    .Value = Date
    .Interior.Color = RGB(255, 255, 204)
    With .Font
       .Color = RGB(0, 51, 102)
       .Italic = True
       .Bold = True
       .Name = "Comic sans MS"
       ' par contre ici vous ne pouvez écrire .NumberFormatLocal = "jjjj j mmmm aaaa"
    End With
    .NumberFormatLocal = "jjjj j mmmm aaaa"
End With
End Sub


Suivez les aventures des skippers aquitains sur EasyVoile.com
Flux RSS Easy-Micro - Abonnez-vous Easy-Micro [ François Bisch ]
Mercredi 20 mars 2019 - Semaine 12 - Saint Herbert (Demain: Sainte Clémence)
Aujourd'hui, c'est l'anniversaire de Danièle Gilbert (1943-76 ans), animatrice de télévision française et de Marthe Villalonga (1932), actrice française. Autre 20 mars: 1815 : de retour de l'île d'Elbe et après une marche triomphale sur Paris, Napoléon entre dans la capitale. 1965 : France Gall gagne l'Eurovision pour le Luxembourg avec Poupée de cire poupée de son.
Haut de page Easy-Micro