Bonjour à tous et à toutes,

Voilà je suis plus que débutant en programmation. Mais je vais essayer d'être le plus précis possible

J'ai plusieurs formulaire avec les classiques ( checkbox, listbox, RadioButton, etc).

J'aimerais transférer dans un fichier Excel définit ( qui me sert d'Ordre de fabrication avec un mise en page prédéfinit) à l'avance le résultat de tous ce petit monde. Et après moult essais j'y suis arrivé. Mais étant fainéant je me demande si il y a pas une solution pour récupérer directement le RadioButton actif pour chaque groupbox plutôt que d'enchainé chaque cas et d'avoir 1 million de ligne...

Je précise que c'est ma grande première en matière de programmation de ce genre. J'était resté auparavant à la programmation machine avec mes grafcets et langage LADDER ^^

Voici la démarche que j'utilise des fois que je soit dans le faux :p

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
20
21
22
Dim xls As Excel.Application 'Application Excel'
    Dim OF2 As Excel.Workbook 'Classeur Excel'
    Dim AUTO As Excel.Worksheet 'Feuille Excel'
'Export OF'
Private Sub CréerUnOFToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles CréerUnOFToolStripMenuItem.Click
 
        xls = CreateObject("Excel.Application")
        OF2 = xls.Workbooks.Open("C:essai.xlsx")
        AUTO = OF2.Worksheets(1)
 
 
        If choix1.Checked = True Then
            AUTO.Cells(16, 7).Value = " choix1"
        End If
        If choix2.Checked = True Then
            AUTO.Cells(16, 7).Value = "choix2"
        End If
        AUTO.Cells(3, 9).Value = listbox.Text
 
 
        OF2.Save()
        xls.Quit()