Discussion :

[JennBBd]

L'éditeur me dit que sur la ligne en rouge "résolution tardive, risque de plantage" et effectivement j'ai un alèa : ça plante ou pas selon la bécane où le pgm tourne.
Qui peut m'aider à reformuler cette ligne de pgm pour éviter cette résolution tardive ?
Merci

Je vous donne le code concerné :

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
16
17
18
19
Imports System
Imports System.IO
Imports System.Text
Imports System.String
Imports System.Drawing
Imports System.Windows.Forms
Imports System.Drawing.Printing
Imports Microsoft.Office.Interop.Excel

Public Class Volumes
    Dim oXL As Object
    Dim oBook As Microsoft.Office.Interop.Excel.Workbook
    Dim oSheet As Microsoft.Office.Interop.Excel.Worksheet
[plus loin..]
dim CHa as string
        CHa = ConcatPath(g_PathClient, "fichesdetailleesVolumesFG.xls", False)
'[le concatPath est une fonction qui renvoie un string]

        oBook = oXL.Workbook.Open(CHa)