Discussion :

[gregm954]

Bonjour a tous, j'ai un code pour ouvrir un fichier excel et écrire dedans , pas de problème ( dans une form1 ) , j'ai créer une form 2 et j'aimerai écrire dans le fichier excel ouvert dans la form 1 et problème impossible de trouver comment faire!!!
Je ne veux pas ouvrir ou creer un nouveau fichier excel je veux simplement ecrire dans le fichier excel deja ouvert dan sla form 1 mais impossible
au secours !!
merci de votre aide
Greg
voici le code de la form 1

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 Excel = Microsoft.Office.Interop.Excel
Public Class Form1
    Dim APP As New Excel.Application
    Dim worksheet As Excel.Worksheet
    Dim workbook As Excel.Workbook
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        workbook = APP.Workbooks.Open("I:\x.xlsx")
        worksheet = workbook.Worksheets("Feuil1")
 
 
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        worksheet.Cells(1, 1).Value = TextBox1.Text
 
    End Sub [/I]

[shayw]

Bonjour

et si tu déclares worksheet As Excel.Worksheet comme public

Code :

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

 Public  worksheet As Excel.Worksheet

et dans l'autre form
Form1.worksheet.Cells(1, 1) = ce que tu veux

[gregm954]

merci Shayw pour t'on aide,
Ca ne fonctionne pas , j'ai toujours le même message d'erreur "La référence d'objet n'est pas définie à une instance d'un objet." , je dois faire une connerie mais ou????
merci encore Greg

[clementmarcotte]

Bonjour,

En ajoutant la référence, soit à ExcelXX Object Library, (si ti n'as pas les Primary Interrop Assemblies d'office), soit à Microsoft.Office.Interop.Excel, si tu as les Primary Interop Assemblies, ceci "marche "full pin" chez-moi

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
Imports excel = Microsoft.Office.Interop.Excel
Public Class Form2
    Dim APP As New excel.Application
    Dim worksheet As excel.Worksheet
    Dim workbook As excel.Workbook
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        APP.Visible = True
        workbook = APP.Workbooks.Open("vitefait.xlsx")
        worksheet = workbook.Worksheets("Feuil1")
    End Sub
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        worksheet.Cells(1, 1).Value = TextBox1.Text
 
    End Sub
End Class

Donc, la question qui tue : as-tu ajouté la référence (Excel ou PIA) ?

[gregm954]

Bonjour,
1-Oui j'ai activé la référence COM dans vb , puisque dans la FORM 1 j'arrive à ouvrir le fichier excel "I:\x.xlsx"et écrire dedans , ensuite je ferme la form 1 sans fermer le fichier excel "I:\x.xlsx" et j'ouvre une form 2 mais je n'arrive pas à écrire dans ce fichier excel a partir de la form 2!!!!
2-Clement , je supose que le code que tu as mis est à coller dans la form1 , je ne comprend pas:
"Public Class Form2" et" Private Sub Form1_Load"??
Bonne journée
GReg

[clementmarcotte]

Bonjour,

Bonjour,
1-Oui j'ai activé la référence COM dans vb , puisque dans la FORM 1 j'arrive à ouvrir le fichier excel "I:\x.xlsx"et écrire dedans , ensuite je ferme la form 1 sans fermer le fichier excel "I:\x.xlsx" et j'ouvre une form 2 mais je n'arrive pas à écrire dans ce fichier excel a partir de la form 2!!!!
2-Clement , je supose que le code que tu as mis est à coller dans la form1 , je ne comprend pas:
"Public Class Form2" et" Private Sub Form1_Load"??
Bonne journée
GReg

Oups!!!!!!!!!!!

Dans mon cas, c'est Form2, parce que le l'ai ajouté à un autre programme que j'utilise pour des tests. Tu peux l'utiliser dans Form1. Mais si tu réussis à ouvrir Excel et son fichier dans ta Form1, mon code ne changera pas grand chose. En lisant ta réponse, je réalise que je suis "mal parti".

Donc l'idée de base, c'est que ton fichier est ouvert dans ta Form1 et il reste ouvert quand tu ouvres ta Form2 qui doit utiliser le fichier ouvert.

Quand j'ai lu ta question initiale, j'avais compris que tu utilisais ta Form1 pour ouvrir ta Form2 et que c'était ta Form2 qui ouvrait Excel et le fichier. Il va falloir que j'y repense. Désolé pour l'erreur.