Résultats de la recherche

Bonjour, J'ai essayé par tout les moyens et je ne comprend vraiment pas. Voici le code que j'utilise: With ActiveWorkbook.VBProject.VBComponents .Remove .Item("equipement_magasin") End With En fait je part d'un fichier qui doit faire une mise à jour de beaucoup d'autres fichiers...

Bonjour, Je tente de faire une mise à jour automatique par macro du code se trouvant sur la feuil1 s'appelant OT avec le code ci dessous: With Workbooks(Nom).VBProject.VBComponents(ActiveWorkbook.Sheets("OT").CodeName).CodeModule .DeleteLines 1, .CountOfLines .AddFromFile ("D:\Programmation...

Bonjour, J'ai un fichier sur le reseau de mon entreprise qui est mis à jour par macro.J'utilise le code suivant pour verifier si le fichier est deja ouvert ou pas: On Error Resume Next Set Test_ouvert = Workbooks("listing.xls") If Test_ouvert Is Nothing Then Workbooks.Open cheminp &...

Bonsoir, Quand je fais "run("toto.xls!module1.mamacro")" pour lancer la macro du classeur toto, tout se passe bien la macro se deroule bien.Mon probleme est que une fois dans la macro du second fichier je voudrais fermer le premier fichier mais au moment ou il tombe sur workbooks(le 1er...

Bonjour, Avec excel les macros sont dans les fichiers contrairement à openoffice ou on peut avoir une base commune de macros ou les fichiers peuvent se servir. Le gros avantage sou sopenoffice c'est que si bug il y a dans les macros, lors de la correction du bug tout les fichiers en profitent...

Bonjour, Je n'arrive pas à trouver comment utiliser l'evenement mousedown avec des textbox qui sont generé sur un userform de cette facon: 'date Set Obj = Me.Controls.Add("forms.Textbox.1") With Obj .Name = "textbox_" & Categorie & "_" & c .Left = 280 .Top = Y .Width = 50 .Height =...

Bonjour, Je voudrais par macro savoir si une cellule à une bordure (celle du haut) epaisse ou non.J'ai essayé avec If ActiveWorkbook.Worksheets(1).Cells(i, colone).Borders(xlTop).Weight = 2 mais ca me renvoie un peu n'importe quoi j'ai l'impression

Bonjour, Je suis sur un probleme depuis un petit moment la et malgré la fonction recherche je ne trouve pas de reponse. J'ai crée des checkbox et un commandbutton garce à VBA mais je comprend pas comment on peut agir avec. Voici mon code: Set Obj = Me.Controls.Add("forms.Checkbox.1")...