XL 2010 Bordure sur une plage de cellule en VBA

thunder23 · 15 Décembre 2019

Bonjour le forum,

Je souhaiterais que quand une cellule n'est pas vide une bordure épaisse se met en place en bas d'une plage de cellule. J'ai déjà fait un bout de code mais ça ne fonctionne pas.

VB:

If Range("F38").Value <> "" Then
        Range("F38:J38").Borders (xlEdgeBottom)
                .LineStyle = xlContinuous
                .Color = RGB(0, 0, 0)
                .Weight = xlMedium
End If

Merci d'avance pour votre aide

James007 · 15 Décembre 2019

Bonjour,

Si tu n'as besoin que de l'instruction

VB:

Sub TaMacro()
 If Range("F38").Value <> "" Then Range("F38:J38").Borders(xlEdgeBottom).Weight = xlMedium
End Sub

thunder23 · 15 Décembre 2019

James007 à dit:
Bonjour,

Si tu n'as besoin que de l'instruction

VB:

Sub TaMacro() If Range("F38").Value <> "" Then Range("F38:J38").Borders(xlEdgeBottom).Weight = xlMedium End Sub

Bonjour,

Effectivement je n'avais besoin que de l'instruction car c'est pour rajouter dans une macro par ailleurs ça s'effectue comme je le souhaitais, merci beaucoup

James007 · 15 Décembre 2019

Content que cela puisse t'aider

XL 2010 Bordure sur une plage de cellule en VBA

thunder23

XLDnaute Occasionnel

James007

XLDnaute Barbatruc

thunder23

XLDnaute Occasionnel

James007

XLDnaute Barbatruc

Discussions similaires