Discussion :

[marjo_38]

Bonjour,

J'ai un problème avec une macro et je n'arrive pas à trouver de solutions. J'ai un fichier dans lequel je crée des factures avec un onglet comportant la base de données clients. Lorsque je crée une facture le fichier se sauvegarde automatiquement sous un autre nom avec le numéro de la facture. Il m'arrive de modifier des adresses dans l'onglet BDD clients mais je suis obligé de le faire dans le fichier de base et non dans le fichier renommé. Je voulais donc une macro qui me permette de rouvrir le fichier de base lorsque je modifie le fichier renommé.
Voici ma macro :

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
 
Private Sub Worksheet_Change(ByVal Target As Range)
Range("a5:ab300").Select
Selection.Copy
Workbooks.Open ("C:\Documents and Settings\c_durandma\Bureau\Création Modèle fac\Modèle facture.xls")
    Unload Userform1
    Unload workbook_save
Sheets("Customer list new").Select
Unload Customers_List
Range("a5").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
        Range("A5").Select
    ActiveWorkbook.Close
End Sub

Le problème c'est que j'ai des userforms que j'ai crée pour autre chose qui s'affiche et j'aimerais pouvoir les fermer à partir de la macro mais j'ai essayé avec Unload mais ca marche pas.......
Le 2ème problème c'est qu'un message d'erreur s'affiche avant le collage spécial sur "Range("a5").Select". "La méthode select de la classe range à échoué" et je comprends pas pourquoi.....

Merci à ceux qui pourront m'aider

[ouskel'n'or]

Avant d'ouvrir ton modèle tu testes en mettant la ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Application.enableevents = false
'ouverture du fichier puis,
DoEvents
Application.enableevents = True

[marjo_38]

Je viens d'essayer mais du coup la macro ne s'active plus...

[ouskel'n'or]

Quel macro ? Je croyais que tu voulais que la macro du modèle ne s'exécute pas lors de l'ouverture de ce modèle depuis un autre fichier. Que veux-tu faire ? Où mets-tu ce code ?