IMPRESSION D'UNE LISTVIEW EN GÉNÉRANT UN FICHIER EXCEL

Commentaire de radcur le 28/11/2008 05:03:23

salut

j'ai vu la source.

petit conseil, donnes un nom significatif a tes contrôles button1, button2, etc. ca ne "dit" pas à quoi sert ce bouton.  BtnAjouter, btnModifier est plus clair.


ensuite, il y a moyen d'améliorer ta façon de tuer le process de Excel.

  For j = 0 To Process2.GetUpperBound(0)
     If Process2(j).ProcessName = "EXCEL" Then
        ' Parcours des processus avant le mien
        For k = 0 To Process1.GetUpperBound(0)
           If Process1(k).ProcessName = "EXCEL" Then
              If Process2(j).Id <> Process1(k).Id Then
                 'S'il est différend, c'est le mien (pas
                 'certain à 100% mais généralement c'est le cas)
                  Process.GetProcessById(Process2(j).id).Kill()
                  Exit Sub
              End If
           End If
        Next
    End If
Next
End Sub