Essais nouvelle version VBA to XLD

[Sylvain]

Bonjour,

En avant première une nouvelle version de l'utilitaire VBA --> XLD pour aider à poster votre code VBA sur le forum. Cette nouvelle version permet de choisir les couleurs à appliquer (157 possibles, je ne sais pas si elles marchent toutes). Mais aussi de décider d'utiliser le gras l'itallique ou le souligné pour les différentes parties du code. La taille des caractères peut être choisie ainsi que l'utilisation ou non d'une balise quote (mise du texte dans un rectangle gris).

Pour accéder aux options, il suffit d'appuyer sur le bouton VBA --> XLD quand UNE SEULE cellule est sélectionnée.

    If trouve_commentaire > 0 Then 'un commentaire sur la ligne
      cell_code.Value = cell_code.Value & _
      ThisWorkbook.Sheets('procédure').Range('f_com').Value & _
      ThisWorkbook.Sheets('procédure').Range('d_normal').Value
    End If

ou alors :

    If trouve_commentaire > 0 Then 'un commentaire sur la ligne
      cell_code.Value = cell_code.Value & _
      ThisWorkbook.Sheets('procédure').Range('f_com').Value & _
      ThisWorkbook.Sheets('procédure').Range('d_normal').Value
    End If
    cell_code.Value = ligne1(' ' & cell_code.Value & '  ')

[file name=vba_to_xld1.zip size=29447]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/vba_to_xld1.zip[/file]