Discussion :

[lololebricoleur]

Bonjour,

J'ai besoin de pouvoir importer des données venant d'un fichier Excel.
Là où sa se complique c'est que je souhaite que le fichier Excel soit libre, l'utilisateur met ce qu'il veut, où il veut, comme il veut.
Je pensais me repérer à l'aide des noms de cellules.
Autrement dit, la contrainte pour l'utilisateur c'est que par exemple, la cellule dans laquelle il veut mettre le "Titre" doit simplement être nommée "Titre"
Dans mon code, il me suffirait alors de faire référence au nom de cellule pour retrouver les valeurs à importer.
Je pensais que la fonction xlsNomVersCoordonnées me permettrait de faire ça mais non, elle ne sait que convertir une réf de cellule au formation lettre de colonne et n° de ligne en n° de colonne et n° de ligne...

Comment puis je faire pour contourner cette lacune svp ?

Merci d'avance de votre aide

[tbc92]

J'ai trouvé ce petit exemple dans la doc VBA :

Code VBA :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Set nms = ActiveWorkbook.Names 
Set wks = Worksheets(1) 
For r = 1 To nms.Count 
    wks.Cells(r, 2).Value = nms(r).Name 
    wks.Cells(r, 3).Value = nms(r).RefersToRange.Address 
Next

Ca liste tous les 'NAMES' qui existent dans le fichier (tous onglets confondus)
Et ça te donne l'adresse de chaque range qui a un nom (exemple de format d'adresse : $C$5:$D$7 ) .

En faisant comme ça, tu peux donc décomposer l'adresse, ... et utiliser les outils classiques.

Je n'ai pas recherché beaucoup plus, mais je pense que tu peux faire les choses plus proprement, et traiter chaque RANGE, sans même passer par l'adresse.