rebonjour
j'ai grace au forum mis en place une macro complémentaire qui me permet de référence tout nouveau classeur lors de sa création
mais à la fin de cette macro s'excute, le VB s'affiche et non pas la classeur.
Quelle pourrait etre l'instruction qui dit au VB d'activer le classeur :s.
micii ;D
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Fichier As String
Fichier = "\\*****\COMMUN\INIT\" & Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 4) & ".ini"
Open Fichier For Output As #1
Print #1, "\\*****\COMMUN\INIT\" & ThisWorkbook.Path & "\" & ThisWorkbook.Name
Close
End Sub
j'ai grace au forum mis en place une macro complémentaire qui me permet de référence tout nouveau classeur lors de sa création
mais à la fin de cette macro s'excute, le VB s'affiche et non pas la classeur.
Quelle pourrait etre l'instruction qui dit au VB d'activer le classeur :s.
micii ;D
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Fichier As String
Fichier = "\\*****\COMMUN\INIT\" & Left(ActiveWorkbook.Name, Len(ActiveWorkbook.Name) - 4) & ".ini"
Open Fichier For Output As #1
Print #1, "\\*****\COMMUN\INIT\" & ThisWorkbook.Path & "\" & ThisWorkbook.Name
Close
End Sub