Bonjour à tous,
J'ai codé une macro en VBA me permettant via un UserForm de manipuler un fichier Excel. Cette macro me permet notamment de créer ou d'ouvrir un fichier excel pour le manipuler par la suite.
Mon problème est le suivant:
- Lorsque je créer moi-même le fichier Excel grâce au UserForm, je peut toujours naviguer sur ce fichier entre 2 intéractions avec le UserForm (i.e. Je peux descendre et monter sur ce classeur et changer de feuilles)
- Lorsque j'ouvre un fichier Excel déjà existant pour pouvoir le manipuler, cette navigation est impossible: le fichier Excel est comme "figé"
Voici le code que j'utilise pour ouvrir le fichier:
J'aimerais pouvoir manipuler (entre 2 intéractions avec le UserForm) le fichier Excel ouvert (comme j'arrive à le faire lorsque je le créer), j'imagine qu'il s'agit d'une option à ajouter à la méthode "Open" mais je n'arrive pas à la trouver.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 ' Selection of the wanted Workbook fpath = Application.GetOpenFilename("Files (.xls .xlsm .xlsx .csv)(*.xls; *.xlsm; *.xlsx; *.csv), *.xls; *.xlsm; *.xlsx; *.csv", , "Open the File you want to modify: ") ' In we click on "Cancel" we quit the loop If fpath = False Then End If ' Opening of the Workbook Workbooks.Open fpath ' We save the name of the Workbook For i = Len(fpath) To 1 Step -1 If Mid(fpath, i, 1) = "\" Then Exit For Next fname = Mid(fpath, i + 1, Len(fpath))
Merci d'avance pour vos réponses,
Cordialement
Partager