* Bonjour, *
Je suis en train d'essayer la proposition de edelweisseric dans cette discussion:
J'ai mis cela :
1 2 3 4 5
| Sub lance_son00()
RepSonAJouer = Sheets("Param").Cells(50, 2) + "00.wav"
Call JouerFichierWav("C:\concours_photo\sons\01.wav")
Call JouerFichierWav(RepSonAJouer)
End Sub |
Le but est de ramasser le chemin "C:\concours_photo\sons\" du répertoire de ma base de sons en allant chercher cela dans une cellule dans une feuille "Param".
Call JouerFichierWav("C:\concours_photo\sons\01.wav")
Si je saisie dans le code le chemin, aucun souci.
Call JouerFichierWav(RepSonAJouer)
Ca ne fonctionne pas est me dit :
"Erreur de compilation : type d'argument ByRef incompatible."
Merci,
@+
Olivier
Partager