Discussion :

[fikou]

Bonjour,
J'aimerai tracé une diagonale dans une cellule Excel.
J'ouvre Excel de cette Façon :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim appExcel As Excel.Application
        Dim Classeur As Excel.Workbook
        Dim Feuille As Excel.Worksheet
       ''Ouverture de l'application
        'appExcel = New Excel.Application
        appExcel = CreateObject("Excel.Application")
 
        appExcel.Visible = False
 
        ''Path du fichier à ouvrir
        Dim ExcelFile As String = Application.StartupPath & "\MatriceFeuilleStandPistolet.xlsx"
        ''Ouverture du fichier xlsx
        Classeur = appExcel.Workbooks.Open(excelfile)
        ''Premiere feuille du classeur
        Feuille = Classeur.Worksheets(1)

J'ai le code d'une macro enregistrée dans Excel je n'arrive pas à la convertir sous vb.net

Code :

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

1
2
3
4
5
6
7
Feuille.Range("X3").Select()
 
        With Selection.Borders(xldigonalDown)
            .LineStyle = xlcontinuous()
            .ColorIndex = xlAutomatic
 
        End With

J'ai fait pas mal de recherche et de test mais je sèche.
Merci d'avance à tous
FikoU

[Sankasssss]

Bonjour,

Code :

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

1
2
 Dim rangeValue As Excel.Range = worksheet.Range(1, 1), worksheet.Cells(2, 2)
rangeValue.Borders(Excel.XlBordersIndex.xldigonalDown).LineStyle = Excel.XlLineStyle.xlcontinuous

[fikou]

Merci Sankasssss

Cela fonctionne comme ça :

Code :

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

1
2
Dim rangeValue As Excel.Range = Feuille.Cells(3, 8)
        rangeValue.Borders(Excel.XlBordersIndex.xlDiagonalDown).LineStyle = Excel.XlLineStyle.xlContinuous

J'ai une petite erreur "la variable feuille est utilisée avant qu'une valeur ne lui ait été assignée"

J'aimerai avoir le trait de la diagonale en plus épais

Je programme occasionnelement et à chaque fois je galère pour ce genre de chose. Ou peut ont trouver une doc sur ces commandes.

Merci encore
FikoU

[Sankasssss]

Je programme occasionnelement et à chaque fois je galère pour ce genre de chose. Ou peut ont trouver une doc sur ces commandes.

Ça c'est une question que j'aime bien

Rien de plus simple, une petite recherche dans google avec comme terme : "Borders Interop excel"
Et j'obtiens tout ce qu'il faut.

Si je rajoute MSDN dans les termes de la recherche je trouve directement Border Interface me donne en dessous un lien vers Border members qui contient tout ce qui nous intéresses dont Border.Weight

[fikou]

OK merci,
J'ai fais des recherches mais apparement pas assez ciblées.
Je cherchais plutot des truc du genre "excel et vb.net".

FikoU