Envoyer

Muller2 -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
j'aimerais bien que vous m'aidiez ça fait plusieurs jours que je me bat pour trouver la solution et le code adéquat
ce que je vous faire sur Excel
j'ai créer un formulaire contenant les champs suivants
sur le classeur1
Date d'envoi
Collaborateur N1
Nom de l'appelant
N° de contrat
Téléphone
N° sinistre
N° Ticket
J1-Commentaire
Alors j'ai ajouter un bouton ENVOYER
Ce que je veux faire c'est que lorsqu'un collègue rempli les champs sur le classeur1 et dès qu'il click sur ENVOYER je veux recevoir ces information sur un autre fichier Excel que je le nome classeur2
et je sais pas comment faire je suis vraiment débutant
Merci a l'avance j'oublierais jamais votre aide

4 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Vous pouvez mettre le classeur1 (formulaire) a dispo ??
    Nous aurions au moins ca ..

    Pour transmettre un fichier,
    Veillez a ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
    il faut passer par un site de pièce jointe tel que cjoint.com

    Allez sur ce site : https://www.cjoint.com/
    Clic sur parcourir,
    Cherche ton fichier,
    clic sur ouvrir,
    Clic sur "Créer le lien cjoint",
    Copier le lien,
    Revenir ici le coller dans une réponse...
    0
  2. Muller2
     
    MERCI INFINIMENT

    si je comprend bien je dois me connecter sur ce site et je suis la procedure

    le classeur1est déjà créer

    le soucis que dans ma cession j'ai pas l'acces a ce site est ce possible que vous le feriez pour moi SVP je vous en prie
    0
  3. Muller2
     
    parceque sur notre cession de travail on a des restrinctions

    est ce que je peux faire autrement sans passer par ce site
    0
    1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Re,
      Si vous ne pouvez acceder a ce site pour mettre a dispo, pas possible non plus pour recuperer...............!

      Quetions:
      _ dans ce classeur1, pas d'ecriture des dites informations ??
      _ dans le classeur2, ecriture en ligne et a la suite des infos "envoyees" ??
      0
    2. Muller2 > f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention  
       
      non sur le classeur1 j'ai mis
      Date d'envoi
      Collaborateur N1
      Nom de l'appelant
      N° de contrat
      Téléphone
      N° sinistre
      N° Ticket
      J1Commentaire
      ils ont vide
      je vous que mes collègue renseigne ces infos ensuite cliquer sur envoyer
      et par la suite je vous recevoir ces infos sur un autre classeur2
      0
    3. Muller2 > f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention  
       
      oui c'est tout a fait ça
      0
    4. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > Muller2
       
      Re,

      Vous en avez beaucoup de "collegues", ils saisissent en meme temps ??

      Quel Excel avez-vous ?
      0
    5. Muller2 > f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention  
       
      re bonjour

      non on est 25 collegues au max / ils font pas trop de saisie /disant 5 a l'heure

      j'ai excel 2007
      0
  4. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Re,

    Au plus simple vu les infos dispensees, code a affecter a un bouton sur feuille se saisie du classeur1

    Sub Envoi_Infos()
        'adaptez le nom de feuille
        TInfos = Worksheets("feuil1").Range("A1:H1").Value      'mise en tableau des infos
        'adaptez le chemin et le nom
        Workbooks.Open Filename:="D:\_Test_Txt\Classeur2.xlsx"      'ouverture du classeur
        PCV = Range("A" & Rows.Count).End(xlUp).Row + 1     'premiere cellule vide colonne A
        Range("A" & PCV).Resize(, 8) = TInfos       'ecriture infos
        ActiveWorkbook.Close True       'fermeture du classeur avec sauvegarde
    End Sub
    
    0
    1. MULLER2
       
      je sais pas comment te remercer mais vraiment tu m'as bcp aider

      ca marche mnt
      mais lorsqu'on fait la saisie tout se transfert au classeur2 ( ca c bon )
      mais dès qu'on fait une deusieme saisie ça efface la premiere
      moi je vous garder l'historique

      est ce que c possible
      0
    2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > MULLER2
       
      Re,

      mais dès qu'on fait une deusieme saisie ça efface la premiere
      Si vous parlez du classeur2, pas possible puisque il y a recherche de la premiere cellule vide colonne A. A supposer qu'il y ait quelque chose d'ecrit dans cette colonne au moment de l'envoi
      0
    3. Muller2
       
      Bonjour
      Puis je introduire un code a la macro pour que les cellules se vident après chaque clique sur ENVOYER . bien sûre mon ami je parle des cellules de la feuille 1 celle
      Si c possible de me couniquer ce code . je vouz remercie de tout min coeur cher ami
      0
    4. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > Muller2
       
      Bonjour,
      Vous copiez la ligne 3 du code que vous mettez avant end Sub. Vous enlevez TInfos= et vous remplacez value par clearcontent
      0
    5. muller2
       
      Bonjour;

      c'est bon mon ami ca marche maintenant .je voulais savoir est ce possible que par exemple
      3 collaborateur puissent utiliser le fichier classeur 1 dans lequel on fait la saisie est ce possible qu'ils utilisent en même temps

      ca va pas donner l'accès a un seule collaborateur ou tous en même temps
      0