Nom de fichier : exemple12.xls... recupérer le chiffre en variable

[Jeanbulle]

Bonjour !


La question est peut être bête.
Mais j'ai besoin d'extraire cette variable chiffre pour faire une recherche.

Egalement, quand je donne une destination de feuille avec
WSCible = Nothing
et suivant les conditions
WSCible = Worksheets("hors garantie") ou WSCible = Worksheets("sous garantie") etc etc


Puis je extraire le nom de wscible dans une msgbox ?
Msgbox wscible ?


Voilà, pour les connaisseurs

Merci, et passez de bonne fête, doucement sur les routes.
A part si vous marchez

 

[porcinet82]

Re : Nom de fichier : exemple12.xls... recupérer le chiffre en variable

Salut,

Pour la première question, tu peux peut etre t'inspirer du code suivant, le problème c'est qu'il fonctionne seulement si le nombre de ton fichier contient 2 chiffres (si ce n'est pas le cas, il faut que tu modifie les paramètres) :
nom_fichier = "exemple12.xls"
num_fichier = Val(Mid(nom_fichier, InStr(1, nom_fichier, ".") - 2, 2))

Pour l'autre question, je dirais un truc de ce genre :
Msgbox "La derstination de la feuille est " & wscible

@+

 

[pierrejean]

Re : Nom de fichier : exemple12.xls... recupérer le chiffre en variable

bonjour Jeanbulle

pas sur d'avoir compris ta (ou tes) questions

Wscible.Name devrait te donner le nom de la feuille
(mais apres l'avoir specifié quelques lignes plus haut c'est absurde !!!)

pour la recuperation du chiffre

quelque chose dans le style

for n= 1 to len(nomdufichier)
if isnumeric(mid(nomdufichier(n,1)) then
chiffre=chiffre & mid(nomdufichier,n,1)
end if
next n

avec eventuellement (pour la transformation en nombre)
chiffre=Cdbl(chiffre)


salut Porcinet

desolé pour la collision

 

[Jeanbulle]

Re : Nom de fichier : exemple12.xls... recupérer le chiffre en variable

Bonjour et merci pour vos réponses.


En fait sur mon fichier, j'avais un WSCible = nothing, et suivant les critères rentrés dans la feuille, le fichier excel importait les données dans la bonne feuille.
Et j'avais besoin d'en faire apparaitre son nom tout simplement.



Pour le reste, les deux codes n'ont pas fonctionné malgré les investigations.
Mais peu importe, je n'en ai plus besoin.... ce sujet restera donc a moitié clot
Merci encore