OVH Cloud OVH Cloud

Bizarre et trés gênant

11 réponses
Avatar
AP
J'exporte des données vers EXCEL.
Je met en forme ensuite le tableau que j'ai crée depuis ACCESS. Jusque là
tout va bien,
mais, je veux créer deux fractionner le tableau.
J'utilise pour cela le code suivant:

' crée une fenêtre
sht.Range("A5").Select
With App.ActiveWindow
.SplitColumn = 0 ' nombre de colonnes à gauche qui seront figées
.SplitRow = 4 ' nombre de lignes qui seront figées avant la
séparation
End With
' et fige les volets
oApp.ActiveWindow.FreezePanes = True

Mais je ne sais pour quelle raison, une erreur se produit pas toujours sur
la ligne
.SplitColumn = 0

Err 91 : Variable objet ou variable de bloc with non définie.

A partir de la première apparition de ce message, cette erreur se reproduit
systématiquement

A priori, elle est liée au fait que App n'est pas défini.

J'ai la même erreur sur le code suivant

dim App as object
set App = getobject(,"EXCEL.application)

Je ne trouve pas la raison

Merci pour toute aide

1 réponse

1 2
Avatar
Raymond [mvp]
ça provient entr'autre de là.
il est préférable d'utiliser createobject et tu seras sûr que ton objet sera
fermé à la fin.
vérifie aussi que tu ne sors pas de la procédure sans passer par la
fermeture de l'objet en cas d'erreur ou autre.
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"AP" a écrit dans le message de news:

Le code transmis n'est pas complet.

Avant la mis en forme de la feuille EXCEL, j'exporte les données et EXCEL
reste ouvert. Cela pourrai-t-il être lié au message d'erreur affiché par
EXCEL (voir autre question que j'ai posé)???

Je ne ferme que lorsque j'ai terminé



1 2