Macro

[mythotem]

Bonjour à tous,

Je viens de réaliser ma 1ère petite macro.
Où dois-je l'enregistrer pour que je la retrouve dans n'importe quel fichier Excel que j'ouvrirai ultérieurement?

Merci d'avance.

mythotem.

 

[jeanpierre]

Re : Macro

Bonsoir mythotem, re à tous,

Une première question, Que fait cette macro ?
Y a t-il un besoin de l'utiliser dans plusieurs fichiers, pourquoi et comment ?

Sinon, Un fichier Perso de macro..., mais là, personnellement, je n'utilise pas... mais d'autres pourront te guider..

Ou peut-être une macro complémentaire *.XLA....

Faut voir avant de te dire.

A te lire pour plus d'informations...

Bonne soirée.

Jean-Pierre

 

[mythotem]

Re : Macro

Merci Jean-Pierre de me répondre.

Ce fichier m'indique un prix public conseillé PPI R (dans LocalApp) suivant les référence des produits qui se trouvent dans la colonne B.
Voici mon programme :

Sub PPI()
'
' PPI Macro
' Macro enregistrée le 17/05/2007 par Mythotem
'
' Touche de raccourci du clavier: Ctrl+p
'
ActiveCell.FormulaR1C1 = _
"=IF(ISNA(VLOOKUP(RC[-17],'D:\LocalApp\[PPI R.xls]Matrice'!R1C1:R1000C4,4,0)),0,VLOOKUP(RC[-17],'D:\LocalApp\[PPI R.xls]Matrice'!R1C1:R1000C4,4,0))"
Range("S13").Select
ActiveCell.FormulaR1C1 = _
"=IF(ISNA(VLOOKUP(RC[-17],'D:\LocalApp\[PPI R.xls]Matrice'!R1C1:R1000C4,4,0)),0,VLOOKUP(RC[-17],'D:\LocalApp\[PPI R.xls]Matrice'!R1C1:R1000C4,4,0))"
Range("S13:S400").Select
Selection.FillDown
ActiveWindow.LargeScroll ToRight:=-1
ActiveWindow.ScrollRow = 1
ActiveWindow.SmallScroll ToRight:=9
ActiveWindow.DisplayZeros = False
Range("O13:O400").Select
Selection.Copy
ActiveWindow.ScrollRow = 1
Range("S13").Select
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
End Sub

Ayant plusieurs fichiers Excel sans ces Prix conseillés, cette macro me les indiqueraient automatiquement.

j'espère que tu as saisi le sens de ma question.

Encore merci.

mythotem.

 

[Spitnolan08]

Re : Macro

Bonjour Mythotem, Jean-Pierre,

Tu peux l'enregister dans un fichier "Macro" ou "Trucmuche" puisque tu as pris soin de lui attribuer une séquence de touches pour l'appeler. Il faudra alors que ton fichier macro soit ouvert pour que ta macro soit accessible.

Le seul danger réside dans le fait que ta macro renseigne des formules dans la cellule active. Il faut donc prendre soin, avant de la lancer, d'activer les bonnes cellules....

Cordialement

 

[mythotem]

Re : Macro

Merci Jean-Pierre,
Je vais essayer çà.
Bon WE.

mythotem

 

[jeanpierre]

Re : Macro

Re,

Le sens de ta question, je l'ai bien compris,
seulement, ta macro fait appel à un fichier particulier et unique... donc impossible pour ce que tu souhaites....

Je vais y réfléchir... mais pas trop gagné...

Bonne soirée.

 

[Spitnolan08]

Re : Macro

Re,

ta macro fait appel à un fichier particulier et unique... donc impossible pour ce que tu souhaites....

Je vais y réfléchir... mais pas trop gagné...

Tu fumes la moquette Jean-Pierre?😛😉

Merci Jean-Pierre,
Je vais essayer çà.

Non moi c'est Spitnolan, enfin je crois... sauf si tu veux te lancer dans un fichier xla!

A+
Bonne soirée et bon week-end🙂

 

[jeanpierre]

Re : Macro

Re,

Nous fait quoi Spitou...😱

N'a un blème ou pas tout lu.... reprendre dans l'ordre les fils, un à un....😀

Mais, bon,

 

[Spitnolan08]

Re : Macro

Re,
Je croyais que tu étais parti te coucher😉

Tu viens on va fumer ensemble...😛
Content de te lire.

 

[jeanpierre]

Re : Macro

Re,

Vu le prix du tabac, je préfère encore recevoir et payer l'apéro.... oh, oh...

Maintenant, tu crois que notre ami mythotem va s'y retrouver....😛 dans toutes ces débauches...? Manque plus que quelques Femmes et des formules à te faire planer....

Mais, bon, c'est week-end.... et plaisir....

Jean-Pierre