cs_jeralex
Messages postés11Date d'inscriptionmercredi 1 décembre 2004StatutMembreDernière intervention 5 juillet 2005
-
4 juil. 2005 à 14:38
ScSami
Messages postés1488Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 décembre 2007
-
6 juil. 2005 à 02:52
Bonjour à tous,
J'utilise un fichier tampon Excel entre 2 autres fichiers Excel et je realise des liaison entre ces 3 fichiers. Mon probleme se situe dans la copie de données du fichier contenant les informations brut et celui qui me sert de tampon.
Voila mon code actuel :
Function InitPFCourant(ligne As Integer, entete As Boolean)
Windows("dossfabfusion.xls").Activate
Sheets("XL_PF").Select
Range("A" & ligne).EntireRow.Copy
If entete Then
Windows("PFCourant").Activate
Sheets("Info_PF").Select
Range("A1:CZ1").PasteSpecial
Else
Windows("PFCourant").Activate
Sheets("Info_PF").Select
Range("A2:CZ2").PasteSpecial
End If
Workbooks("PFCourant").Save
End Function
Cela fonction mais la sauvegarde echoue le plus souvent en mode normal alors que quand je fais du pas à pas la sauvegarde se passe bien. Si quelqu'un a une idée sur mon probleme ou qu'il a une meilleurs solution je suis preneur.
ScSami
Messages postés1488Date d'inscriptionmercredi 5 février 2003StatutMembreDernière intervention 3 décembre 200724 4 juil. 2005 à 20:24
Essay aussi de placer un (ou plusieurs) "DoEvents" avant
la sauvegarde... Ca lui laissera peut-être le temps de faire la
copie... Parce qu'a mon avis, il est là ton problème! Si les colonnes
sont trop longues à copier, le VB Ava plus vite que la méthode Past et
du coup, quand tu veux sauvegarder Excel est déjà occupé à coller et
pof, ça marche pas! Enfin, ça, c'est ma théorie... A toi de voir si
elle s'avère juste!!!
Enjoy
<hr size="2" width="100%">
(Si une réponse vous convient, cliquez sur le bouton "Réponse accéptée"...)
cs_jeralex
Messages postés11Date d'inscriptionmercredi 1 décembre 2004StatutMembreDernière intervention 5 juillet 2005 5 juil. 2005 à 11:33
Bah en fait c'est plus ou moins ca. Comme j'execute cette fonction dans une boucle et que j'avais desactivé le rafraichissement de l'ecran, je pensais que Excel se plantait mais en faite c'est juste qu'il fallait 5min pour passer à autre chose. J'ai mis des Do event et ca a l'air de plus planter à la sauvegarde.