Erreur d'exécution 91 VBA Access-> Excel

Bonjour,
ça fait des heures que je calle sur cette erreur. J'ouvre Excel puis je remplie un classeur avec les donnes venant de ma table.

J'ai une variable publique(

Citation:

---

Public Z as New Excel.Application

---

) et une methode centerHorizontal permettant de centrer les données dans les cellules. Voici la méthode:

Citation:

---

private sub centerHoritonzal(ligne as Long, colonne as Long, Z as Excel.Application)

Z.Cells(ligne.colonne).Select
with Selection
.HorizontalAlignment=XlCenter
end width

---

Lors de la première ouverture de Excel(lorsque je clique sur le bouton qui ouvre Excel), la méthode fonctionne bien. Mais lorsque je clique sur un autre bouton qui ouvre aussi Excel la méthode ne fonctionne plus. ça calle sur .HorizontalAlignment(car Selection=nothing) et je ne comprend pas pourquoi.

Et si je vais dans le menu Exécution -> réinitialiser, ça fonctionne de nouveau.

Merci d'avance pour votre aide.

salut
ca ne serait pas parce que tu ouvres 2 fois Excel sans le fermer...

tu commences par

Code:

---

Dim XLApp As Excel.Application

---

mais rajoute

Code:

---

1 2	XLApp.Quit Set XLApp = Nothing

---

a la fin ....:D

bon courage

J'ai fait cela, mais malheureusement il y a pas d'effet. Ce qui est bizarre est que les données sont bien remplies dans le classeur; mais dès que j'utilise

Citation:

---

select

---

pour selectionner une cellule à mettre en forme, ça bloque dans le bloc

Citation:

---

With Selection

---

.

Bonjour,
Je ne suis plus sur de la syntaxe mais il me semble qu'avec la référence à l'objet ou à l'application ça fonctionne

Code:

---

xlsApp.selection

---

ou

Code:

---

z.activesheet.activecell

---