Love_Sky
Messages postés1Date d'inscriptionvendredi 22 mars 2002StatutMembreDernière intervention 6 septembre 2007
-
6 sept. 2007 à 08:01
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 2018
-
6 sept. 2007 à 11:44
Suite à une demande de mon patron, il me faudrait une feuille Excel assez particulière.
J'avoue que je suis assez novice en la matière malgré les petits cours que j'ai pris il y a quelques années.
Je vous expose mon problème :
Il me faudrait une feuille Excel, sur celle-ci, il y a des colonnes avec des intitulés ( Noms, Prénoms, Société, etc ... )
Jusque la, rien de difficile.
Il y aura une colonne en particulier qui sera la colonne "Informations"
Ce qu'il faudrait, pour chaque ligne créée, c'est qu'un bouton apparaisse dans la colonne "Informations"
Ce bouton, devra permettre d'ouvrir un simple fichier texte (si il existe ) ou en créer un dans le cas contraire, dans ce cas ci, le fichier prendrait automatiquement comme nom le nom de la société correspondante.
J'espere que mon expliquation est assez claire :)
Si vous pouviez m'aider, ca serait vraiment géniale et je vous en remercie
1- Ajouter un bouton: Voir ActiveSheet.Buttons.Add ou bien ActiveSheet.OLEObjects.Add(ClassType:= "Forms.CommandButton.1"... 3- Récupérer le nom de la société NomFIchier = ActiveSheet.Range("C" & NumLigne).Text& ".txt" 2- Ajouter du code pour le bouton cree qui regarde si NomFichier Existe (Dir) sinon le créée
3- Utilise ShellExecute pour ouvrir le fichier txt
VB_PtitCat
Messages postés197Date d'inscriptionmercredi 30 mai 2007StatutMembreDernière intervention13 mai 2009 6 sept. 2007 à 09:54
Moi pour ouvrir un notepad, j'avais utilisé cette commande, mais je sais qu'il y a mieu comme ligne mais bon disons que c'est un simple exemple :
AppActivate (Shell("C:\Windows\notepad.EXE c:\windows\infobit.ini", 3))
MerZi ... Zi ... Zi ... PtitCat
P.S:DSL pour l'orthographe
Pour les fichiers, regarde du côté de DIR pour vérifier si le fichier existe, puis OPEN ... FOR OUTPUT ... pour écrire ce fichier en écrasant les données présentes. APPEND pour ajouter sans écraser, INPUT pour lire ....