Bonjour à tous,
Je développe un pettit AddIn pour Excel sous VB2013
Dans une Sub je suis amené à déclarer plusieurs variables de types comme ceci :
1 2 3 4 5
|
Dim Cellule_1 As Range = Feuille_Excel.Cells(5, 1)
Dim Cellule_2 As Range = Feuille_Excel.Cells(5, 2)
Dim Cellule_3 As Range = Feuille_Excel.Cells(5, 3)
... |
Puis leurs assignées une valeur :
1 2 3 4 5
|
Cellule_1.Value = Path.GetFileNameWithoutExtension(Fenetre_dialogue.FileName)
Cellule_2.Value = Fenetre_dialogue.FileName
Cellule_3.Value = Acquisition_propriete(Fenetre_dialogue.FileName, "Référence")
... |
Et ainsi plus d'une dizaine.
Je pense que cela est disgracieux et de surcroit fort peu pratique a coder.
Je pense donc qu'il doit avoir une autre façon de procéder ou que je m'y prend pas du tout de la bonne façon.
Alors j'ai testé cela sans résultat :
Feuille_Excel.Cells(5, 1).Value = Path.GetFileNameWithoutExtension(Fenetre_dialogue.FileName)
J'ai ensuite regarder dans les cours disponibles sur le site. Sans résultat également.
Je vous remercie par avance pour vos réponses à ma question qui va certainement vous paraitre "bête".
Partager