Résultats de la recherche

  1. J

    Code pour récupérer valeur sur textbox

    Bonsoir à tous Dans une feuille j'ai A2=NBVAL(A4:A28) B2==NB.SI(B3:B28;"x") D2=B2/A2 Je récupère ces valeurs dans un Userform Private Sub UserForm_Initialize() TextBox1.Value = Worksheets("feuil1").Range("A2") TextBox2.Value = Worksheets("feuil1").Range("b2") TextBox3.Value =...
  2. J

    Récupérer nombre dans une chaine de caractere

    Bonsoir à tous Dans un fichier j'ai des références de ce type dans une colonne AC00000081854 je voudrais récupérer ceci 81854 dans une autre colonne merçi de votre aide
  3. J

    macro recherche

    Bonjour à tous je souhaite utiliser un fichier avec un userform de recherche trouvé sur le forum ,j'ai voulu l'adapter en y rajoutant 2 lignes de codes pour avoir 2 colonnes supplémentaires mais ca bug sur ces lignes,je n'arrive pas à voir ou est l'erreur ou est ce normal merci de votre aide...
  4. J

    recuperer 2 colonnes sans doublons

    bonsoir à tous Actuelement je recupére de la feuil1 une liste de references sans doublons en colonne B feuil2 jusque là pas de probleme ,je souhaite récupèrer en plus la désignation de ces reférences en collonne A j'ai bien essayer à partir du code existant de faire quelques modifs mais sans...
  5. J

    macro non appelée

    bonjour à tous j'utilisais ce code inspirer d'un code de Michel xld et modifier avec l'aide de PierreJean pour importer une plage, jusque là pas de probleme,j'ai ajouté une ligne de code pour l'appel d'une macro. Apparement cette macro n'ai jamais appelée ,donc j'ai utilisé F8 pour voir le...
  6. J

    Format de cellules fusionnees

    bonsoir à tous j'ai un petit soucis de format date avec une cellule fusionnee exemple; en A1 j'ai le texte suivant "reçu le " ,en B1 une date 12/02/2009,je recupere le tout en C1 avec la formule =A1&" "&B1 le résultat est" reçu le 38956 "au lieu de "reçu le 12/02/2009",j'ai bien essayé...
  7. J

    importer plage de données de plusieurs classeur

    bonjour à tous j'utilisais ce code inspirer d'un code de Michel xld pour importer une plage (c7:g88) d'un classeur dans un classeur recapitulatif,mais maintenant j'ai un nombre variable de classeurs dont les noms sont en colonne I je souhaite que la plage du premier classeur se colle en...
  8. J

    format text commentaire

    bonsoir à tous J'utilise ce code dérivé d'un exemple de l'excellent Boisgonthier pour mettre à jour des commentaires ,j'insère une photo +le texte des 4 cellules adjacentes dans le commentaire ,mais pour une meilleur lisibilité du texte sur la photo je souhaite avoir une police bleu de taille...
  9. J

    importer commentaires

    Bonsoir à tous Dans une application j'importe les commentaires des cellules de la base de données sur les cellules de meme valeur d'une feuille de commande par un action de double clic à l'aide de ce code inspiré de mr BOISGONTIER Private Sub Worksheet_BeforeDoubleClick(ByVal Target As...
  10. J

    copier coller commentaire sur feuil et valeur différentes

    Bonsoir à tous je désire récuperer (en vba) les commentaires de la plage "A"de la feuil1 concernant les chantiers et les attribués sur la plage "C" de la feuil2 en rapport avec les chantiers concernés Ex. en "C3" je recupere le commentaire concernant le chantier 1de la feuil1 la plage de...
  11. J

    Boucle vba

    bonjour à tous je viens d'ecrire un bout de code mais c'est un peu du bricolage ,est il possible de le simplifier en incluant une deuxieme boucle pour la suppression des cellules cordialement jean paul Sub essai() Dim i As Integer For i = 1 To 10 If cells(i, 3).Value = ""...
  12. J

    recherchev &texte

    bonsoir à tous suite à une proposition de formule de recherche par notre XLDnaute Accro abcd ,j'aimerais ajouter le texte de la cellule B3 au résulat par exemple si le resultat actuel est "KIT 1 " je souhaite afficher "KIT1 CHANTIER 1" ci joint un classeur plus explicit bon weekend...
  13. J

    Format contrôle DTPicker

    Bonsoir à tous Dans un userform j'utilise le contrôle DTPicker pour la saisie de date mais je suis un peu gêné par le format j'aimerais récupérer uniquement la date du jour saisie sans les heures et minutes, je me suis aperçu que les décimales du N° de série correspondant perturbent mes...
  14. J

    Saisie horizontale avec userform

    Bonsoir à tous je viens de créer un userform pour la saisie de ce tableau, mais j'ai un souci pour le remplissage des lignes horizontales suivant le choix du jour "J" je n'arrive pas à trouver le code de facon à saisir sur une meme ligne la premiere cellule vide merci à tous pour vos réponses
  15. J

    importer donnees sur jour ouvrables

    bonjour j'ai un plan type de livraison de kit(feuille PLAN-TYPE)que je souhaite importer en code vba en (C6 feuille kitting3) de mon calendrier(inspiré de celui JeanMarc.Stoeffler) en décalant pour les féries et samedi dimanche merci de votre aide
  16. J

    formule validation donnee

    bonsoir La cellule F3 comporte une formule de validation personnalisee du type =NBVAL(C3)<>0,j'aimerais ajouter une 2eme condition a celle ci ,la valeur de F3 doit etre' et<3' Merci pour vos reponses JP
  17. J

    Impression plage

    Bonsoir Dans ce code je lance une impression d'une plage suite à un masquage de certaine ligne ,j'aimerais ne pas lancer l'impression si la plage1 est vide On Error Resume Next x = 0 x = Application.Match(Cell, PlageCodes, 0) If x = 0 Then...
  18. J

    Fonction OU

    Bonsoir je souhaite une petite amélioration dans cette formule placée en colonne I =SI(OU(H4<>8;A4=0;C4=0);"erreur";0) J'aimerais de ne plus voir le message "erreur " si toutes les cellules liées sont vides merci et bonne soirée à tous
  19. J

    Valeur dans msgbox

    Bonjour à tous Je souhaite integrer la valeur d'une date dans un message d'une Msgbox, je n'arrive pas à mettre cette valeur dans la ligne de code , je dois manquer quelque chose . message souhaité ATTENTION CETTE JOURNEE du 21 novembre 2008 N'A PAS ETE VALIDEEE" Valider pour continuer"...
  20. J

    Collage spéciale page web

    Bonjour à tous Dans une macro est il possible de différencier le contenu du presse papier entre les valeurs d'une page WEB et les valeurs d'une page excel Si le contenu du presse papier est une page web je veux utliser "collage speciale en tant que texte unicode" Range("A1").Select...