Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacky
Bonsoir, Ceci peut être '---------- If ActiveCell.Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox "Bordure basse sur cette cellule" ou if cells(x,y)............................................ '----------
-- Salutations JJ
"JMD" a écrit dans le message de news:
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on peut détecter que la cellule Cells(X,Y) a un trait de bordure basse ?
Merci beaucup.
Bonsoir,
Ceci peut être
'----------
If ActiveCell.Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox "Bordure
basse sur cette cellule"
ou
if cells(x,y)............................................
'----------
--
Salutations
JJ
"JMD" <pas@sans.fr> a écrit dans le message de news:
Ojwv5dZYHHA.1216@TK2MSFTNGP03.phx.gbl...
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on peut
détecter que la cellule Cells(X,Y) a un trait de bordure basse ?
Bonsoir, Ceci peut être '---------- If ActiveCell.Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox "Bordure basse sur cette cellule" ou if cells(x,y)............................................ '----------
-- Salutations JJ
"JMD" a écrit dans le message de news:
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on peut détecter que la cellule Cells(X,Y) a un trait de bordure basse ?
Merci beaucup.
JMD
Merci.
If Cells(LigneCorps, 1).Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox LigneCorps & "Bordure basse sur cette cellule"
répond sur toutes les cellules, même celles sans bordure... Mais je vais insister !
A +
"Jacky" a écrit dans le message de news: %
Bonsoir, Ceci peut être '---------- If ActiveCell.Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox "Bordure basse sur cette cellule" ou if cells(x,y)............................................ '----------
-- Salutations JJ
"JMD" a écrit dans le message de news:
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on peut détecter que la cellule Cells(X,Y) a un trait de bordure basse ?
Merci beaucup.
Merci.
If Cells(LigneCorps, 1).Borders(xlEdgeBottom).LineStyle <> xlNone Then
MsgBox LigneCorps & "Bordure basse sur cette cellule"
répond sur toutes les cellules, même celles sans bordure... Mais je vais
insister !
A +
"Jacky" <dupont@marcel.fr> a écrit dans le message de news:
%230486uZYHHA.2640@TK2MSFTNGP06.phx.gbl...
Bonsoir,
Ceci peut être
'----------
If ActiveCell.Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox
"Bordure basse sur cette cellule"
ou
if cells(x,y)............................................
'----------
--
Salutations
JJ
"JMD" <pas@sans.fr> a écrit dans le message de news:
Ojwv5dZYHHA.1216@TK2MSFTNGP03.phx.gbl...
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on
peut détecter que la cellule Cells(X,Y) a un trait de bordure basse ?
If Cells(LigneCorps, 1).Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox LigneCorps & "Bordure basse sur cette cellule"
répond sur toutes les cellules, même celles sans bordure... Mais je vais insister !
A +
"Jacky" a écrit dans le message de news: %
Bonsoir, Ceci peut être '---------- If ActiveCell.Borders(xlEdgeBottom).LineStyle <> xlNone Then MsgBox "Bordure basse sur cette cellule" ou if cells(x,y)............................................ '----------
-- Salutations JJ
"JMD" a écrit dans le message de news:
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on peut détecter que la cellule Cells(X,Y) a un trait de bordure basse ?
Merci beaucup.
garnote
Bonjour,
Un exemple avec la cellule A1:
Sub BordureBasse() If [a1].Borders(4).LineStyle = xlNone Then MsgBox "Pas de bordure basse." Else MsgBox "Bordure basse." End If End Sub
Serge
"JMD" a écrit dans le message de news:
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on peut détecter que la cellule Cells(X,Y) a un trait de bordure basse ?
Merci beaucup.
Bonjour,
Un exemple avec la cellule A1:
Sub BordureBasse()
If [a1].Borders(4).LineStyle = xlNone Then
MsgBox "Pas de bordure basse."
Else
MsgBox "Bordure basse."
End If
End Sub
Serge
"JMD" <pas@sans.fr> a écrit dans le message de news: Ojwv5dZYHHA.1216@TK2MSFTNGP03.phx.gbl...
Bonjour.
Quelqu'un peut-il avoir l'amabilité de m'indiquer comment, en VBA, on peut détecter que la cellule Cells(X,Y) a un trait de
bordure basse ?