Contenu récent par JP43

  1. J

    besoind'aide

    Tout fonctionne parfaitement les deux formules pas de message d’Erreur lorsque j’exécute le code,sauf sur la première ligne des 12 lignes ou j'éxecute le code ou rien ne se passe. Encore merci pour ton aide
  2. J

    besoind'aide

    Après bidouillage je suis arrivé a faire fonctionner la deuxième partie de la formule. Sub mlk() Set wf = WorksheetFunction Set t = Sheets("calcul") Set n = Sheets("NEGOCE") For i = 1 To 12 Select Case IsEmpty(t.Range("a5").Offset(i, 0)) Case True feuille = t.Range("L5").Offset(i, 0) If feuille...
  3. J

    besoind'aide

    Peux tu essayer de m'expliquer " il semblerait qu'il y ait une erreur sur la recherche de ligne (plutot 3000 ?)"
  4. J

    besoind'aide

    Merci je n'ai plus ce message d erreur mais cela ne fonctionne pas la première partie (qui fonctionné) ne fonctionne plus et la deuxième partie, j'ai ce message "impossible de lire la propriété match de la classe worksheet fonction".
  5. J

    besoind'aide

    Bonjour Effectivement pas beaucoup d'interet la cellule "A". Après transfert sur mon vrai fichier j'ai un message d'érreur:"case sans select case" voici le code Sub mlk() Set wf = WorksheetFunction Set t = Sheets("calcul") Set n = Sheets("NEGOCE") For i = 1 To 12 Select Case...
  6. J

    besoind'aide

    Un exemple serait le bienvenu : a4 = 1 b4 = dc c4 = 50 ==> qu'obtient-on en h4 ?=131 (recherche vertical sur feuille négoce) a5 = 1 b5 = vt c5 = 10 ==> qu'obtient-on en h5 ?=5 (recherche vertical sur feuille négoce) a6 = "vide" b6 =" vide" c6 = "vide" ==> qu'obtient-on en h6 ?=(on exécute la...
  7. J

    besoind'aide

    Bonjour a tous, J'aurai encore besoin d'aide,je souhaiterais amélioré mon fichier avec des macro. je voudrai si a4=1(ou les suivantes) faire une recherche vertical sur la feuille "negoce" "C5-G12" en fonction des valeurs b4 et c4 et afficher le résultât dans la cellule h4 (et pour les suivantes...
  8. J

    besoind'aide

    Ca marche encore nickel J'aurai encore besoin d'un conseil. Je souhaiterais imprimer mon fichier excel au format pdf, l’enregistrer dans un répertoire correspondant à une cellule de la feuille, ensuite ouvrir outlook mettre ce fichier en fichier joint, mettre l'adresse du destinataire qui...
  9. J

    besoind'aide

    Tout fonctionne parfaitement sauf que si toute les lignes ne sont pas remplies j'ai un message d"erreur.pas trop gênant mais si on pouvait éviter!!
  10. J

    besoind'aide

    Visiblement ça marche mais j'ai du mal à voir ce qu tu as modifié.;)
  11. J

    besoind'aide

    c'est un fichier avec des donnés professionnelles un peu délicat de le mettre en ligne.
  12. J

    besoind'aide

    Encore un peu besoin d'aide lorsque je transpose la dernière formule à mon fichier cela ne marche pas (la première formule fonctionne parfaitement bien lorsqu'il n'y a qu'un onglet). Voici mon code vba: Sub mlk() For i = 0 To 15 feuille = Sheets("calcul").Range("i5").Offset(i, 0)...
  13. J

    besoind'aide

    Merci pour ta réponse elle correspond parfaitement à ce que je recherche. Pourrai tu encore me donner un coup de main (ou de clavier plutôt). Sur mon fichier joint je souhaiterais rajouter un paramètre pour remplir mon tableau,je souhaiterais qu'excel, on fonction du choix sur la colonne A de la...
  14. J

    besoind'aide

    Bonjour et merci pour votre aide pour résoudre mon problème . je voudrai qu'excel transfère la valeur C5 ET D5 (ainsi que les suivantes) dans le tableau de la feuille "surface" et renvoie le résultat dans la cellule E5 de cette feuille (comme sur la première ligne) .Evidemment il serait plus...