Transfert de données d'une feuille à une autre

[bbobb]

Bonsoir chers XLDnautes,
Je vous fait un bref exposé de mon soucis avec un petit fichier :
- je distribue des tickets numérotés à des clients que je rentre sur la feuille 2.
- une fois utilisé, je rentre les numéros de ticket dans la feuille 1

Je ne sais pas comment faire pour que :
- les numéros de tickets utilisés (feuille 1) se retrouvent en face des tickets distribués (feuille 2) et qu'en feuille 3 , je retrouve le nombre de tickets distribués et le nombre de tickets utilisés... tout ça automatiquement...

Merci d'avance à ceux qui voudront bien se pencher sur mon problème...

Bbobb

 

[skoobi]

Re : Transfert de données d'une feuille à une autre

Bonsoir bbobb,

test ce fichier.
2 choses:
1- la macro place les tickets dans la feuille 2
2- dans la feuille 3, le comptage se fait par une fonction

A+

 

[_Thierry]

Re : Transfert de données d'une feuille à une autre

Bonsoir ou Bonjour Bbob, Skoobi, le Forum

Bien que ton fichier Skoobi fonctionne très bien, j'ai fait aussi une approche 100% VBA, et j'y ai rajouté des "barbatrucs"

Je me suis efforcé aussi de prévoir une évolution de la taille du nombre de colonnes pour le détails et pour les analyses par client... De manière dynamique transparente, bien entendu....

Bonne(s) découverte(s) (et oui il n'y a pas qu'un seul barbatrucs !)

@+Thierry

 

[bbobb]

Re : Transfert de données d'une feuille à une autre

Skoobi, Thierry, bonjour,
Tout d'abord, merci pour votre aide...
Skoobi, comment faire pour rajouter des clients ? Mon fichier définitif en comporte 60...
mais ça marche.

Thierry, je n'ai sans doute pas compris le fonctionnement (je ne suis pas un XLDnaute averti..) mais en rajoutant des données dans la colone "retour, feuille retour", ces données ne se transfèrent pas dans la feuille détail, et par conséquent, la feuille "analyse" ne se met pas à jour non plus...

Si vous avez les solutions, ce serait simplement génial...
Bon dimanche
Bbobb

 

[skoobi]

Re : Transfert de données d'une feuille à une autre

Skoobi, Thierry, bonjour,
Tout d'abord, merci pour votre aide...
Skoobi, comment faire pour rajouter des clients ? Mon fichier définitif en comporte 60...
mais ça marche.
Bbobb

Re,
Je pensais que tu avais déjà tes clients dans ton fichier.
Comment veux-tu les ajouter? avec un "userform"?

A te relire

Edit:
Oubli ce que je viens de dire.....

 

[skoobi]

Re : Transfert de données d'une feuille à une autre

Bonsoir ou Bonjour Bbob, Skoobi, le Forum

Bien que ton fichier Skoobi fonctionne très bien, j'ai fait aussi une approche 100% VBA, et j'y ai rajouté des "barbatrucs"

Je me suis efforcé aussi de prévoir une évolution de la taille du nombre de colonnes pour le détails et pour les analyses par client... De manière dynamique transparente, bien entendu....

Bonne(s) découverte(s) (et oui il n'y a pas qu'un seul barbatrucs !)

@+Thierry

Bonjour _Thierry,

j'ai fais au plus vite, un peu trop car la feuille détail ne marche que pour 3 clients....

 

[skoobi]

Re : Transfert de données d'une feuille à une autre

Skoobi, Thierry, bonjour,

Thierry, je n'ai sans doute pas compris le fonctionnement (je ne suis pas un XLDnaute averti..) mais en rajoutant des données dans la colone "retour, feuille retour", ces données ne se transfèrent pas dans la feuille détail, et par conséquent, la feuille "analyse" ne se met pas à jour non plus...

Si vous avez les solutions, ce serait simplement génial...
Bon dimanche
Bbobb

J'ai testé son fichier, il marche.
Ajoute par exemple 6502 et 9016 dans la feuille retour.
En cas de ticket inexistant, il y a un message. Etait-ce ton cas?

A+

 

[_Thierry]

Re : Transfert de données d'une feuille à une autre

Bonjour Bbobb, Skoobi, le Forum

Skoobi, Thierry, bonjour,
Thierry, je n'ai sans doute pas compris le fonctionnement (je ne suis pas un XLDnaute averti..) mais en rajoutant des données dans la colone "retour, feuille retour", ces données ne se transfèrent pas dans la feuille détail, et par conséquent, la feuille "analyse" ne se met pas à jour non plus...
Bbobb

Je n'ai pas vraiment aussi suivi ce problème, comme Skoobi qui dans son dernier Post a également testé, je n'avais eu aucun soucis, si j'ajoute des numéros de tickets dans la feuille RETOUR soit ils sont existants dans la feuille DETAILS et donc devraient s'ajouter dans la colonne immédiatement adjacente à gauche, soit tu a un message qui t'indique que le numéro n'est pas retourné...

Ce que je propose c'est déjà que tu testes le fichier que j'ai produit "tel quel" sans changer quoique ce soit et en suivant mes instructions.

Ce que je pense c'est que tes numéros de tickets sont plus longs que ceux de ton fichier exemple, soit quatre digits... Or j'ai fait un test sur cette longueur précise (voir code de la Feuille RETOUR que j'ai commenté en face de cette ligne de test comme suit :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim TheTicket As String
Dim Cell As Range
 
If Application.Intersect(Range("A:A"), Target) Is Nothing Then Exit Sub
If Selection.Count > 1 Then Exit Sub
    [COLOR=red][B]If Len(Target) = 4 Then [/B][/COLOR][COLOR=darkgreen][B]'(si on veut limiter la détection à quatre chiffres)[/B][/COLOR]
        TheTicket = Target
 
        With Feuil2.UsedRange
            Set Cell = .Find(TheTicket, LookIn:=xlValues, LookAt:=xlWhole)
            If Not Cell Is Nothing Then
                Cell.Offset(0, 1) = TheTicket
                Counting .Cells(1, Cell.Column).Value, Cell.Column
            Else
            MsgBox "Pas de numéro de ticket trouvé dans la base pour " & TheTicket, vbCritical, Prog
            Exit Sub
            End If
        End With
   [B][COLOR=red]End If[/COLOR][/B]
End Sub

Par conséquent, je propose que soit tu changes le nombre prévu pour le "Len" soit "4" avec celui du nombre de digits de tes numéros de tickets.

NB Possibilité seulement applicable si la structure de tous les numéros en longueur de caratères est identique

Sinon supprimer cette condition IF sans oublier le End If en bas de cette Sub (en rouge)

Voilà pour l'instant, si tu as toujours des problèmes, il vaudrait mieux alors avoir un fichier mieux représentatif de ta structure si elle est différente de ton exemple.

Bon Dimanche

@+Thierry

PS Vu que tu indiques un niveau débutant, pour accéder au Code de la feuille RETOUR, tu dois pointer depuis Excel, sur l'onglet de cette Feuille RETOUR, puis tu fais un Click Droit sur le nom d'onglet, dans le menu contextuel qui va apparaître tu sélectionnes "Visualiser le Code".

 

[bbobb]

Re : Transfert de données d'une feuille à une autre

Thierry,
Effectivement, ça marche, mais à la condition que dans la colonne retour, je saisisse les numéros un par un, ce qui est trop fastidieux, car la quantité définitive est de plusieurs milliers.....
Là où ça ne marche pas, c'est lorsque je j'importe les numéro à mettre dans la colonne retour depuis un autre fichier par un copier/coller....
As-tu la solution pour cela ?

Thierry, Skoobi,
Merci encore à vous deux
BBobb

 

[jeanpierre]

Re : Transfert de données d'une feuille à une autre

Bonsoir BBobb, Thierry, skoobi, le forum,

Pour avoir suivi un peu ce fil....

Peut-être dans ton format d'import ???

Mais, sans rien, pas facile...

Bonne soirée.

Jean-Pierre

 

[bbobb]

Re : Transfert de données d'une feuille à une autre

Bonsoir jeanpierre,
Ci-joint le fichier en question
pour tester le fichier, j'ai copier/coller depuis la feuille détail, puis depuis un autre fichier, sans résultat...

Vois ce que tu peux faire
Merci
Bbobb

 

[jeanpierre]

Re : Transfert de données d'une feuille à une autre

Re,

Désolé, je n'ouvre pas les Xls déjà, car ils s'ouvrent sous IE et on ne peut rien en faire...

D'autre part, ce n'est pas le Xls (zippé ou pas) mais le fichier d'origine d'import qu'il faudrait.

Tu peux rééditer ton message et dans Gérer les pièces jointes, Supprimer ton fichier et en remettre un autre (en ZIP, clic droit sur ton fichier, et envoyer vers/dossier compressé et c'est celui là qu'il faut joindre)... Pourquoi SUPPRIMER, pour gagner de la place sur le serveur....

 

[_Thierry]

Re : Transfert de données d'une feuille à une autre

Bonsoir Bbobb; jeanPierre, Skoobi, le Forum

Bonsoir chers XLDnautes,
Je vous fait un bref exposé de mon soucis avec un petit fichier :
- je distribue des tickets numérotés à des clients que je rentre sur la feuille 2.
- une fois utilisé, je rentre les numéros de ticket dans la feuille 1

Je ne sais pas comment faire pour que :
- les numéros de tickets utilisés (feuille 1) se retrouvent en face des tickets distribués (feuille 2) et qu'en feuille 3 , je retrouve le nombre de tickets distribués et le nombre de tickets utilisés... tout ça automatiquement...

Merci d'avance à ceux qui voudront bien se pencher sur mon problème...

Bbobb

Bbobb dommage que tu n'aies pas pensé à expliquer que tu rentrais les numéros par un Import... Celà m'aurait éviter de partir sur une fausse piste...

Mais ce n'est pas grave, le code de Skoobi pourrait pratiquement faire l'affaire, mais bon, je reprends mon algo, mais par contre sans détection d'évènement en Feuille "RETOUR" il faudra agir sur un bouton une fois l'import effectué...

Merci à Jean Pierre pour son intervention et pour avoir suivi le fil ;-)

Bonne Soirée
@+Thierry

 

[bbobb]

Re : Transfert de données d'une feuille à une autre

Bonsoir à tous,
Thierry, tu es "trop fort".... ça marche très bien, le fait de devoir cliquer sur le bouton n'est pas gènant.
Désolé de ne pas avoir précisé que j'importais les données, en tant que néophyte, je ne pensais pas que cela avait un influence....
Dernière question : comment puis-je faire pour étendre le tableau sur 60 clients ?

Merci à toi, jeanpierre, skoobi et le forum.
Bonne soirée

Bbobb

 

[_Thierry]

Re : Transfert de données d'une feuille à une autre

Re Bbobb, JeanPierre, Skooby

Pour étendre le classeur pour une gestion de soixante clients, c'est possible, sans souci à mon avis, vu de la manière dont j'ai préparé les algos.

Etape 1 :
Ajouter les clients dans la Feuille "ANALYSE" sur la colonne "A" uniquement.

Etape 2 :
Preparer la feuille "DETAILS" de manière à scrupuleusement respecter la même structure, au besoin faire un copié/collé de deux colonnes (par exemple "K & L" pour les recopier en "M & N" car chaque Client Comporte Deux Colonnes : une Paire et une Impaire (c'est la base même de mon algo pour s'y retrouver)

Pour le reste tout devrait rouler une fois que tu auras alimenté les numéros de tickets dans les colonnes Impaires (même si tu copies/colles, l'évenementielle pour l'Analyse devrait s'activer si tu modifies à la minime un seuk des tickets dans cette Colonne Impaire)

Bon Travail et merci du qualificatif, mais on ne l'est jamais trop avec les demandes que l'on rencontre sur ce Forum ;-)

Bonne Soirée
@+Thierry