Bonjour a todos,
J'aurais besoin d'un coup de main, un grand
J'ai trouvé un cas pratique pour me lancer dans l'apprentissage de vba avec votre aide et conseils, si vous le voulais bien .
Voilà l'exemple en pièce jointe:
Tous les mois, je dois insérer l'extraction "qry_Balance_Mvt_Liste_XL" dans le tableur. Les manipulations sont toujours les mêmes.
C'est pour ça que j'aimerais créer une macro qui me permette de :
- retirer le quadrillage de la feuille
- mettre la police Calibri taille 8
- supprimer les colonnes L jusqu'à la X, AB, AC et la AE (en couleur mauve)
- calculer le Total (somme des colonnes I et J) en laissant une ligne intermédiaire vide
- calculer le Solde (total I-total J)
- insérer deux colonnes, une "Utilisateur" et une autre "Commentaires"
- copier dans la colonne "Utilisateur" la formule (voir onglet "4441 au 31 07 2014")
=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));"")
ou une autre formule me permettant de trouver le code utilisateur dans l'onglet "LISTE Utilisateur"
- faire la mise en page
Le résultat que je souhaiterais obtenir est celui de l'onglet "4441 au 31 07 2014".
Merci de votre aide
J'aurais besoin d'un coup de main, un grand
J'ai trouvé un cas pratique pour me lancer dans l'apprentissage de vba avec votre aide et conseils, si vous le voulais bien .
Voilà l'exemple en pièce jointe:
Tous les mois, je dois insérer l'extraction "qry_Balance_Mvt_Liste_XL" dans le tableur. Les manipulations sont toujours les mêmes.
C'est pour ça que j'aimerais créer une macro qui me permette de :
- retirer le quadrillage de la feuille
- mettre la police Calibri taille 8
- supprimer les colonnes L jusqu'à la X, AB, AC et la AE (en couleur mauve)
- calculer le Total (somme des colonnes I et J) en laissant une ligne intermédiaire vide
- calculer le Solde (total I-total J)
- insérer deux colonnes, une "Utilisateur" et une autre "Commentaires"
- copier dans la colonne "Utilisateur" la formule (voir onglet "4441 au 31 07 2014")
=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));"")
ou une autre formule me permettant de trouver le code utilisateur dans l'onglet "LISTE Utilisateur"
- faire la mise en page
Le résultat que je souhaiterais obtenir est celui de l'onglet "4441 au 31 07 2014".
Merci de votre aide