Discussion :

[Denis_67]

Bonjour,
Je bloque sur une selection de cellules non contigues pour appliquer un format.
par tatonnement j'ai réussi à générer maplage, mais je n'arrive pas à la sélectionner.
J'avais d'abord mis un dim maplage as range, mais là la commande union de passe pas.
Maintenant j'ai ma plage de créé, mais j'ai l'erreur 1004 lors du select.
merci pour votre aide
Denis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
MaPlage = Union(Range(Cells(DerLig + 2, 1), Cells(DerLig + 2, 1)), Range(Cells(DerLig + 2, DerCol + 2), Cells(DerLig + 2, DerCol + 2)), _
Range(Cells(DerLig + 9, 1), Cells(DerLig + 9, 1)), Range(Cells(DerLig + 9, DerCol + 2), Cells(DerLig + 9, DerCol + 2)))
    Range(MaPlage).Select

[Marc-L]

Bonjour.

mais je n'arrive pas à la sélectionner.

Inutile de sélectionner un objet pour y accéder !

MaPlage.NumberFormat = … .

[Denis_67]

C'était bien essayé, mais ça ne marche pas mieux.
j'ai mis le sélect en comment et remplacé tous mes "selection" par maplage
mais je bloque à maplage.tyle= "comma" une erreur 424
merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
'    Range(MaPlage).Select
    maplage.Style = "Comma"
    maplage.NumberFormat = _
        "_-* #,##0 _D_M_-;-* #,##0 _D_M_-;_-* ""-""?? _D_M_-;_-@_-"
    maplage.Font.Bold = True
    maplage.Borders(xlDiagonalDown).LineStyle = xlNone
    maplage.Borders(xlDiagonalUp).LineStyle = xlNone
    With maplage.Borders(xlEdgeLeft)