créer vbscript avec excel

bonjour à tous,
Je n'ai jamais utilisé le langage VBscript t je cherche à réaliser un script qui permet d'ouvrir un fichier Excel (avec un nom fixe) contenant une seule feuille.
Le script permettra simplement d'appliquer un taux (faire une multiplication par 1,10) sur l'ensemble des cellules d'une collone (ex: collone B).
Pouvez-vous m'aider à réaliser ce script.Je ne connais pas la commande VBscript pour ouvrir un ficier Excel précis. comment dois-je faire pour appliquer l'opération de multiplication sur l'ensemble de la collone (boucle for?)
merci d'avance pour votre aide.
Cordialement Kévin.

bonjour,

vous pouvez le faire en vba excel à l'aide d'une macro:

Code:

---

1 2 3

For Each cellule In Range("B1:B65536") cellule.Value = cellule.Value * 1.1 Next cellule

---

Tout d'abord, merci pour la réponse.
La solution Vba fonctionne bien mais elle ne peut convenir dans mon cas.
En effet, je vais recevoir un fichier nouveau fichier excel tout les lundi ce qui implique que je devrais à chaque fois copier ma macros.
Le vbscript me semblait intéressant car il est inérant aux fichiers que je vais recevoir.
merci d'avance pour votre aide.
Très cordialement.

Bonsoir,

pour un tel problème j'aurai plutôt utilisé un classeur Excel indépendamment du classeur à traiter, ce classeur contenant ton code ..

En VBScript , pour commencer tu pourrai t'inspirer de :

Comment piloter Excel pour créer un classeur.xls ?

;)

Merci pour la redirection.Le début du script est bon mais je vais avoir besoin de vous pour les commandes suivantes.
Après avoir créer créer le nouveau fichier, il faut que j'ouvre le fichier que j'ai recu:

Code:

---

1 2 3 4 5 6

Fichier_XLS = " c:\MonClasseurRecu " Feuille_XLS = "Feuil1" set oXL = WScript.CreateObject("EXCEL.application" ) oXL.Visible = False oXL.workbooks.open Fichier_XLS oXL.sheets(Feuille_XLS).Activate

---

Est ce que c'est bon? puis il faudrait m'expliquer comment importer 3 champs complet vers le fichier nouvellement crée.

La derniere étape est simple je suppose, je n'aurais qu'a multiplier la variable par le coefficient dont j'ai besoin.
Merci d'avance pour votre aide. Très cordialement kévin

pour continuer ma proposition, ta macro sera stoker quelque part et tu n'auras pas besoin de la copier qui va contenir le script suivant (non tester) :

fichierMacro.xlsm

Code:

---

1 2 3 4 5 6 7 8 9

sub Macro() Workbooks.Open "chemin de ton fichier" For Each cellule In Range("B1:B65536") cellule.Value = cellule.Value * 1.1 Next cellule ActiveWorkbook.Save Workbooks.Close End Sub

---

fichierLanceur.vbs

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Lanceur()   Dim AppExcel   Set AppExcel = CreateObject("Excel.Application") AppExcel.workbooks.Open "chemin de ta macro" AppExcel.Run "nom de la macro" End Sub   Lanceur

---

voila

Un grand merci. Après quelques modifications, le script fonctionne bien!
Merci pour votre aide!
Longue vie à la communauté de developpez.net.
Très cordialement Kévin.

salut
n'oublie pas de m'entionner le sujet comme résolu