Detecter lettre lecteur cd

Résolu/Fermé
noosh2 Messages postés 6 Date d'inscription mardi 3 mai 2005 Statut Membre Dernière intervention 4 novembre 2005 - 5 mai 2005 à 16:00
noosh2 Messages postés 6 Date d'inscription mardi 3 mai 2005 Statut Membre Dernière intervention 4 novembre 2005 - 13 mai 2005 à 12:42
Bonjour,
j'ai gravé 4 classeur xls sur un cd:dans le 1er classeur des macros pour ouvrir les autres classeurs, cela fonctionnait sur le pc.Mais la lettre du lecteur n'est plus la meme sur le cd
Comment puis je indiquer dans ma macro que le fichier a ouvrir est sur le cd, sachant que d'un ordi à l'autre la lettre du lecteur change.
ma ligne de commande;
worbooks.open filename="que dois je ecrire ici:\dossier à ouvrir.xls"
ou une ligne de commande a entrer avant pour rechercher le lecteur??
Merci
A voir également:

3 réponses

sam3000 Messages postés 1225 Date d'inscription mercredi 22 décembre 2004 Statut Membre Dernière intervention 13 juin 2005 144
5 mai 2005 à 16:08
ne met que nom du fichier sans le "....\"
exemple:
worbooks.open filename="dossier à ouvrir.xls"

ca devrais marcher si les deux documents sont au meme endroit
0
noosh2 Messages postés 6 Date d'inscription mardi 3 mai 2005 Statut Membre Dernière intervention 4 novembre 2005
6 mai 2005 à 12:53
bonjour et merci de m'avoir répondu, j'ai suivi tes conseils mais sans succès. Les 2 dossiers sont bien sur le meme cd et ont la meme extension "xls". sais tu si il est possible te dire d'aller dans le disque exemple E puis G puis H ainsi de suite jusqu'a ce que la lettre du lecteur soit la bonne?
merci encore
A+
serge
0
sam3000 Messages postés 1225 Date d'inscription mercredi 22 décembre 2004 Statut Membre Dernière intervention 13 juin 2005 144
7 mai 2005 à 10:51
oui ça pourrais etre une solution: (en VBA)
for  i=1 to 26
   worbooks.open filename=chr(64+i) & ":\dossier à ouvrir.xls"
next
0
noosh2 Messages postés 6 Date d'inscription mardi 3 mai 2005 Statut Membre Dernière intervention 4 novembre 2005
13 mai 2005 à 12:42
Bonjour,
apres un if peu ont faire suivre plusieurs then sans avoir a retaper
le 1er if
Comment imposer une police et la taille? dans la macro à la suite de
then

merci A+
0