Trop grand

Le 19/07/2012 à 22:09

Bonjour,

Pourriez-vous me donner un conseil pour couper mon écriture :

Private Sub CommandButton1_Click()
If OptionButton1 = True Then
Sheets("Janvier 2012").Range("c8").Value = TextBox13.Value
Sheets("Janvier 2012").Range("b8").Value = TextBox10.Value
Sheets("Janvier 2012").Range("d8").Value = TextBox12.Value
Sheets("Janvier 2012").Range("f8").Value = TextBox21.Value
Sheets("Janvier 2012").Range("e8").Value = TextBox22.Value
Sheets("Janvier 2012").Range("g8").Value = TextBox23.Value
Sheets("Janvier 2012").Range("m8").Value = TextBox30.Value
Sheets("Janvier 2012").Range("n8").Value = TextBox31.Value
Sheets("Janvier 2012").Range("s8").Value = TextBox32.Value
Sheets("Janvier 2012").Range("l8").Value = TextBox36.Value
Sheets("Janvier 2012").Range("r8").Value = TextBox38.Value
Sheets("Janvier 2012").Range("t8").Value = TextBox39.Value
Sheets("Janvier 2012").Range("x8").Value = TextBox40.Value
Sheets("Janvier 2012").Range("v8").Value = TextBox41.Value
Sheets("Janvier 2012").Range("w8").Value = TextBox45.Value
Sheets("Janvier 2012").Range("u8").Value = TextBox46.Value
Sheets("Janvier 2012").Range("y8").Value = TextBox42.Value
Sheets("Janvier 2012").Range("ac8").Value = TextBox43.Value
Sheets("Janvier 2012").Range("aa8").Value = TextBox44.Value
Sheets("Janvier 2012").Range("ab8").Value = TextBox47.Value
Sheets("Janvier 2012").Range("z8").Value = TextBox48.Value
Sheets("Janvier 2012").Range("ad8").Value = TextBox49.Value
Sheets("Janvier 2012").Range("aj8").Value = TextBox50.Value
Sheets("Janvier 2012").Range("ah8").Value = TextBox51.Value
Sheets("Janvier 2012").Range("ag8").Value = TextBox52.Value
Sheets("Janvier 2012").Range("ay8").Value = TextBox79.Value
Sheets("Janvier 2012").Range("p8").Value = TextBox81.Value
Sheets("Janvier 2012").Range("az8").Value = TextBox83.Value
Sheets("Janvier 2012").Range("ba8").Value = TextBox85.Value
Sheets("Janvier 2012").Range("bb8").Value = TextBox87.Value
Sheets("Janvier 2012").Range("bc8").Value = TextBox91.Value
Sheets("Janvier 2012").Range("bd8").Value = TextBox93.Value
Sheets("Janvier 2012").Range("be8").Value = TextBox95.Value
Sheets("Janvier 2012").Range("bf8").Value = TextBox89.Value
Sheets("Janvier 2012").Range("bg8").Value = TextBox99.Value
Sheets("Janvier 2012").Range("bi8").Value = TextBox97.Value
Sheets("Janvier 2012").Range("ah43").Value = TextBox100.Value
Sheets("Janvier 2012").Range("cn8").Value = TextBox78.Value
Sheets("Janvier 2012").Range("co8").Value = TextBox80.Value
Sheets("Janvier 2012").Range("bo8").Value = TextBox82.Value
Sheets("Janvier 2012").Range("br8").Value = TextBox84.Value
Sheets("Janvier 2012").Range("cp8").Value = TextBox86.Value
Sheets("Janvier 2012").Range("cq8").Value = TextBox90.Value
Sheets("Janvier 2012").Range("bx8").Value = TextBox92.Value
Sheets("Janvier 2012").Range("ca8").Value = TextBox94.Value
Sheets("Janvier 2012").Range("cd8").Value = TextBox88.Value
Sheets("Janvier 2012").Range("cg8").Value = TextBox98.Value
Sheets("Janvier 2012").Range("cj8").Value = TextBox96.Value
End If
If OptionButton2 = True Then
Sheets("Janvier 2012").Range("c9").Value = TextBox13.Value
Sheets("Janvier 2012").Range("b9").Value = TextBox10.Value
Sheets("Janvier 2012").Range("d9").Value = TextBox12.Value
Sheets("Janvier 2012").Range("f9").Value = TextBox21.Value
Sheets("Janvier 2012").Range("e9").Value = TextBox22.Value
Sheets("Janvier 2012").Range("g9").Value = TextBox23.Value
Sheets("Janvier 2012").Range("m9").Value = TextBox30.Value
Sheets("Janvier 2012").Range("n9").Value = TextBox31.Value
Sheets("Janvier 2012").Range("s9").Value = TextBox32.Value
Sheets("Janvier 2012").Range("l9").Value = TextBox36.Value
Sheets("Janvier 2012").Range("r9").Value = TextBox38.Value
Sheets("Janvier 2012").Range("t9").Value = TextBox39.Value
Sheets("Janvier 2012").Range("x9").Value = TextBox40.Value
Sheets("Janvier 2012").Range("v9").Value = TextBox41.Value
Sheets("Janvier 2012").Range("w9").Value = TextBox45.Value
Sheets("Janvier 2012").Range("u9").Value = TextBox46.Value
Sheets("Janvier 2012").Range("y9").Value = TextBox42.Value
Sheets("Janvier 2012").Range("ac9").Value = TextBox43.Value
Sheets("Janvier 2012").Range("aa9").Value = TextBox44.Value
Sheets("Janvier 2012").Range("ab9").Value = TextBox47.Value
Sheets("Janvier 2012").Range("z9").Value = TextBox48.Value
Sheets("Janvier 2012").Range("ad9").Value = TextBox49.Value
Sheets("Janvier 2012").Range("aj9").Value = TextBox50.Value
Sheets("Janvier 2012").Range("ah9").Value = TextBox51.Value
Sheets("Janvier 2012").Range("ag9").Value = TextBox52.Value
Sheets("Janvier 2012").Range("ay9").Value = TextBox79.Value
Sheets("Janvier 2012").Range("p9").Value = TextBox81.Value
Sheets("Janvier 2012").Range("az9").Value = TextBox83.Value
Sheets("Janvier 2012").Range("ba9").Value = TextBox85.Value
Sheets("Janvier 2012").Range("bb9").Value = TextBox87.Value
Sheets("Janvier 2012").Range("bc9").Value = TextBox91.Value
Sheets("Janvier 2012").Range("bd9").Value = TextBox93.Value
Sheets("Janvier 2012").Range("be9").Value = TextBox95.Value
Sheets("Janvier 2012").Range("bf9").Value = TextBox89.Value
Sheets("Janvier 2012").Range("bg9").Value = TextBox99.Value
Sheets("Janvier 2012").Range("bi9").Value = TextBox97.Value
Sheets("Janvier 2012").Range("ah43").Value = TextBox100.Value
Sheets("Janvier 2012").Range("cn9").Value = TextBox78.Value
Sheets("Janvier 2012").Range("co9").Value = TextBox80.Value
Sheets("Janvier 2012").Range("bo9").Value = TextBox82.Value
Sheets("Janvier 2012").Range("br9").Value = TextBox84.Value
Sheets("Janvier 2012").Range("cp9").Value = TextBox86.Value
Sheets("Janvier 2012").Range("cq8").Value = TextBox90.Value
Sheets("Janvier 2012").Range("bx9").Value = TextBox92.Value
Sheets("Janvier 2012").Range("ca9").Value = TextBox94.Value
Sheets("Janvier 2012").Range("cd9").Value = TextBox88.Value
Sheets("Janvier 2012").Range("cg9").Value = TextBox98.Value
Sheets("Janvier 2012").Range("cj9").Value = TextBox96.Value
End If
If OptionButton3 = True Then
Sheets("Janvier 2012").Range("c10").Value = TextBox13.Value
Sheets("Janvier 2012").Range("b10").Value = TextBox10.Value
Sheets("Janvier 2012").Range("d10").Value = TextBox12.Value
Sheets("Janvier 2012").Range("f10").Value = TextBox21.Value
Sheets("Janvier 2012").Range("e10").Value = TextBox22.Value
Sheets("Janvier 2012").Range("g10").Value = TextBox23.Value
Sheets("Janvier 2012").Range("m10").Value = TextBox30.Value
Sheets("Janvier 2012").Range("n10").Value = TextBox31.Value
Sheets("Janvier 2012").Range("s10").Value = TextBox32.Value
Sheets("Janvier 2012").Range("l10").Value = TextBox36.Value
Sheets("Janvier 2012").Range("r10").Value = TextBox38.Value
Sheets("Janvier 2012").Range("t10").Value = TextBox39.Value
Sheets("Janvier 2012").Range("x10").Value = TextBox40.Value
Sheets("Janvier 2012").Range("v10").Value = TextBox41.Value
Sheets("Janvier 2012").Range("w10").Value = TextBox45.Value
Sheets("Janvier 2012").Range("u10").Value = TextBox46.Value
Sheets("Janvier 2012").Range("y10").Value = TextBox42.Value
Sheets("Janvier 2012").Range("ac10").Value = TextBox43.Value
Sheets("Janvier 2012").Range("aa10").Value = TextBox44.Value
Sheets("Janvier 2012").Range("ab10").Value = TextBox47.Value
Sheets("Janvier 2012").Range("z10").Value = TextBox48.Value
Sheets("Janvier 2012").Range("ad10").Value = TextBox49.Value
Sheets("Janvier 2012").Range("aj10").Value = TextBox50.Value
Sheets("Janvier 2012").Range("ah10").Value = TextBox51.Value
Sheets("Janvier 2012").Range("ag10").Value = TextBox52.Value
Sheets("Janvier 2012").Range("ay10").Value = TextBox79.Value
Sheets("Janvier 2012").Range("p10").Value = TextBox81.Value
Sheets("Janvier 2012").Range("az10").Value = TextBox83.Value
Sheets("Janvier 2012").Range("ba10").Value = TextBox85.Value
Sheets("Janvier 2012").Range("bb10").Value = TextBox87.Value
Sheets("Janvier 2012").Range("bc10").Value = TextBox91.Value
Sheets("Janvier 2012").Range("bd10").Value = TextBox93.Value
Sheets("Janvier 2012").Range("be10").Value = TextBox95.Value
Sheets("Janvier 2012").Range("bf10").Value = TextBox89.Value
Sheets("Janvier 2012").Range("bg10").Value = TextBox99.Value
Sheets("Janvier 2012").Range("bi10").Value = TextBox97.Value
Sheets("Janvier 2012").Range("ah43").Value = TextBox100.Value
Sheets("Janvier 2012").Range("cn10").Value = TextBox78.Value
Sheets("Janvier 2012").Range("co10").Value = TextBox80.Value
Sheets("Janvier 2012").Range("bo10").Value = TextBox82.Value
Sheets("Janvier 2012").Range("br10").Value = TextBox84.Value
Sheets("Janvier 2012").Range("cp10").Value = TextBox86.Value
Sheets("Janvier 2012").Range("cq10").Value = TextBox90.Value
Sheets("Janvier 2012").Range("bx10").Value = TextBox92.Value
Sheets("Janvier 2012").Range("ca10").Value = TextBox94.Value
Sheets("Janvier 2012").Range("cd10").Value = TextBox88.Value
Sheets("Janvier 2012").Range("cg10").Value = TextBox98.Value
Sheets("Janvier 2012").Range("cj10").Value = TextBox96.Value
End If
.../... (je ne peu pas mettre tout le texte car trop long, mais il y a 31 paragraphe comme ce du haut et bas)
If OptionButton29 = True Then
Sheets("Janvier 2012").Range("c36").Value = TextBox13.Value
Sheets("Janvier 2012").Range("b36").Value = TextBox10.Value
Sheets("Janvier 2012").Range("d36").Value = TextBox12.Value
Sheets("Janvier 2012").Range("f36").Value = TextBox21.Value
Sheets("Janvier 2012").Range("e36").Value = TextBox22.Value
Sheets("Janvier 2012").Range("g36").Value = TextBox23.Value
Sheets("Janvier 2012").Range("m36").Value = TextBox30.Value
Sheets("Janvier 2012").Range("n36").Value = TextBox31.Value
Sheets("Janvier 2012").Range("s36").Value = TextBox32.Value
Sheets("Janvier 2012").Range("l36").Value = TextBox36.Value
Sheets("Janvier 2012").Range("r36").Value = TextBox38.Value
Sheets("Janvier 2012").Range("t36").Value = TextBox39.Value
Sheets("Janvier 2012").Range("x36").Value = TextBox40.Value
Sheets("Janvier 2012").Range("v36").Value = TextBox41.Value
Sheets("Janvier 2012").Range("w36").Value = TextBox45.Value
Sheets("Janvier 2012").Range("u36").Value = TextBox46.Value
Sheets("Janvier 2012").Range("y36").Value = TextBox42.Value
Sheets("Janvier 2012").Range("ac36").Value = TextBox43.Value
Sheets("Janvier 2012").Range("aa36").Value = TextBox44.Value
Sheets("Janvier 2012").Range("ab36").Value = TextBox47.Value
Sheets("Janvier 2012").Range("z36").Value = TextBox48.Value
Sheets("Janvier 2012").Range("ad36").Value = TextBox49.Value
Sheets("Janvier 2012").Range("aj36").Value = TextBox50.Value
Sheets("Janvier 2012").Range("ah36").Value = TextBox51.Value
Sheets("Janvier 2012").Range("ag36").Value = TextBox52.Value
Sheets("Janvier 2012").Range("ay36").Value = TextBox79.Value
Sheets("Janvier 2012").Range("p36").Value = TextBox81.Value
Sheets("Janvier 2012").Range("az36").Value = TextBox83.Value
Sheets("Janvier 2012").Range("ba36").Value = TextBox85.Value
Sheets("Janvier 2012").Range("bb36").Value = TextBox87.Value
Sheets("Janvier 2012").Range("bc36").Value = TextBox91.Value
Sheets("Janvier 2012").Range("bd36").Value = TextBox93.Value
Sheets("Janvier 2012").Range("be36").Value = TextBox95.Value
Sheets("Janvier 2012").Range("bf36").Value = TextBox89.Value
Sheets("Janvier 2012").Range("bg36").Value = TextBox99.Value
Sheets("Janvier 2012").Range("bi36").Value = TextBox97.Value
Sheets("Janvier 2012").Range("ah43").Value = TextBox100.Value
Sheets("Janvier 2012").Range("cn36").Value = TextBox78.Value
Sheets("Janvier 2012").Range("co36").Value = TextBox80.Value
Sheets("Janvier 2012").Range("bo36").Value = TextBox82.Value
Sheets("Janvier 2012").Range("br36").Value = TextBox84.Value
Sheets("Janvier 2012").Range("cp36").Value = TextBox86.Value
Sheets("Janvier 2012").Range("cq36").Value = TextBox90.Value
Sheets("Janvier 2012").Range("bx36").Value = TextBox92.Value
Sheets("Janvier 2012").Range("ca36").Value = TextBox94.Value
Sheets("Janvier 2012").Range("cd36").Value = TextBox88.Value
Sheets("Janvier 2012").Range("cg36").Value = TextBox98.Value
Sheets("Janvier 2012").Range("cj36").Value = TextBox96.Value
End If
If OptionButton30 = True Then
Sheets("Janvier 2012").Range("c37").Value = TextBox13.Value
Sheets("Janvier 2012").Range("b37").Value = TextBox10.Value
Sheets("Janvier 2012").Range("d37").Value = TextBox12.Value
Sheets("Janvier 2012").Range("f37").Value = TextBox21.Value
Sheets("Janvier 2012").Range("e37").Value = TextBox22.Value
Sheets("Janvier 2012").Range("g37").Value = TextBox23.Value
Sheets("Janvier 2012").Range("m37").Value = TextBox30.Value
Sheets("Janvier 2012").Range("n37").Value = TextBox31.Value
Sheets("Janvier 2012").Range("s37").Value = TextBox32.Value
Sheets("Janvier 2012").Range("l37").Value = TextBox36.Value
Sheets("Janvier 2012").Range("r37").Value = TextBox38.Value
Sheets("Janvier 2012").Range("t37").Value = TextBox39.Value
Sheets("Janvier 2012").Range("x37").Value = TextBox40.Value
Sheets("Janvier 2012").Range("v37").Value = TextBox41.Value
Sheets("Janvier 2012").Range("w37").Value = TextBox45.Value
Sheets("Janvier 2012").Range("u37").Value = TextBox46.Value
Sheets("Janvier 2012").Range("y37").Value = TextBox42.Value
Sheets("Janvier 2012").Range("ac37").Value = TextBox43.Value
Sheets("Janvier 2012").Range("aa37").Value = TextBox44.Value
Sheets("Janvier 2012").Range("ab37").Value = TextBox47.Value
Sheets("Janvier 2012").Range("z37").Value = TextBox48.Value
Sheets("Janvier 2012").Range("ad37").Value = TextBox49.Value
Sheets("Janvier 2012").Range("aj37").Value = TextBox50.Value
Sheets("Janvier 2012").Range("ah37").Value = TextBox51.Value
Sheets("Janvier 2012").Range("ag37").Value = TextBox52.Value
Sheets("Janvier 2012").Range("ay37").Value = TextBox79.Value
Sheets("Janvier 2012").Range("p37").Value = TextBox81.Value
Sheets("Janvier 2012").Range("az37").Value = TextBox83.Value
Sheets("Janvier 2012").Range("ba37").Value = TextBox85.Value
Sheets("Janvier 2012").Range("bb37").Value = TextBox87.Value
Sheets("Janvier 2012").Range("bc37").Value = TextBox91.Value
Sheets("Janvier 2012").Range("bd37").Value = TextBox93.Value
Sheets("Janvier 2012").Range("be37").Value = TextBox95.Value
Sheets("Janvier 2012").Range("bf37").Value = TextBox89.Value
Sheets("Janvier 2012").Range("bg37").Value = TextBox99.Value
Sheets("Janvier 2012").Range("bi37").Value = TextBox97.Value
Sheets("Janvier 2012").Range("ah43").Value = TextBox100.Value
Sheets("Janvier 2012").Range("cn37").Value = TextBox78.Value
Sheets("Janvier 2012").Range("co37").Value = TextBox80.Value
Sheets("Janvier 2012").Range("bo37").Value = TextBox82.Value
Sheets("Janvier 2012").Range("br37").Value = TextBox84.Value
Sheets("Janvier 2012").Range("cp37").Value = TextBox86.Value
Sheets("Janvier 2012").Range("cq37").Value = TextBox90.Value
Sheets("Janvier 2012").Range("bx37").Value = TextBox92.Value
Sheets("Janvier 2012").Range("ca37").Value = TextBox94.Value
Sheets("Janvier 2012").Range("cd37").Value = TextBox88.Value
Sheets("Janvier 2012").Range("cg37").Value = TextBox98.Value
Sheets("Janvier 2012").Range("cj37").Value = TextBox96.Value
End If
If OptionButton31 = True Then
Sheets("Janvier 2012").Range("c38").Value = TextBox13.Value
Sheets("Janvier 2012").Range("b38").Value = TextBox10.Value
Sheets("Janvier 2012").Range("d38").Value = TextBox12.Value
Sheets("Janvier 2012").Range("f38").Value = TextBox21.Value
Sheets("Janvier 2012").Range("e38").Value = TextBox22.Value
Sheets("Janvier 2012").Range("g38").Value = TextBox23.Value
Sheets("Janvier 2012").Range("m38").Value = TextBox30.Value
Sheets("Janvier 2012").Range("n38").Value = TextBox31.Value
Sheets("Janvier 2012").Range("s38").Value = TextBox32.Value
Sheets("Janvier 2012").Range("l38").Value = TextBox36.Value
Sheets("Janvier 2012").Range("r38").Value = TextBox38.Value
Sheets("Janvier 2012").Range("t38").Value = TextBox39.Value
Sheets("Janvier 2012").Range("x38").Value = TextBox40.Value
Sheets("Janvier 2012").Range("v38").Value = TextBox41.Value
Sheets("Janvier 2012").Range("w38").Value = TextBox45.Value
Sheets("Janvier 2012").Range("u38").Value = TextBox46.Value
Sheets("Janvier 2012").Range("y38").Value = TextBox42.Value
Sheets("Janvier 2012").Range("ac38").Value = TextBox43.Value
Sheets("Janvier 2012").Range("aa38").Value = TextBox44.Value
Sheets("Janvier 2012").Range("ab38").Value = TextBox47.Value
Sheets("Janvier 2012").Range("z38").Value = TextBox48.Value
Sheets("Janvier 2012").Range("ad38").Value = TextBox49.Value
Sheets("Janvier 2012").Range("aj38").Value = TextBox50.Value
Sheets("Janvier 2012").Range("ah38").Value = TextBox51.Value
Sheets("Janvier 2012").Range("ag38").Value = TextBox52.Value
Sheets("Janvier 2012").Range("ay38").Value = TextBox79.Value
Sheets("Janvier 2012").Range("p38").Value = TextBox81.Value
Sheets("Janvier 2012").Range("az38").Value = TextBox83.Value
Sheets("Janvier 2012").Range("ba38").Value = TextBox85.Value
Sheets("Janvier 2012").Range("bb38").Value = TextBox87.Value
Sheets("Janvier 2012").Range("bc38").Value = TextBox91.Value
Sheets("Janvier 2012").Range("bd38").Value = TextBox93.Value
Sheets("Janvier 2012").Range("be38").Value = TextBox95.Value
Sheets("Janvier 2012").Range("bf38").Value = TextBox89.Value
Sheets("Janvier 2012").Range("bg38").Value = TextBox99.Value
Sheets("Janvier 2012").Range("bi38").Value = TextBox97.Value
Sheets("Janvier 2012").Range("ah43").Value = TextBox100.Value
Sheets("Janvier 2012").Range("cn38").Value = TextBox78.Value
Sheets("Janvier 2012").Range("co38").Value = TextBox80.Value
Sheets("Janvier 2012").Range("bo38").Value = TextBox82.Value
Sheets("Janvier 2012").Range("br38").Value = TextBox84.Value
Sheets("Janvier 2012").Range("cp38").Value = TextBox86.Value
Sheets("Janvier 2012").Range("cq38").Value = TextBox90.Value
Sheets("Janvier 2012").Range("bx38").Value = TextBox92.Value
Sheets("Janvier 2012").Range("ca38").Value = TextBox94.Value
Sheets("Janvier 2012").Range("cd38").Value = TextBox88.Value
Sheets("Janvier 2012").Range("cg38").Value = TextBox98.Value
Sheets("Janvier 2012").Range("cj38").Value = TextBox96.Value
End If
Unload Me
End Sub

Car quand je veux exécuter l'userform il me dit :

Erreur de compilation :

Procédure trop grande

Merci à tous pour votre aide.

Cordialement

Le 19/07/2012 à 23:00

Bonjour

La réponse sur l'autre forum

J'adoooooorrrreee les multiforumeurs

Le 19/07/2012 à 23:44

Bonsoir

Oui c'est dommage, mais comme j'avais bossé un peu (Sans test pas de fichier )

Option Explicit

Private Sub CommandButton1_Click()
Dim Colonne
Dim NumTextBox
Dim I As Integer
Dim K As Integer

Colonne = Split("C,B,D,F,E,G,M,N,S,L,R,T,X,V,W,U,Y,AC,AA,AB,Z,AD,AJ,AH,AG,AY,P,AZ,BA,BB,BC,BD,BE,BF,BG,BI,CN,CO,BO,BR,CP,CQ,BX,CA,CD,CG,CJ", ",")
NumTextBox = Array(13, 10, 12, 21, 22, 23, 30, 31, 32, 36, 38, 39, 40, 41, 45, 46, 42, 43, 44, 47, 48, 49, 50, 51, 52, 79, 81, 83, 85, 87, 91, 93, 95, 89, 99, 97, 78, 80, 82, 84, 86, 90, 92, 94, 88, 98, 96)

  With Sheets("Janvier 2012")
    For K = 1 To 31
      If Me.Controls("OptionButton" & K) = True Then
        For I = 0 To UBound(Colonne)
          .Range(Colonne(I) & K + 7) = Me.Controls("TextBox" & NumTextBox(I)).Value
        Next I
        .Range("AH43") = Me.TextBox100.Value
        Exit For
      End If
    Next K
  End With

End Sub

Le 20/07/2012 à 08:29

Bonjour le fil

Wouhaaaou ... très joli code mon cher Banzai64

Le 20/07/2012 à 23:07

Bonjour,

Je vous rajoute le fichier incriminé lol

Encore merci pour votre aide !

Bonne soirée !

11entrees-sorties-ctva-2012-v2-part1.rar (292.97 Ko)

11entrees-sorties-ctva-2012-v2-part2.rar (252.06 Ko)

Le 21/07/2012 à 00:22

Bonjour

Comme tu connais ton fichier, pour toi cela sera plus facile

Il faut que tu places la macro que je t'ai faite à la place de la tienne et que tu testes si ce sont bien les bonnes colonnes qui sont renseignées

Pour la bonne ligne je pense que c'est Ok

Rechercher des sujets similaires à "trop grand"