1. Ce site utilise des "témoins de connexion" (cookies) conformes aux textes de l'Union Européenne. Continuer à naviguer sur nos pages vaut acceptation de notre règlement en la matière. En savoir plus.
BOISGONTIER
Dernière activité :
16 Août 2018 à 11:28
Inscrit depuis le :
28 Septembre 2007
Messages :
6927
"J'aime" reçus :
441
Page d'accueil :
Habite à:
Montigny

Partager cette page

BOISGONTIER

XLDnaute Barbatruc, de Montigny

BOISGONTIER a été vu(e) dernièrement :
Viewing articles index, 16 Août 2018 à 11:28
    1. Clocking
      Clocking
      Bonjour Mr BOISGONTIER,

      Auriez vous un instant pour m'aider sur un petit détail ? :)

      Merci

      Mr THOMAS.
    2. BLERONP
      BLERONP
      Bonjour M. Boisgontier,
      je travaille sur votre super annuaire (http://boisgontierjacques.free.fr/fichiers/Formulaire/Annuaire2.xls) pour en faire un petit outil interne utilisable facilement par tous, Je me débrouille un peu mais je ne suis pas expert et de loin :-) Je souhaite rajouter des colonnes sur la BD et les intégrer dans le Userform F_LETTRE2 ...
      Pourriez-vous m'aider ? par avance un grand merci
      Pierre
    3. micou
      micou
    4. castor30
      castor30
      Bonjour monsieur
      Dans votre post concernant : FormRechercheModifAjout.xls
      est-il possible d'ajouter une colonne : Tél Bureau
      En vous remerciant
    5. thespeedy20
      thespeedy20
    6. sihamidi
      sihamidi
      Bonjour ;
      je vous écris car j'ai vu que le calendrier de votre site est de 2015 et non pas 2016
      veuillez la mettre à jour, http://boisgontierjacques.free.fr/
      cordialement.
    7. Hulk
      Hulk
      Salut,

      Je me permets de t'envoyer ce petit privé car comme tu es à l'origine du code...

      Donc je me permets de te diriger vers le post en question afin de savoir si tu as éventuellement une solution à mon problème.

      C'est ici

      Par avance je te remercie.

      Hulk.
    8. jf27
      jf27
      bjr,

      je me permets de te contacter car j'utilise couramment ton site Excel VBA JB qui est pour moi une source très riche dans mon auto apprentissage de VBA via une appli que je développe pour mon boulot.

      Aujourd'hui je me heurte à un pb dans la manipulation d'objets images dans usf et je n'ai pas trouvé de quoi m'aider sur ton site. D'où ce contact.

      Brièvement mon pb:
      un USF me sert à créer une fiche:
      je charge des images dans l'usf via des loadpicture et je sauve dans la fiche.

      ******************
      car1.Picture = LoadPicture(Mid(FileImg, 2, 200))
      *********************

      j'ai un 2ème menu modif fiche où j'initialise l'USF avec les données de la fiche à modifier, ce qui me donne pour les images:

      ***************************
      Set shp = Sheets("file").Shapes("car1")
      shp.CopyPicture
      Set car1.Picture = PastePicture()
      ***********************************
      Cela fonctionne "visuellement", la bonne image est bien affichée dans l'usf.
      Sauf que ensuite si je veux sauvegarder la fiche modifiée, les images chargées par pastepicture ne sont pas copiées, celles modifiées et chargées par loadpicture sont bien sauvegardées.

      Sais tu quelle est la différence entre

      **************
      Set car1.Picture = PastePicture()
      et
      car1.Picture = LoadPicture(Mid(FileImg, 2, 200))
      ***********************************
      car là est apparemment mo pb sur le nom qu'à car1.picture après chacune de ces fonctions.

      Merci par avance si tu peux m'aider

      code pour copier images dans fiche

      *********************************************
      Sheets("file").Activate
      Sheets("file").Unprotect


      'Copy image from userform in datasheet at the good place and the good size

      Set IPic = car1.Picture
      'Clipboard opening
      OpenClipboard 0&: EmptyClipboard
      'Copy image into clipboard
      hCopy = SetClipboardData(2, IPic.handle)
      'Close clipboard
      CloseClipboard
      'Check if something is in clipboard
      If hCopy Then
      'define where to copy
      Range("J5").Select


      'copy image in the active sheet
      ActiveSheet.Paste

      Selection.ShapeRange.LockAspectRatio = msoFalse
      Selection.ShapeRange.Height = ActiveCell.MergeArea.Height
      Selection.ShapeRange.Width = ActiveCell.MergeArea.Width
      Selection.ShapeRange.Rotation = 0#
      Selection.Name = "car1"
      End If
      'Clean variable
      ' DestroyIcon iPic.Handle
      Set IPic = Nothing
    9. jejeludi
      jejeludi
      Bonjour,

      Donc si je comprend bien je suis obligé de passer en VBA pour faire ce que je veux? je ne peux pas rester sur des formules simples dans excel?

      Merci encore
    10. jejeludi
      jejeludi
      bonjour,

      L'onglet DV2 du dernier fichier excel me convient parfaitement cependant j'ai à nouveau un problème car dans l'exemple il n'y a que 4 semaine. Comment faire si nous avons une infinité de semaine?

      Merci encore
    11. jejeludi
      jejeludi
      A nouveau merci

      mais ceci ne réponds pas à ma dernière question car si je met un c pour la colonne S1 avant de mettre le prénom toto sur la même ligne et que toto à déjà un c sur la colonne S1 sur une autre ligne rien ne m'empêche de le faire. Hors moi je souhaiterais ne pas pouvoir mettre toto.

      Merci encore de vous interresser à mon problème
    12. jejeludi
      jejeludi
      Bonjour,

      Pour commencer merci cela semble fonctionner à l'infini comme je le souhaite, je souhaiterais maintenant que le système fonctionne dans les deux sens.

      C'est à dire, si on met déjà un c en S1 S2 S3 et que après on sélectionne toto mais que toto à déjà eu un c en S1 S2 S3 il faudrait interdire de sélectionner toto.

      J'espère que c'est clair

      voici le post : http://www.excel-downloads.com/forum/108742-base-de-donn-es.html#post625944

      Merci encore pour vos réponse qui me permettent d'évoluer sur excel.
    13. Yassine102
      Yassine102
      Salut mon ami
      si vous permetez je veux savoir le code VB6 qui me permet de passer a l'autre page excel mais rester dans la meme feuille apres l'enregistrement de chaque client
      c'est a dire je veux affecter chaque client a sa propre page excel et dans la meme feuille
      voila le shema
      1-enregistrer le client dans page 1
      2-passer a la page 2 -----voila ce que je cherche
      3-enregistrer client 2
    14. montgesoye
      montgesoye
      J'ai créé une liste déroulante (voudrais pour environ 800 références)
      Et je voulais savoir s'il y avait la possbilité d'accéder directement à la référence "X" en tapant le 1er ou jusqu'au premier mot caractère de ma référence.
      Comme sur le filtre automatique proposé par Excel.


      Je voudrais si possible que les colonnes reference designation article et prix ht sois lie
      dans ma liste déroulante et allé ce placé sur la feuille commande

      donc si par exemple je tape directement dans la liste déroulante le premier mot
      ou lettre tomates la liste me propose les choix qui reste
      et la reference et le prix irons ce placer dessus
      comme une basse de donné je pourrais changer les prix sur ma feuille articles
      ma liste reference et designation seront lier et filtrer pas ordre alphabetique

      est ce réalisable !!!


      Merci à tous d'avance, pour votre aide

      ps: je viens de m'abonner au site mais je sais pas comment mettre en lien mon fichier excel pour que vous puissiez voir mon modele excel et je sais pas trop comment le mettre en ligne sur le forrum
      un petit cout de main pour m'expliquer
      encore un grand merci
    15. CP21
      CP21
      Bonsoir Mr Boisgontier, merci pour votre bout de macro, c'est exactement ce que je souhaitais. Du beau travail, de la belle ouvrage, encore merci et bonne soirée.
      CP21
    16. aline28
      aline28
  • Chargement...
  • Chargement...
  • A propos

    Page d'accueil :
    http://boisgontierjacques.free.fr
    Habite à:
    Montigny
    Utilise:
    Excel 2003 (PC)
    Département (France):
    78 - Yvelines