Affichage dans le forum: couleur dans le code VBA

[merinos]

Je viens de découvrir une astuce ... merci Ce lien n'existe plus

Tout en noir...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next

 If Not Intersect(Range("client_selector"), Target) Is Nothing And Target.Count = 1 Then
   '  ***
    ActiveSheet.PivotTables("PivotTable2").PivotFields("unique").CurrentPage = Range("client_selector").Value
   ' ***
 Else
     '***
    Me.ComboBox1.Visible = False
   '***
 End If

End Sub

Et en couleur...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next

 If Not Intersect(Range("client_selector"), Target) Is Nothing And Target.Count = 1 Then
   '  ***
    ActiveSheet.PivotTables("PivotTable2").PivotFields("unique").CurrentPage = Range("client_selector").Value
   ' ***
 Else
     '***
    Me.ComboBox1.Visible = False
   '***
 End If

End Sub

Mais comme c'est joli... et la différence?
(J'ai ajouté des espace afin que le forum ne reconnaisse pas le code)
[ code ] ... [ /code ]
[ code= vb ] ... [ / code ]

Je rêve juste de retrouver la même chose dans excel....

Merinos

 

[Dranreb]

Bonsoir.
Dans Excel ou dans VBA ?
Parce que dans VBA vous pouvez personnaliser les couleurs des éléments du langage.

 

[Staple1600]

Bonsoir le fil, le forum

@merinos
Pas besoin d'espace [code=vb] suffit
(en utilisant la balise BBCODE idoine)

Sinon pour formater ton code VBA dans un message, tu peux aussi utiliser le bouton Insérer...

Tu sélectionnes CODE puis dans la liste déroulante, tu choisis le type de CODE.

 

[merinos]

Bonsoir.
Dans Excel ou dans VBA ?
Parce que dans VBA vous pouvez personnaliser les couleurs des éléments du langage.

Changer les couleurs dans le code dans l'interface VBA....

Super intéressant mais comment faire? J'ai toujours trouvé que l'interface de programmation est faible en lecture....



Merinos

 

[Dranreb]

Bonjour.
Menu Outils, Options…, onglet Format de l'éditeur
Chez moi j'ai ça, depuis très longtemps :

Mais attention, pour arriver à l'obliger à accepter ça, j'ai été obligé de détruire tous les fichiers de la police Consolas autres que celui de sa version en gras.

 

[Modeste geedee]

Bonsour®

Changer les couleurs dans le code dans l'interface VBA....

Super intéressant mais comment faire? J'ai toujours trouvé que l'interface de programmation est faible en lecture....
Merinos

après l'égout et l'écouleur...

 

[merinos]

Merci,

C'est effectivement mieux...

ce dont j'avais rêvé c'est de pouvoir changer certaines instructions.
par example juste les boucles ("if then else" , "for each";... ) .

Mais avec ce que tu as donné ce sera déjà plus visible.