Résultats de la recherche

  1. B

    macro reference manquante

    Bonjour, ayant eu un probleme de fonctionnement de macro sous VBA a cause reference manquante, je voulais insérer un code qui gere automatiquement ce type d'erreur en cas de probleme. Voila le code: J'ai trouvé ce code qui est censé décocher les références manquantes de microsoft.support...
  2. B

    month(date) probleme

    Re : month(date) probleme Bonsoir, merci bien pour cette idée, je vais regarder ca et voir un peu ce que ca donne! bonne soirée Bubus
  3. B

    month(date) probleme

    Re : month(date) probleme Oui mais si je fais ca, ca marchera pour toutes les versions d'Excel? ou il faudra le refaire si le probleme se représente sur un autre ordi? car pas mal d'utilisateurs du fichier sont novice et ne sauront pas le faire...
  4. B

    month(date) probleme

    Bonjour, j'ai une erreur qui apparait sur certains ordis et pas d'autres pour une macro: Sub maj_qtite() Dim j As Integer Dim i As Integer Dim l As Integer Dim m As Integer l = Sheets("achat").Range("A65536").End(xlUp).Row m = Sheets("Liste").Range("X2000").End(xlUp).Row For j = 7 To...
  5. B

    pbe projet ou biblio introuvable...

    Re : pbe projet ou biblio introuvable... merci pour ta reponse, la methode de cliquer sur la reference manquante marche tres bien. ms pour l'autre methode, g comprend pas bien: j'ai rajouté dans le code VBA.Month(VBA.Date) mais ca n'a pas marché. Peux tu me dire ce que j'ai mal fait? merci...
  6. B

    pbe projet ou biblio introuvable...

    Bonjour, j'ai fait la macro suivante dans workbook pour la lancer à l'ouverture du fichier excel: Sub maj_qtite() Dim j As Integer Dim i As Integer Dim l As Integer Dim m As Integer l = Sheets("achat").Range("A65536").End(xlUp).Row m = Sheets("Liste").Range("X2000").End(xlUp).Row...
  7. B

    plusieurs macros dans workbook_open

    Re : plusieurs macros dans workbook_open Bonjour Eric! Merci pour ta réponse!! cela correspond exactement à ce que je voulais faire et ça marche nickel!! Bonne journée, Bubus
  8. B

    plusieurs macros dans workbook_open

    Bonjour, Voilà j'ai écrit une macro dans workbook open, donc elle se lance bien à l'ouverture du classeur, et j'aimerai en rajouter une autre, mais bien la séparer de la première macro car les deux sont complexes, avec des if, with, for et je ne veux pas qu'elles se croisent. L'une est pour...
  9. B

    deverrouiller feuille par mot de passe

    Re : deverrouiller feuille par mot de passe Bonjour, tout d'abord merci pour ton aide, j'ai effectué les modifs indiquées, et en supprimant aussi 'password:=passe' dans sub deverrouill() et cela marche comme tu le dis!! il me demande le mot de passe autant de fois qu'il y a de pages pour...
  10. B

    deverrouiller feuille par mot de passe

    Bonjour, J'ai fait une macro pour protéger et déprotéger toutes les feuilles de mon classeur par mot de passe. Mais la macro de déverrouillage ne demande pas le mot de passe, ce que je souhaiterai. Voici la macro: Sub verrouille() dim nombre as integer dim i as integer dim passe as...
  11. B

    comparaison valeurs cellule macro

    Re : comparaison valeurs cellule macro Bonjour, Voici la macro corrigée qui correspond à mes besoins pour ceux que ca intéresse: cette macro imbrique deux variables issus de deux feuilles différentes (donc tableau différents) et va indiquer dans le premier tableau un calcul (produit de...
  12. B

    comparaison valeurs cellule macro

    Re : comparaison valeurs cellule macro merci pour la macro! je vais voir ce que je peux faire avec et je te tiens au courant Olivier!
  13. B

    comparaison valeurs cellule macro

    Re : comparaison valeurs cellule macro Re Olivier, Effectivement il y avait un oubli: cadence= Feuil2 et liste pièces= Feuil1 j'ai mis en fichier joint un exemple type de mes données afin que ce soit plus clair. Comme j'ai plus de 300 lignes avec une dizaine de produits différents qui...
  14. B

    comparaison valeurs cellule macro

    Re : comparaison valeurs cellule macro Voila la macro complete Olivier: Sub Macro7() Dim j As Integer Dim i As Integer derniere_cell = Worksheets("Feuil1").Range("X10").End(xlDown).Row derniere_cellule = Worksheets("Feuil2").Range("A7").End(xlDown).Row For j = 7 To derniere_cellule...
  15. B

    comparaison valeurs cellule macro

    Re : comparaison valeurs cellule macro merci Olivier pour ta remarque en fait j'ai vérifié j'ai bien mis for j= 7 to 15 j'ai également rajouté les "worksheets" qui manquaient un peu partout. Si je laisse juste une condition if la macro marche,mais si je lui demande de trouver pour chaque...
  16. B

    comparaison valeurs cellule macro

    Re : comparaison valeurs cellule macro Merci de ta réponse deudecos. Je vais modifier ces points la et voir ce que ca donne..par contre je pense avoir donner une valeur a "j": pour la variable "valeur" c'est ca que tu voulais dire? en tout cas merci de ta reponse rapide..
  17. B

    comparaison valeurs cellule macro

    Bonjour, j'ai un souci avec ma macro qui ne fonctionne pas comme je voudrais, et je n'arrive pas a trouver l'erreur!! Y aurait-il une ame charitable pour m'aider svp??? Voici la macro: Sub macro() dim i as integer dim j as integer derniere_cellule= range("A7").end(xldown).row...
  18. B

    TCD avec plage variable

    Re : TCD avec plage variable Rebonjour Eric, en fait ta macro correspond tout a fait a ce que je recherche. Par contre elle ne reconnait pas "DefaultVersion:=xlPivotTableVersion10", là elle me met un message d'erreur... Tu ne sais pas pourquoi? Merci d'avance, cordialement, Bubus
  19. B

    TCD avec plage variable

    Re : TCD avec plage variable Bonjour, merci pour la reponse! mais je ne comprend pas vraiment en fait...si par exemple je rajoute une ligne ou plusieurs à mon tableau, est ce qu'il va automatiquement le detecter et les inserer ou je vais devoir lui definir les limites de ma plage? merci...
  20. B

    TCD avec plage variable

    Bonjour, j'essaie de faire une macro pour créer un tableau croisé dynamique avec une plage de données variable. Voici ma macro qui ne fonctionne pas: Sub macro() Sheets("Liste pièces").Select Dim lignefin As Integer Dim colfin As Integer Dim lignedep As Integer Dim coldep As Integer...