Macro excel supprimer une ligne sous conditions

Macro excel supprimer une ligne sous conditions - VB/VBA/VBS - Programmation

Marsh Posté le 01-12-2011 à 17:58:29    

Bonjour,
 
 
Je suis à la recherche une macro pour supprimer une ligne si celle-ci contient du texte en gras.
 
Avec Google ca donne rien.
 
Ca semble bizzare comme demande , mais elle me permettrait de gagner un temps assez precieux.
 
 
Je remercie grandement celui qui pourra répondre à ma detresse et à ceux qui auront essayé :)


Message édité par jin1080 le 01-12-2011 à 17:59:54
Reply

Marsh Posté le 01-12-2011 à 17:58:29   

Reply

Marsh Posté le 02-12-2011 à 14:35:17    

Je pense que ce n'est pas possible de faire ça avec des formules dans Excel 2003 (je ne sais pas pour les autres versions).
Mais c'est possible en VBA :

Sub Macro1()
 
  If (Cells(1, 1).Characters(Start:=2, Length:=3).Font.FontStyle = "Gras" ) Then
    MsgBox ("La cellulle A1 est en gras entre le deuxième et le cinquième caractère" )
  Else
    MsgBox ("La cellulle A1 n'est pas en gras entre le deuxième et le cinquième caractère" )
  End If
 
  If (Cells(2, 1).Characters(Start:=2, Length:=3).Font.FontStyle = "Gras" ) Then
    MsgBox ("La cellulle A2 est en gras entre le deuxième et le cinquième caractère" )
  Else
    MsgBox ("La cellulle A2 n'est pas en gras entre le deuxième et le cinquième caractère" )
  End If
 
End Sub


Message édité par olivthill le 02-12-2011 à 14:35:47
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed