un_mec_de_stras
Messages postés26Date d'inscriptionlundi 9 janvier 2006StatutMembreDernière intervention21 février 2006
-
17 janv. 2006 à 10:03
Chaudard33
Messages postés3Date d'inscriptionvendredi 1 juillet 2005StatutMembreDernière intervention20 janvier 2006
-
20 janv. 2006 à 15:32
voila g un big probleme
je réalise un ptit projet en vb qui genere un fichier excel derriere mais le truc c ke lorsque je lance mon application et que je veux apporté une modification via vb il me met tjr le petit message "des modifications ont été apportés au fichier excel, voulez- vous sauvegardez : oui/non/annuler "
de plus je voudrais savoir pourquoi lorsque je vai dan mon gestionnaire de tache je trouve EXCEL.EXE un grand nombre de fois
voici les commande ke j utilise pour ouvrir:
Set xl = New Excel.Application
Set wk = xl.Workbooks.Open(App.Path & "\Support Excel")
pour fermer:
xl.Quit
Set xl = Nothing
End
pour sauvegarder:
xl.SaveWorkspace
ce serai vraimen cool de m aider a resoudre ces prob
merci a tous
cs_eldim
Messages postés956Date d'inscriptionlundi 30 mai 2005StatutMembreDernière intervention21 août 20141 17 janv. 2006 à 11:24
Trois solutions :
- La plus propre : tu met tout ton code qui gère Excel dans une class, ensuite tu définit une variable local à ta procedure de démarrage (sub main)
Dans ton sub main tu lance ton formlaire principal en modal
ensuite tu supprime vide ta variable de class
- ou alors tu fais un exe supplémentaire qui ne sert qu'à gérer Excel
- Tu récupère l'ID du process Excel que tu génère et tu le Kill à la fin
Chaudard33
Messages postés3Date d'inscriptionvendredi 1 juillet 2005StatutMembreDernière intervention20 janvier 2006 20 janv. 2006 à 14:31
Bonjour,
J'ai un peu le même problème que un_mec_de_stras, j'ai trouvé comment désactiver les alertes de messages seulement après je voudrai rétablir ces messages pour qu'il me demande si je veux enregistrer les modifications...
Voila mon code:
xlApp.DisplayAlerts = False
xlSheet.Application.Visible = True
Dim nom_fichier As String
nom_fichier = cmbnom.Text
xlSheet.SaveAs("C:" & nom_fichier & ".xls")
Cela désactive tout et enregistre pas le fichier, et quand je rajoute la ligne
xlApp.DisplayAlerts = True
après la ligne application.visible = False
il me redemande au départ de remplacer ou pas le fichier.