Vbs+excel :( [Résolu] - VB/VBA/VBS - Programmation
Marsh Posté le 19-07-2005 à 14:40:24
salut je suis egalement debutant en vbs et moi je te conseillerais d enlever tous les AS... lors tu declare tes variables.
exple: pour Dim appExcel As Excel.Application
tu met plutot ca Dim appExcel
Marsh Posté le 19-07-2005 à 14:57:10
mohax007 a écrit : salut je suis egalement debutant en vbs et moi je te conseillerais d enlever tous les AS... lors tu declare tes variables. |
Pour ouvrir word je fais
objWord.Documents.Add(path)
je pense que plutot que de faire open tu devrais faire un "add" comme moi
Enfin tente
Marsh Posté le 19-07-2005 à 15:04:29
Pour créer un nouveau fichier fait çà:
Oublie pas de cocher la référence excel
Dim xlApp As Excel.Application
Dim xlSheet As Excel.Worksheet
Dim xlBook As Excel.Workbook
'J'initialise mes variables
Set xlApp = CreateObject("Excel.Application" )
Set xlBook = xlApp.Workbooks.Add
'Ajouter une feuille de calcul nommée nb_interventions
Set xlSheet = xlBook.Worksheets.Add
xlSheet.Name = "nv_feuille"
xlBook.Sheets("nv_feuille" ).Select
'enregistre
xlBook.SaveAs ("D:\test.xls" )
xlApp.Quit
Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing
Marsh Posté le 19-07-2005 à 15:37:38
bon bah ok jvé voir avec cela
Encor merci à vous
et comment on peut inserer une ligne en vbs dans un fichier Excel
Marsh Posté le 19-07-2005 à 16:21:53
ca va aller a la ligne 4, decaler le contenu vers le bas pour inserer une nouvelle ligne.
Set objExcel = CreateObject("Excel.Application" ) |
piloupy
Marsh Posté le 19-07-2005 à 17:07:36
comment puis-je centrer tout les elements de la ligne 1 ?
Marsh Posté le 20-07-2005 à 14:05:49
julseb : tu as trouve la reponse a ta question ?
J'ai cherche, mais j'ai pas trouve ...
piloupy
Marsh Posté le 20-07-2005 à 14:17:56
non toujours po pourtant je cherche sur google mais rien encore
Marsh Posté le 25-07-2005 à 11:19:11
C'est pas dur tu fait comme moi. Quand je connais pas j'enregistre la macro de se que je veut faire. tu clique dans le menu sur outils, macro puis nouvelle macro. Ensuite tu fait ce que tu veut et quand t'as fini tu clique sur le carré dans la barre d'outils macro pour arrêter l'enregistrement. Ensuite tu fais un petit Alt+F11 et tu vas voir le code après copier, coller .... :-)
Marsh Posté le 19-07-2005 à 10:08:45
Bon jour
voila j'essaye de faire un .VBS pour ouvrir un fichier excel et cela ne fonctionne pas j'aurais besoin d'un peu de lumiere svp. Voici le code:
'Déclaration des variables
Dim appExcel As Excel.Application
'Application Excel
Dim wbExcel As Excel.Workbook
'Classeur Excel
Dim wsExcel As Excel.Worksheet
'Feuille Excel
'Ouverture de l'application
Set appExcel = CreateObject("Excel.Application" )
'Ouverture d'un fichier Excel
Set wbExcel = appExcel.Workbooks.Open("C:\Testo\test.xls" )
'wsExcel correspond à la première feuille du fichier
Set wsExcel = wbExcel.Worksheets(1)
wbExcel.Close
'Fermeture du classeur Excel
appExcel.Quit
'Fermeture de l'application Excel
'Désallocation mémoire
Set wsExcel = Nothing
Set wbExcel = Nothing
Set appExcel = Nothing
Merci d'avance
Message édité par julseb le 27-07-2005 à 07:51:07