> Tous les forums > Forum Bureautique
 [chemin relatif dans une macro]
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Magnan
  Posté le 04/01/2015 @ 10:44 
Aller en bas de la page 
Astucien

Bonjour,

Dans une macro j'ai la ligne suivante :

Application.ExecuteExcel4Macro "SOUND.PLAY(,""C:\users\alain\desktop\pacman.WAV"")"

Pb : si je change le répertoire, il est évident que cela ne fonctionne plus car le chemin n'est plus valide.

Comment modifier le chemin pour qu'il fasse référence au chemin dans lequel se trouve le fichier XL (Ma réference).

Merci d'avance.

A+

Publicité
gilbert_rgi
 Posté le 04/01/2015 à 12:03 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour

moi je regarderai plutôt du coté du path du fichier si le fichier est enregistré évidement

ex:

Sub test()
mavar = ThisWorkbook.Path
MsgBox mavar
End Sub



Modifié par gilbert_rgi le 04/01/2015 12:04
ferrand
 Posté le 04/01/2015 à 12:31 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Rien compris à ton problème !

L'emplacement du fichier Excel est indifférent pour l'exécution de cette ligne de code !

La seule chose qui importe c'est que le chemin du fichier pacman.wav soit le bon !

Magnan
 Posté le 05/01/2015 à 12:42 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Ferrrand : Mon pb est simple.

Je prévois de mettre mes fichiers XL et Wav dans un répertoire précis. Jusque la tout va bien, tout fonctionne

Si l'utilisateur déplace le bloc {XL+Wav} dans un autre répertoire cela ne peut plus fonctionner.

D'où la recherche de paramétrage du chemin. XL devrait trouver le chemin d'installation du fichier Excel ce qui permettrait d'indiquer le chemin du fichier son.

J'ignore le déplacement du seul fichier Wav.

Merci pour vos conseils.

a+

gilbert_rgi
 Posté le 05/01/2015 à 13:53 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

c'est ce que je t'ai indiqué dans un post au dessus

trouver le path du fichier

mavar = ThisWorkbook.Path

Application.ExecuteExcel4Macro "SOUND.PLAY(,""" & mavar & "\pacman.wav"")"

Attention aux""



Modifié par gilbert_rgi le 05/01/2015 15:30
ferrand
 Posté le 05/01/2015 à 15:08 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Si ton fichier wav suit le classeur, Gilbert t'avait donné la solution !

Magnan
 Posté le 06/01/2015 à 09:27 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Merci pour ce complément.

Je vais tester et vous tiens informés.

A+

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
349,99 €Casque réalité virtuelle Oculus Rift S à 349,99 €
Valable jusqu'au 28 Janvier

Amazon fait une promotion sur le casque de réalité virtuelle Oculus Rift S avec ses 2 manettes Oculus Touch à 349,99 € alors qu'on le trouve ailleurs à partir de 449 €. La livraison est gratuite. L'Oculus Rift S est un casque de Réalité Virtuelle pour PC qui vous permettra de tirer parti du meilleur de votre machine en matière de VR. Ce casque VR pour PC est le plus perfectionné conçu par Oculus. Plus ergonomique et plus performant, il est aussi plus confortable et plus efficace que ses prédécesseurs. L'immersion est parfaite, le rendu spectaculaire, les images éclatantes et bluffantes de réalisme. Sensations fortes garanties !


> Voir l'offre
239 €PC Ankermann (Intel Pentium Dual Core, 8Go RAM, SSD 480Go, Win 10 + Office 2019) à 239 € livré
Valable jusqu'au 28 Janvier

Amazon fait une belle promotion sur l'ordinateur de bureau Ankermann Silent PC Work à 239 € livré. Le PC est équipé d'un processeur Intel Pentium dual core à 2.7 GHz, de 8 Go de RAM, d'un SSD de 480 Go, d'un lecteur DVD, d'un lecteur de carte mémoires et tourne sous Windows 10 Pro 64 bits. Microsoft Office 2019 Pro en français est également fourni.

Une belle machine à l'aise en bureautique et Internet. Une dizaine de machines sont disponibles à ce tarif. n'hésitez pas si vous êtes intéressé. Garantie 2 ans.


> Voir l'offre
29,99 €SSD Western Digital Green 240 Go à 29,99 €
Valable jusqu'au 28 Janvier

Cdiscount fait une promotion sur le SSD Western Digital Green 240 Go qui passe à 29,99 € livré gratuitement. On le trouve ailleurs à partir de 33 €. Ce SSD à mémoires SLC et TLC offre des vitesses de 540 Mo/s en lecture et 465 Mo/s en écriture.


> Voir l'offre

Sujets relatifs
Macro dans Excel (chemin)
2 pages par feuille dans macro excel
Creation d' une boucle macro dans fichier EXCEL pour impression
macro afficher masquer lignes tableau dans word 2010
Ecrir par macro dans des cellules différents
se positionner avec une macro dans une cellule précise
Place du curseur dans macro
Bouton macro dans feuille Excel 2010
Macro introuvable / Erreur de compilation dans le module caché
Création d'une macro dans Word
Plus de sujets relatifs à [chemin relatif dans une macro]
 > Tous les forums > Forum Bureautique