Macro excel pour tout les classeurs

Résolu
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006 - 11 juil. 2006 à 11:09
petitjean34 Messages postés 1 Date d'inscription vendredi 24 avril 2009 Statut Membre Dernière intervention 29 avril 2009 - 29 avril 2009 à 15:14
Bonjour, voila une macro qui me réorganise des copier/coller sur une colonne en ligne, je voulais savoir comment rendre cette macro valable pour tout les classeurs (je suis obligé de copier/coller les macro dans mon nouveau projet pour la faire fonctionner).
J'ai pris cette macro pour exemple afin de faciliter l'explication sur les modifications à apporter. Merci pour votre aide

Sub alignement()
    Dim compar, verif As String
    Dim compteur, colonne, ligne As Integer
   
   ligne = 28
   colonne = 15
  
   For compteur = 30 To 1533
      copier = Range("C" & compteur)      If copier "" Or copier "Télécopie" Or copier = "Téléphone" Or copier = "Mél" Or copier = "Directeur" _      Or copier "Site" Or copier "Directeur délégué départemental" Or copier = "!!!" Then
      Cells(ligne, colonne).Value = ""
    Else
     Cells(ligne, colonne).Value = copier
     colonne = colonne + 1
     End If
     If copier = "!!!" Then
    colonne = 15
    ligne = ligne + 1
    End If
Next compteur
End Sub

11 réponses

mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
11 juil. 2006 à 11:13
Salut,

Dans Perso.xls, tu peux le placer dedans.

Ta macro sera tout le temps accessible, peut importe le classeur ouvert.

@++

--Mortalino--
Le Mystérieux Chevalier "Provençal, le Gaulois"
N'oubliez pas de lire le règlement !
3
jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
11 juil. 2006 à 11:21
Salut,

Sinon tu peux faire ce que l'on appelle des macros complémentaires (.Xla, Xll) et l'ajouter a ton excel grace au menu Excel

Outils => Macro Complémentaires...=> Parcourir... => OK

Et cette macro sera alors accessible depuis tout les classeurs.

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>
3
jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
11 juil. 2006 à 16:04
>Pinzut77: En fait il suffit de partir d'un classeur .Xls Mais tu fais "Enregistrer Sous" Tu change de le Type de fichier (le tout dernier) a savoir Macro Complémentaire Microsoft Excel (*.Xla)

Et Voila qui est fait.

Ensuite tu fais comme je t'ai dit plus haut cela devrait marche.

La seul chose c'est que ton code doit être générique pour être sur de fonctionner avec n'importe quel classeur.

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>
3
galopin01 Messages postés 133 Date d'inscription lundi 4 octobre 2004 Statut Membre Dernière intervention 14 octobre 2011 1
12 juil. 2006 à 14:37
Les macros issus de classeurs enregistrés en xla n'apparaissent jamais (sauf les Functions dans la catégorie Fonctions  personnalisées.)
Toutefois même si elles n'apparaissent pas tu peux les utiliser comme si tu les voyais.
Imaginons que dans tes macros complémentaires tu aies un Sub Galopin, si dans Outils / Macros / Macro tu tapes "galopin" le bouton Exécuter va devenir disponible preuve que la macro est bien disponible.
De la même manière si à un objet  (bouton ou autre), dans la zone Affecter une macro tu tapes galopin, la macro va s'exécuter.
A+
3

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006
11 juil. 2006 à 11:26
Ok c'etait tout bête alors :p Merci pour ta réponse !
0
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006
11 juil. 2006 à 11:27
Ah Julien on a posté en même temps, merci à toi aussi je vais essayer ^^
0
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006
11 juil. 2006 à 15:56
Finalement quelques difficulté, je n'ai pas perso.xls et Julien comment fait on pour creer la macro complémentaire ? merci pour vos réponses
0
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006
11 juil. 2006 à 16:12
Ok la manip a fonctionné pour la macro complémentaire, je l'ai bien coché mais elles n'aparaissent pas dans mes macro (outil, macro, macro...)
0
jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
11 juil. 2006 à 16:49
Je ne comprends pas.

QUe doit faire cette macro et surtout QUAND

@+, Julien
Pensez: Moteur de Recherche, Réponse Acceptée, Règlement/FONT>
0
Pinzut77 Messages postés 21 Date d'inscription mercredi 5 juillet 2006 Statut Membre Dernière intervention 17 juillet 2006
12 juil. 2006 à 21:26
Ok d'accord, je m'en sers en faisant alt + F11 du coup car il faut changer certains paramètres avant l'exécution. Merci à tous pour vos réponses (Julien mes macros servent à faire de l'ordre dans mes tableaux genre dissocier des mots, virer les espaces superflu des truc comme ça...)
Bonne soirée!
0
petitjean34 Messages postés 1 Date d'inscription vendredi 24 avril 2009 Statut Membre Dernière intervention 29 avril 2009
29 avril 2009 à 15:14
bonjour à vous tous !

même si le sujet est un peu vieux, je préférais répondre ici avant de poster:
effectivement même si le nom de la macro n'apparait pas dans la liste des macros complémentaires, on peut les exécuter en tapant leur nom..

mais est-ce qu'il existe un moyen de les faire apparaitre dans cette fenêtre ?

j'ai une macro a faire exécuter par pas mal d'utilisateurs qui ne s'y connaissent pas trop et ce serait plus pratique...

Merci !



Petit jean
0
Rejoignez-nous