Bonjour Mdf,

 

je pense que je vais partir sur la deuxième possibilité que tu m'avais indiqué sur ta première réponse. En parcourant les différents forums, j'ai le sentiment de ne pas être seul à rencontrer ce souci, sans forcément trouver de réponse au problème posé! 

 

En tout cas, merci pour ton aide! 

 

Je mets le post en résolu en attendant d'avoir d'autres éléments permettant de faire avancer la question.

 

Titom

Ca ne pourrait pas provenir de la version d'excel utilisée? qu'elle soit en 32 ou 64bits?

Merci beaucoup pour la réponse,

 

J'ai modifié la ligne de code mais Excel me sort une erreur 9: l'indice n'appartient pas à la sélection...

 

Aurais-tu un indice pour savoir de quoi il retourne?

 

Titom

 

Ps: L'idée de copier la feuille est intéressante, je n'y avais pas pensé!

Bonjour Floka,

 

Pour répondre à ta question, il me semble qu'il faille que tu changes la référence à la page à laquelle tu veux faire appliquer ta macro.

 

Je m'explique:

Sur cette partie par exemple:

'=====================================***Partie 1 : Suppression des sous-totaux=============================================================
With Feuil2.Range("A2:A" & Range("A" & Application.Rows.Count).End(xlUp).Row)
    Do
        Set C = .Find("Total")
        If Not C Is Nothing Then
            Feuil2.Cells(C.Row, "A").EntireRow.Delete
        End If '
    Loop While Not C Is Nothing
End With

En dessous de "If Not C Is Nothing Then", tu indiques "Feuil2.Cells...": il faut que tu remplaces le "Feuil2" par le nom de la page sur laquelle tu veux faire travailler ta macro.

D'une manière beaucoup plus général, si tu veux régler tes problèmes de références, indique "ActiveSheet".

 

Qu'en penses-tu?

 

Cordialement,

 

Titom

Bonjour à toutes et à tous,

 

Voici ce qui m'amène ce soir:

Je tente de créer une macro qui créé automatiquement une page d'un classeur avec la mise en forme que je souhaite. Je souhaite y inclure un bouton permettant de revenir à une page qui sera le menu principal, pour cela, je voudrais que ma macro initiale assigne automatiquement une macro tierce au bouton.

 

Après quelques recherches sur le net et autres forums, j'ai vu que cela était possible, j'ai essayé les solutions, mais celles-ci ne semblent pas fonctionner. Quelqu'un pourrait-il me venir en aide?

 

Je précise que je tourne sur Excel 2007 et 2010...

 

Je joins le fichier contenant ma macro.

 

Merci par avance,

 

Titom

Merci JeanMarie!

Pile-poil ce que je voulais!

A bientôt sur le forum

Bonjour à toutes et à tous,

Voici ce qui m'amène aujourd'hui. Je butte sur un problème concernant les tableaux de type Array() en VBA.

Voici en substance ce que je cherche à faire:
1. Je mets en place un tableau de type Array() dans mon code VBA,
2. Ce tableau contient des données qui seront utilisées pour tester des valeurs
3. Lorsque je lance une boucle pour tester les valeurs des cellules par rapport aux données du tableau, je souhaite que la cellule prenne un certain type de coloration.

Pour ce cas, vous me direz qu'il y a les MEFC, mais dans le cas présent je simplifie volontairement mon code et mes feuilles de données. Je souhaite comprendre comment je peux utiliser ces fameux Array.

Je joins deux fichiers excel, un en version 2010 et un en version antérieur.

D'avance merci pour votre aide.

Titom

Bonjour mDF, bonjour Mth, bonjour à tous les forumers,

J'ai pu tester les dernières contributions et ça fonctionne comme je le désire. Pour le côté "Too much" , je vais essayer de faire la même chose avec une listbox (en mode non modal) et sans la couleur, je trouverai bien une solution pour la couleur!

Merci beaucoup pour vos solutions!

A très bientôt sur le forum,

Titom

Bonsoir Jeff, bonsoir les forumers!

Pour utiliser les macros, tu copies les boutons sur chacune des pages et tu leurs affectes les macros par la manip' suivante:

1. Tu fais un clic droit sur le bouton "Comparaisons" pour faire apparaître le menu contextuel;
2. Tu sélectionnes affecter une macro;
3. Tu sélectionnes ensuite "Thisworkbook.comparaison_nombres";
4. Tu cliques sur "OK" et les première macro est affectée au premier bouton.

Tu fais la même chose pour le second bouton mais en sélectionnant cette fois "Thisworkbook.nettoyage_cellule"

Fais signe si tu trouves des difficultés!

Cordialement,

Titom