Macro VBA: Suppression colonnes + formules

camarchepas

XLDnaute Barbatruc

• 17 Août 2014

• #2

Re : Macro VBA: Suppression colonnes + formules

Bonjour ,

au moins 3/4 de ta demande peut être initialisée avec l'enregistreur de macro.

si tu ne sais pas comment cela fonctionne tapes Enregistreur de macro dans l'aide excel.

Tu devrais ainsi disposer d'un premier jet de macro.

Ensuite tu pourras revenir vers nous avec un fichier Xlsm ne contenant que les onglets scritement nécessaires .

cordialement

 

Vote positif 0 Vote négatif

E

Exceli

XLDnaute Nouveau

• 17 Août 2014

• #3

Re : Macro VBA: Suppression colonnes + formules

Bonjour Camarchepas,

Merci pour tes conseils. Je vais voir comment l'enregistreur Macro fonctionne mais me connaissant je vais surement revenir :-s 😀

Merci

 

Vote positif 0 Vote négatif

E

Exceli

XLDnaute Nouveau

• 17 Août 2014

• #4

Re : Macro VBA: Suppression colonnes + formules

J'ai suivi pas à pas l'aide Excel sur l'enregistreur Macro 🙄

J'ai enregistré une Macro "Pivot" mais quand j'essaie de l'utiliser à nouveau j'ai une alerte de débogage 🙁.

Comment on porrait solutionner ça pour finaliser toutes les étapes?

J'ai une autre petit question, la Macro on peut l'isoler, l'enregistrer sur un autre classeur?

Socorro!

Merci de votre aide

 

Pièces jointes

• 17 08 08 Cpte 4441.xlsm

  273.6 KB · Affichages: 64

Dernière édition: 17 Août 2014

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 17 Août 2014

• #5

Re : Macro VBA: Suppression colonnes + formules

Oui l'on peut l'utiliser , soit en faisant un copier coller , soit en exportant puis important le module qui la contient .

Mais avant , il faut fiabiliser et paramètrer cette macro.

Une question pour m'aider à déchiffrer cet enregistrement .

Dans quel feuille es-tu lorsque tu changes la police de caractere ?

 

Vote positif 0 Vote négatif

E

Exceli

XLDnaute Nouveau

• 17 Août 2014

• #6

Re : Macro VBA: Suppression colonnes + formules

L'onglet "qry_Balance_Mvt_Liste_XL" est l'extraction brute que je souhaiterais automatiser.

Le résultat que je souhaiterais obtenir est l'onglet "4441 au 31 07 2014".

Quand je change de police je suis sur la feuille "qry_Balance_Mvt_Liste_XL". Tout ce passe sur cette feuille, sauf au moment d'indiquer les formules que je me reporte à la feuille "LISTE Utilisateur".

Avez vous une idée pourquoi la macro ne fonctionne pas jusqu'au bout? Les formules ne se renseignent pas 🙁

Merci de votre aide

 

Vote positif 0 Vote négatif

E

Exceli

XLDnaute Nouveau

• 18 Août 2014

• #7

Re : Macro VBA: Suppression colonnes + formules

Bonjour,

Personne pour m'aider? 🙁

 

Vote positif 0 Vote négatif

E

Exceli

XLDnaute Nouveau

• 19 Août 2014

• #8

Re : Macro VBA: Suppression colonnes + formules

Bonjour,

Je ne comprends pas pourquoi la macro enregistrée ne met pas les formules. Quelqu'un pourrait me donner une piste?

Merci

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 19 Août 2014

• #9

Re : Macro VBA: Suppression colonnes + formules

Bonjour ,

Alors , il faudrait que tu enregistres en plusieurs étapes ta macro ,

a priori , ça coince juste aprés avoir ecrit Commentaire dans une de tes entêtes, il y a un offset -13 sur les colonnes , alors que toute la colonnes est sélectionnée.

il faudrait donc enregistrer par portion à ce moment là , et bien m'indiquer ce que tu voulais faire .

 

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 19 Août 2014

• #10

Re : Macro VBA: Suppression colonnes + formules

Oui ,

en analysant de plus prés l'on a la clonne M de selectionnée et l'on veut un déplacement de 13 colonnes vers la gauche ce qui n'est bien sur pas possible.

Que veux tu faire à ce moment en faite

 

Vote positif 0 Vote négatif

E

Exceli

XLDnaute Nouveau

• 19 Août 2014

• #11

Re : Macro VBA: Suppression colonnes + formules

Ahhh d'accord
Ce n'est pas un déplacement je voulais juste selectionner les colonnes pour les élargir par rapport à leur nombre de caractères.
Et c'est ça qui bloque?

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 19 Août 2014

• #12

Re : Macro VBA: Suppression colonnes + formules

Salut Exceli, Camarchepas

Voici un bout de code commenté qui fait une partie de ce que tu souhaites: il n'y a pas toutes les mises en forme

à noter: le pb avec l'enregistreur de macro, c'est qu'il enregistre vraiment tout..... ce qui devient vite illisible
d'ou le conseil de camarchepas de faire du pas à pas..
d'ailleurs pour vois ce qui bloque dans ta macro, c'est le mode pas à pas (touche F8) qui permet de voir ou ca coince..

Code:

Sub Pivot()
'
'
'

    ' Suppression des colonnes L-->X , AB, AC AE en commençant par les colonnes de droite
    ' pour éviter les pb dus au décalage vers la gauche à chaque suppression
    
    'Columns("AE").Select
    Columns("AE").Delete
    'Columns("AB:AC").Select
    Columns("AB:AC").Delete
    'Columns("L:X").Select
    Columns("L:X").Delete
    
   'insertion des colonnes "utilisateurs" et "commentaire"
   Range("P1").Value = "Utilisateur"
   Range("Q1").Value = "Commentaires"
    
    'ajout de la formule
    formule = "=SIERREUR(SI($L2=""GLB"";RECHERCHEV($M2;'LISTE Utilisateur'!$D$1:$E$77;2;FAUX);RECHERCHEV(STXT($F2;5;3);'LISTE Utilisateur'!$A$1:$E$77;3;FAUX));"""")"
    Range("P2").FormulaLocal = formule
    nb = Range("O2").End(xlDown).Row
    'recopie de la formule sur toute la colonne
    Selection.AutoFill Destination:=Range("P2:P" & nb)
    
    'Calculs des totaux
    Cells(nb + 2, 8) = "TOTAL"
    Cells(nb + 3, 8) = "SOLDE"
    Cells(nb + 4, 8) = "SOLDE SAGE"
    Cells(nb + 5, 8) = "écart"
    
    Cells(nb + 2, 9).FormulaLocal = "=somme(I2:I" & nb & ")"
    Cells(nb + 2, 10).FormulaLocal = "=somme(J2:J" & nb & ")"
    Cells(nb + 3, 10).FormulaLocal = "=I" & nb + 2 & "-J" & nb + 2
    Cells(nb + 5, 10).FormulaLocal = "=J" & nb + 3 & "-J" & nb + 4
   
   End Sub

 

Dernière édition: 19 Août 2014

Vote positif 0 Vote négatif

camarchepas

XLDnaute Barbatruc

• 19 Août 2014

• #13

Re : Macro VBA: Suppression colonnes + formules

Bonjour Vgendron,

Merci pour ta confirmation de ce que j'avais vu ,
c'est vrai que décortiquer un enregistrement aussi lourd , c'est pas une tasse de thé , surtout que l'on fait toujours des manipulations erronées ou inutiles lors des enregistrements.

Exceli , tu vois donc se qu'il te reste à refaire.

J'ai testé les Vloop fonctionnent elles correctement

 

Vote positif 0 Vote négatif