Discussion :

[alexandrek]

Bonjour
Voila je sais pas si je peux écrire mon code comme cela ...

je pense mon problème se situe là car la destination n est pas bonne deja

Code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets(nom).Range("M" & lign).Value = donexp

Après cette concaténation, je voudrais mettre si je clique D27
mettre CLI_1 ds Sheets(nom).Range("C6,D6"), REC_1 dans Sheets(nom).Range("C14,D14")
..... PAY_1 ds Sheets(nom).Range("C15,D15"),
DS_1 dans Sheets(nom).Range("C4,D4"),
SF dans Sheets(nom).Range("C7,D7"), VD_1 dans Sheets(nom).Range("C8,D8")
et mettre RATE_1 ds Sheets(nom).Range("C13,D13")

et apres la destination de AMCY1_1 serait sous condition comme ici, pareil pr AMCY2_1 , pareil pour CCYO_1 et CCYT_1
sachant que si je clique D28 ça sera les memes noms CLI,REC .... mais avec le N°2 ... comme CLI_2 ... mais la destination restera la meme Sheets(nom).Range("C6,D6"), pour CLI_2 .........................

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Sub Select_Data(ByVal Target As Range)
 
' regroupement des données
 
Dim listdon As Variant
Dim lign As Byte
Dim donexp As String
Dim i As Integer
 
    With Target
            If .Column <> 4 Or .Row < 27 Then Exit Sub
            lign = .Row - 26
            listdon = Array("CLI", "REC", "PAY", "PAY", "DS", "SF", "VD", "AMCCY1", "AMCCY2", "CCYO", "CCYT", "RATE")
            donexp = ""
        For Each donnée In listdon
            donexp = donexp & Range(donnée & "_" & lign)
        Next donnée
 
        Sheets(nom).Range("M" & lign).Value = donexp
    End With
  End Sub

merci bcp en tout cas car vous etes présents et très doué ... si je peux aider n hésitez pas !

[Invité]

Bonjour
Il faut effectivement être très doué pour comprendre...

La moindre des choses, pour avoir des réponses, c'est de faire un minimum d'effort dans la présentation du sujet. ...

[Qwazerty]

Salut
[Edit] Grillé [/Edit]

Tu te rends compte que c'est au moins le 6 ou 7eme sujet que tu ouvres sur la même problématique....

Au lieu de multiplier les posts en en ouvrant un tous les jours, suis les conseils qui te sont données dans ceux que tu as déjà ouvert, plusieurs personnes ont pris le temps de t'expliquer des choses, lvr, MarcelG, corona, U. Milité, et moi-même, tu nous remercies tous a grandes effusions, un peu de pommade par ci par là pour flatter notre ego .... mais tu sais, (et je pense pouvoir parler au nom de tous) ce qui nous fait vraiment plaisir, c'est quand la personne fait un réel effort de compréhension.
On est tous conscient que les gens ne deviendront pas des programmeurs en 2 jours, peut être même que certains n'aurons plus jamais besoin de vba, mais le minimum syndical, c'est quand même d'écouter ce que les gens te disent et d'essayer d'appliquer leurs enseignements!

Alors si tu veux de l'aide, reprend ton code en respectant les remarques qui t'on été faites sur tes autres postes et essai un peu de comprendre ce que tu fais.
Prend le temps d'expliquer ton problème clairement, n'utilise pas des mots si tu n'es pas sur de leur sens, la plupart de tes explications sont incompréhensibles. Alors à moins que le français ne soit pas ta langue maternelle et que tu la maîtrises mal, essai de faire un effort. Je ne suis pas un cador en langue française, mais j’estime devoir faire un effort pour être lisible et compréhensible, le langage sms par exemple, montre que tu ne fais pas cet effort.

Bon courage dans ton apprentissage du vba et de la vie en societé.

++
Qwaz

[alexandrek]

Je suis désolé si je comprends pas toutes les explications et en effet tu as raison je ne suis pas francais .. Peut etre c est pour cela que certains explications je ne comprends pas ....


J ai appliqué les conseils de chacun sur certaines problèmatiques mais il y a des explications que je ne comprends pas ...

I m so sorry for that

[Invité]

Ne pas être Français peut justifier certaines choses.
Néanmoins cela n'interdit pas:
- de bien lire les conseils qui te sont donnés.
- de respecter les règles du forum
- d'exposer clairement les choses
- de relire avant de valider en se mettant à la place du lecteur.
- de ne pas poster à tord et à travers.
- de ne pas revenir sur une modération de post.

En respectant tout cela , cela te permettra de progresser et d'avoir un maximum de réponses intéressantes.

[alexandrek]

Ok je comprends, je vais bien relire tous les conseils qu'on m'a fait parvenir..
Merci