Choix du serveur chemin macro

Bonjour,

J'ai besoin d'un peu d'aide, désolé si un post similaire existe déjà après recherche je ne trouve pas solution à m'a problématique suivante je voudrais pouvoir choisir la lettre qui détermine le serveur d'un chemin C:\le chemin par D:\le chemin, par l'utilisation d'une variable par Inputbox. Voici l'extrait de macro qui me pose problème et merci pour vos retours.

Private Sub Workbook_Open()

'Démarrage macro mode silence

Application.ScreenUpdating = False

'Choix du serveur

Dim S As String

S = InputBox("Entrer le serveur commun Q ou G ?", "Choix du serveur", "Q")

If S = "" Then Exit Sub

'Fichier 1

On Error Resume Next

Workbooks.Open Filename:="&S&:\Documents\Tableau de suivi - Fichier1.xlsm"

If Err <> 0 Then

Workbooks("Tableau de suivi - Fichier1.xlsm").Activate

Bonjour,

Qu'est-ce qu'un démarrage en mode silence ? Je n'ai jamais vu de macro faire de bruit en tant que telle...

Note que du code cité dans un post se met sous balises Code, le bouton </> sert à ça...

Et j'apprécie aussi toujours si l'écriture du code respecte certaines règles d'écriture, dont la déclaration systématique de toutes les variables en tête de procédure, avant tout code exécutable. Il y en a quelques autres qu'il est bon de respecter, mais on ne va pas s'étendre plus ici...

Ton problème paraît issu d'un mauvaise utilisation de & et des guillemets :

    Workbooks.Open S & ":\Documents\Tableau de suivi - Fichier1.xlsm"

Cordialement.

MFerrand

Merci, cela fonctionne parfaite, toutes mes excuses pour les erreurs de rédaction, les prochain post tiendrons compte des remarques.

Cordialement.

Bonne continuation !

Rechercher des sujets similaires à "choix serveur chemin macro"