Placement d'une Macro pour Mise en Forme, apres un update...
Résolu
bertie312
Messages postés
17
Date d'inscription
Statut
Membre
Dernière intervention
-
Le Pingou Messages postés 12249 Date d'inscription Statut Contributeur Dernière intervention -
Le Pingou Messages postés 12249 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
On m'a aidé a créer un tableau Excel pour lister mes collections, qui ce met a jour à l'ouverture, cependant j'ai du mal a faire appeler ma macro de mise en forme que voici :
Option Explicit
Sub Dollar()
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Worksheets
Ws.Select
Columns("F:H").Select
Selection.Replace What:="$", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next Ws
End Sub
Sur ce fichier joint, en module 2 ce trouve la macro.. il faudrait que je la place sur thisworksheet mais n'y parviens pas ??
https://www.cjoint.com/c/CGerftuJlzt
Vpus auriez une idée pour proceder ??
MErci, Bertrand
On m'a aidé a créer un tableau Excel pour lister mes collections, qui ce met a jour à l'ouverture, cependant j'ai du mal a faire appeler ma macro de mise en forme que voici :
Option Explicit
Sub Dollar()
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Worksheets
Ws.Select
Columns("F:H").Select
Selection.Replace What:="$", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next Ws
End Sub
Sur ce fichier joint, en module 2 ce trouve la macro.. il faudrait que je la place sur thisworksheet mais n'y parviens pas ??
https://www.cjoint.com/c/CGerftuJlzt
Vpus auriez une idée pour proceder ??
MErci, Bertrand
A voir également:
- Placement d'une Macro pour Mise en Forme, apres un update...
- Mise en forme conditionnelle excel - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Mise a jour chrome - Accueil - Applications & Logiciels
- Mise en forme tableau croisé dynamique - Guide
- Windows update bloqué - Guide
3 réponses
Bonjour,
Il faut copier la macro et ensuite clic sur le module de feuille correspondante par exemple sur [Feuil6 (M13)] et coller dans la fenêtre à droite.
Il faut copier la macro et ensuite clic sur le module de feuille correspondante par exemple sur [Feuil6 (M13)] et coller dans la fenêtre à droite.
Bonsoir,
Je vois les choses autrement.
Si le but est que ça se lance à l'ouverture, dans ThisWorkbook :
Mais vu que tu as des requêtes, tu n'auras même pas eu un semblant de début de réponse à la 1ère requête que ta macro sera déjà finie.
A part mettre un bouton et la lancer quand les mises à jours sont finies, je ne vois pas.
Je vois que tu postes sur plusieurs forums. Evite de poser la même question sans avoir attendu 48h sans réponse. Comme en général on n'aime pas trop travailler pour rien on évite ces demandeurs. C'est juste un conseil.
eric
Je vois les choses autrement.
Si le but est que ça se lance à l'ouverture, dans ThisWorkbook :
Private Sub Workbook_Open()
Dollar
End Sub
Mais vu que tu as des requêtes, tu n'auras même pas eu un semblant de début de réponse à la 1ère requête que ta macro sera déjà finie.
A part mettre un bouton et la lancer quand les mises à jours sont finies, je ne vois pas.
Je vois que tu postes sur plusieurs forums. Evite de poser la même question sans avoir attendu 48h sans réponse. Comme en général on n'aime pas trop travailler pour rien on évite ces demandeurs. C'est juste un conseil.
eric