Bonjour,

Je travail sur une macro en PPT.

J'avais ce code qui fonctionne très bien :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Private Sub CommandButton1_Click()
     Dim ID As Variant
     Dim Fichier As String
     Fichier = """EXCEL.EXE"" ""\\filer4\controles_production$\Formulaires\TEST.xlsm"""
     ID = Shell(Fichier, vbMaximizedFocus)
 End Sub
Je veux le remplacer par une concaténation d'information :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
     Dim ID As Variant
     Dim Fichier As String
     Fichier = """EXCEL.EXE"" & "" & Slide23.TextBox1.Value & """
     ID = Shell(Fichier, vbMaximizedFocus)
Cependant, cette syntaxe ne fonctionne pas .... pourtant je suis bien sur le bon slide PPT et je Pointe bien sur le bon TextBox... (il me semble que c'est une erreur de synthaxe...)

Pouvez-vous m'aider SVP car j'ai tout essayé...

Merci d'avance.

Cordialement.

GK