Contenu récent par Vero2782

Bonjour ! Ha ! Je me suis rendue compte que mon "total" était dans la forme anglaise (donc à la fin du texte) plutôt qu'au début :) Ça fonctionne Super avec un petit right plutôt que le left ! If Right(Cells(i, 1), 5) = "Total" (1 heure après mon dernier post....) ! Merci beaucoup...

Bonjour Philippe, Ton code fonctionne no 1 s'il s'agit de trouver Total en 5ème position. malheureusement, dans mon cas, ce n'est pas toujours le cas car il s'agit en fait du nom du client qui fait des longueur de caractère différent. With ActiveSheet.PageSetup .PrintTitleRows =...

Bonjour, J'aimerais faire une mise en page automatique a un onglet de mon fichier. J'ai un tableau croisé (avec des sous-totaux) et je voudrais qu'à chaque fois que je rencontre le mot Total* que cette ligne soit la dernière de la feuille. Comme cela, j'aurais 1 page par client et ce serait...

Bonjour Kingfadhel, J'essayerai aussi ta solution. Je ne savais pas ce qu'était un "filtre élaboré", j'imaginais plus compliqué ! :) Merci beaucoup !

Bonjour Chris, Ah une solution si simple ! Je vais essayer ta solution no 1 et je suis pas mal certaine que ça fonctionnera et je vais regarder pour le tableau pour la source de donnée, ce serait plus simple, j'aurais pas de blank et l'utilisateur n'aurait pas à sélectionner la source à chaque...

Bonjour, J'aimerais trouver la formule VBA pour filtrer mon tableau croisé dynamique selon la date du jour. Je retrouve la date dans mon tableau croisé dynamique en format dd//mm/yyyy hh:mm (La date est générée automatiquement par ma macro avec la fonction "Now") La date du jour est inscrite...

Merci à vous, Ça correspond a ce que je cherchais. Je sais pas pourquoi je ne voulais pas trier mes no de commandes, c'est tellement plus simple... et comme je n'ai pas de raisons apparentes, j'irai avec cette solution ! Encore merci pour votre aide. Véro

Bonjour, Mon problème semble bien simple dans ma tête mais pourtant, je n'ai pas d'inspiration de programmation J'aimerais calculer si le minimum de commande ($) est atteint pour chacune de mes commandes (Critère variable) or, les no de commandes sont uniques, j'ai jamais les mêmes. Comment...

Bonjour à tous, Je vois que vous vous êtes amusés à gallerer sur mon problème. Wow ! Merci beaucoup, toutes vos solutions fonctionnent super bien. Je vais devoir étudier vos codes pour bien les comprendre mais vous faites ma soirée. Un Gros Gros merci pour vos programmations, vous être...

Bonjour Victor, En ajoutant If IsNumeric(Car) = True Then ExpressionC = ExpressionC & Car Else IsNumeric(Car) = 0 End If Next J'ai une compile error : "Function call on left-hand side of assignment must return Variant or Object" Peut-être que je ne met pas la remise à 0 au bon endroit ?

Bonjour, J'ai une liste de cellule contenant le nom, numéro civique, ville, et un no de client. Malheureusement, il n'y a ni virgule, ni espaces pour séparer les informations... ex. : TREMBLAY0258MONTREAL357896541258A.jpg J'aimerais retirer les chiffres de la fin et le .jpg et obtenir...

Bonjour à vous deux, Premièrement merci beaucoup de vos réponses. Ma Pomme : C'était exactement ça que j'avais besoin et ça fonctionne mieux que mes formules originales ça correspond 100% a ce que je cherchais. En plus, j'ai appris a créer un fonction avec ton code ;) c'est un 2 dans 1 pour...

Bonjour, J'ai différentes description de produit en colone A et j'aimerais enlever l'information superflue de cette description pour laisser que la description du produit en colone C. exemple de description de produit : en colone A Chips 25% moins de sel 141g/6 Savon à main l'orange 500ml/12...

Bonjour, J'ai plusieurs onglet de données brutes de plusieurs clients. J'utilise la macro pour supprimer le data qui n'est pas celui du client à qui je veux envoyer les rapports. Le code fonctionne sur la plupart des onglets sauf celui-ci. Sheets("feuil1").Select DerniereLigne = Range("A"...

J'ai trouvé ! Il faut vraiment que la Variable soit nommée avant la macro. Merci ! Merci !