Besoin d'aide

Signaler
Messages postés
1
Date d'inscription
vendredi 22 mars 2002
Statut
Membre
Dernière intervention
6 septembre 2007
-
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
23 août 2018
-
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

Bien à vous

Farah

4 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
56
Salut,
Dans ton cas le thème correct pour poster tes messages est : [infomsg.aspx Thèmes]

/ [infomsgf_VISUAL-BASIC_1.aspx Visual Basic 6] / [infomsgt_LANGAGES-DERIVES_287.aspx Langages dérivés] / [infomsgt_VBA_244.aspx VBA]

Taches d'y penser pour tes prochains messages.

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

@+: Ju£i?n
Pensez: Réponse acceptée
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Modérateur
Dernière intervention
4 mars 2013
120
Salut,

sujet déplacé !
______________________________________
DarK Sidious
Messages postés
197
Date d'inscription
mercredi 30 mai 2007
Statut
Membre
Dernière intervention
13 mai 2009

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
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
23 août 2018
18
L'ajout de boutons pour plusieurs lignes va finir par grossir et ralentir ton fichier pas mal...
Je pense qu'en ajoutant un menu sur click droit de la cellule faciliterait la chose.
Voir ce lien:
http://www.codyx.org/snippet_ajout-menu-sous-menus-menu-contextuel-excel_288.aspxMenus et sous-menus

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 ....

MPi