Office OpenDialog

Résolu
Utilisateur anonyme -  
 banga -
Bonjour,

J'aimerai que ma boite de dialogue d'ouverture de fichier s'ouvre automatiquement sur un répertoire spécifié, quelle est la syntaxe à ajouter pour cela? Merci d'avance . 

Function SelectionFichier01() As String
  Dim fd As Office.FileDialog
  
  ' Créer un objet FileDialog
  Set fd = Application.FileDialog(msoFileDialogOpen)
  
  ' Titre de la boîte de dialogue
  fd.Title = "Sélectionnez le fichier téléchargé"
  
  fd.Filters.Clear
  fd.Filters.Add "CSV", "*.csv"
  
  ' Ne pas autoriser la sélection multiple
  ' (donc 1 seul fichier est sélectionnable à la fois)
  fd.AllowMultiSelect = False
  
  ' Afficher la boîte de dialogue
  If fd.Show() Then
    SelectionFichier01 = fd.SelectedItems(1)
  End If
  Set fd = Nothing
End Function


A voir également:

1 réponse

Réponse 1 / 1
tuxboy Messages postés 995 Date d'inscription   Statut Membre Dernière intervention   190
  
fd.InitialFileName = "c:\ton_repertoire\"
1
banga
 
Bonjour! Je veux compiler le code source d'un pont MCU sur ubuntu. Le Makefile est le suivant:

1 both : openmcu-v1_1_9-src-tar.o openh323-v1_15_0-src-tar.o pwlib-v1_8_0-src-tar.o
2 gcc openmcu-v1_1_9-src-tar openh323-v1_15_0-src-tar pwlib-v1_8_0-src-tar -o both
3
4 openmcu-v1_1_9-src-tar.o : openmcu-v1_1_9-src-tar openh323-v1_15_0-src-tar pwlib-v1_8_0-src-tar
5 gcc openmcu-v1_1_9-src-tar openh323-v1_15_0-src-tar pwlib-v1_8_0-src-tar -o openmcu-v1_1_9-src-tar.o
6
7 openh323-v1_15_0-src-tar.o :openh323-v1_15_0-src-tar
8 gcc openh323-v1_15_0-src-tar -o openh323-v1_15_0-src-tar.o
9
10 pwlib-v1_8_0-src-tar.o: pwlib-v1_8_0-src-tar
11 gcc pwlib-v1_8_0-src-tar -o pwlib-v1_8_0-src-tar.o

Lorsque je tape la commande "make both" pour le compiler; il affiche le message d'erreur suivant:
Makefile:2: *** séparateur manquant . Arrêt.
Est-ce que quelqu'un peut m'aider?
MERCI D'AVANCE
0