TUTOS.EU

Générer des commandes avec Excel

Préparer les lignes de commande avec Excel

Lancez le fichier excel fourni et authorisez les macros

Entrez vos valeurs dans la colonne A

Lancez Visual Basic Editor

Modifiez la ligne ci-dessous qui sert de template

Pour information, voici le code contenu dans la macro :

Public Sub GenererCommandes()

	Dim CompteurLigne
	Dim NomFeuille
	Dim ContenuCase 'Contenu d une case

	Dim VarUser01

	Dim CommandeDeBase
	Dim CommandeFinale

	Dim VVVariable01
	Dim VVVariableRemplaceeParCase

	CommandeDeBase = "MonExe.exe ""\\VVVariable01\VVVariableRemplaceeParCase"" >> C:\UnLog.txt"

	VarUser01 = InputBox("Entrez la valeur de VarUser01", "VarUser01", "Variable user 01")

	NomFeuille = "Feuil1"

	Sheets(NomFeuille).Select
	CompteurLigne = 1
	ContenuCase = Trim(Cells(CompteurLigne, 1).FormulaR1C1)
	Do While Len(ContenuCase) > 0

		'Debut de modification de la commande de base
		CommandeFinale = Replace(CommandeDeBase, "VVVariableRemplaceeParCase", ContenuCase)

		'Modification d'autres variables
		CommandeFinale = Replace(CommandeFinale, "VVVariable01", VarUser01)
		Cells(CompteurLigne, 2).FormulaR1C1 = CommandeFinale

		CompteurLigne = CompteurLigne + 1
		ContenuCase = Trim(Cells(CompteurLigne, 1).FormulaR1C1)
		DoEvents

	Loop

End Sub
Lien vers le fichier : cliquez ici Copier le code

Téléchargement(s)

NomSite Web d origineDescription
Excel_Generer_Commande.xl... Feuille excel avec une macro pour personnaliser une ligne de commande avec un tableau de valeurs


2