Suite et fin

Le 27/12/2011 à 00:12

Bonjour

encore une dernière fois jais besoin de votre aide

quand je clique sur D2 il met les chiffres en G4/5

c'est-à-dire 5et 35 qui correspond a J/K5

si je clique sur D6 qui correspond a 5 alors il mettra

en G7/8 le 11 et le 5

idem pour G10/11

pour G13/14

pour G16/17

pour G119/20

et pour G22/23

12modif.zip (11.76 Ko)

Le 27/12/2011 à 01:07

Bonjour.

Tu ferais mieux de chercher à comprendre un peu les formules qu'on te donnes plutôt que de multiplier tes posts.

Je t'ai donner la formules RECHERCHEV. Adapte là, il n'y a pas grand chose à changer.

Et tu serais aimable de ne pas faire ton "caliméro" en disant que tu ne sais pas faire etc... Si tu n'obtiens pas de réponse, c'est que tes demandes sont mal formulées. Mais ça, on te l'a déjà dit à maintes reprises.

Le 27/12/2011 à 01:29

mai jais essayer croyez moi je n'y arrive pas

je nen fait pas exprès vous pouvez m'aidez

après ce fichier et fini

merci

Le 27/12/2011 à 02:08

donnez moi aux moi la première formules

pour G7 et G8 merci

après moi je ferait le reste merci

Le 27/12/2011 à 05:01

Salut le forum

Achètes-toi un bon bouquin sur le VBA

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Lig As Long
 If Not Application.Intersect(Target, Range("C28,Tablo")) Is Nothing Then
  If Target.Cells(1, 1).Address = "$C$28" Then
   Range("A4,G4:G23").ClearContents
   Exit Sub
  End If
    Cells(4, "A") = Target.Value
    Lig = ActiveSheet.Cells(Rows.Count, "G").End(xlUp).Row
    Select Case Lig
      Case 1
        Lig = 4
      Case 5
        Lig = 7
      Case 8
        Lig = 10
      Case 11
        Lig = 13
      Case 14
        Lig = 16
      Case 17
        Lig = 19
      Case 20
        Lig = 22
      Case Else
        Exit Sub
    End Select
  Cells(Lig, "G") = Application.VLookup(Target.Value, Range("I4:K39"), 2, False)
  Cells(Lig + 1, "G") = Application.VLookup(Target.Value, Range("I4:K39"), 3, False)
 End If
End Sub

Mytå

Le 27/12/2011 à 11:02

Bonjour et merci,

je sais que je dois faire alt+f11 mais après la formule je la colle dans quels fichier?

Le 27/12/2011 à 11:51

re moi jais coller la formules en faisant ALT +F11 et ensuite je les coller dans FEUIL1

Mais ça ne marche pas pourquoi ?

Le 27/12/2011 à 13:23

ci joint le fichier encore merci pour votre aide

12modif.zip (11.97 Ko)

Le 27/12/2011 à 17:38

je n'y arrive pas une personne pourrais m'aider merci d'avance