hier ok aujourdhui non ok

[violaine]

bonjour le forum

je ne comprend pas ce qui se passe!!!!????

la semaine derniere ma programmation fontionnait comme je le voulais et aujourd hui sans aucune modification de mon programme cela ne marche plus
a votre avvis de ou peut venir le probleme

 

[PascalXLD]

Bonjour

Violaine difficile de dire comme cela alors qu'on a aucune donnée ni aucun morceau du code qui ne marche plus ni le fichier

Le mieux joint ton fichier ou sinon au moins le code

 

[violaine]

j ai essayer de vous expliquer mon probleme
malheureusement je ne peux envoyer mon fichier original car il est tro gros

mais voici un fichier vous expliquant

merci

 

[violaine]

voici le fichier

 

[violaine]

bonjour
personne pour m aider

merci

 

[PascalXLD]

Heu !!!!!!!!! Violaine

Regarde bien il n'y a toujours aucun fichier de joint

C'est donc non pas qu'il n'y a personne pour t'aider mais qu'on ne peut pas t'aider puisqu'on ne connait pas ton problème.

Alors petite piqure de rappel : Le fichier doit être au format zip (uniquement ce format) faire moins de 50 ko et ne contenir aucun caractères spéciaux ni espaces dans son nom

 

[violaine]

bonjour pascal

je comprend mieu pourquoi je n avais pas dee nouvelles

en attendant j ai cherché et je me suis apercu que mon probleme ne venait pas de ma programmation elle fonctionne correctement

le probleme vient de mes feuilles excel
je m explique

j ai inseré une nouvelle feuille. Je l ai nommer pareil qu une de mes feuille deja existante apre l avoir supprimer

j ai remis quelque element de la feuille precedente et ca fonctionne

je ne comprend pas on dirai les feuilles excel actuelle mon programme ne les connait plu

quel est le probleme dans ce cas et comment y remedier
dois je recréais toute mes feuilles excel????


merci

 

[PascalXLD]

difficile à dire on ne sait même ce que fait ton programme !

Soit tu mets ton code (strict minimum) soit tu mets ton fichier

 

[violaine]

voici mon code

Private Declare Function FindWindowA Lib 'User32' (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function GetWindowLongA Lib 'User32' (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLongA Lib 'User32' (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Option Explicit
Dim monlabel As String

Private Sub TextBox1_Change()
Me.Label15.Caption = monlabel & Me.TextBox1.Value
End Sub

Private Sub TextBox1_Enter()
monlabel = Me.Label15.Caption
End Sub
Private Sub TextBox2_Change()
Me.Label15.Caption = monlabel & Me.TextBox2.Value
End Sub
Private Sub TextBox2_Enter()
monlabel = Me.Label15.Caption
End Sub


Private Sub CommandButton1_Click()
feuille_saisie_cartouche.CommandButton4.Visible = False
feuille_saisie_equi_out_spe_op1.CommandButton4.Visible = False
feuille_saisie_equi_out_spe_op2.CommandButton4.Visible = False
feuille_saisie_equi_out_spe_op3.CommandButton4.Visible = False
feuille_saisie_equip_mach_op1.CommandButton4.Visible = False
feuille_saisie_equip_mach_op2.CommandButton4.Visible = False
feuille_saisie_equip_mach_op3.CommandButton4.Visible = False
feuille_saisie_out_coup_op1.CommandButton4.Visible = False
feuille_saisie_out_coup_op2.CommandButton4.Visible = False
feuille_saisie_out_coup_op3.CommandButton4.Visible = False
feuille_saisie_cond_coup_op1.CommandButton4.Visible = False
feuille_saisie_condcoup_op2.CommandButton4.Visible = False
feuille_saisie_cond_coup_op3.CommandButton4.Visible = False
feuille_saisie_controle_op1.CommandButton4.Visible = False
feuille_saisie_controle_op2.CommandButton4.Visible = False
feuille_saisie_controle_op3.CommandButton4.Visible = False


Dim Cell As Range 'Déclaration de Variable Object de Type Range (Plage de Cellule(s))

Dim Plage As Range ' Idem
Dim L As Long ' Déclaration de Variable de Type Numérique de -32,768 à 32,767

With Sheets('base cartouche&robot') ' La Feuille Cible 'With' (tout ce qui suit avec un '.')
L = .Range('A65536').End(xlUp).Row ' On trouve la dernière cellule non vide
' en partant du bas de la colonne 'A'
Set Plage = .Range('A10:A' & L) ' Définition dynamique de la Plage de Cellule par creation d'Objet (Set)
End With ' Fin de Avec

'Lancement d'un Boucle For Each (Pour Chaque Item Contenu dans une Collection)
For Each Cell In Plage 'Pour chaque Cellule dans la Plage donc ;-)

'Début de Condition SI.
'Si la Condition est Valeur de Cellule = Valeur de TextBox
If Cell.Value = Label15.Caption Then
'Alors :
feuille_saisie_cartouche.reference_usinee = TextBox1.Value 'La TextBox2 prend la valeur de la Cellule trouvée (Cell)
feuille_saisie_cartouche.reference_brute = Cell.Offset(0, 3).Value 'La TextBox3 prend la Valeur de la celulle décalée de 0 Ligne et 1 Colonne
feuille_saisie_cartouche.code_mat = Cell.Offset(0, 4).Value
feuille_saisie_cartouche.plan_surv = Cell.Offset(0, 5).Value
feuille_saisie_cartouche.indice_pl = Cell.Offset(0, 6).Value
feuille_saisie_cartouche.indice_gam = Cell.Offset(0, 7).Value
feuille_saisie_cartouche.ComboBox1 = Cell.Offset(0, 8).Value
feuille_saisie_cartouche.ComboBox2 = Cell.Offset(0, 9).Value
feuille_saisie_cartouche.piece_code = Cell.Offset(0, 11).Value
feuille_saisie_cartouche.pince_1_reglage = Cell.Offset(0, 13).Value
feuille_saisie_cartouche.pince_2_reglage = Cell.Offset(0, 14).Value
feuille_saisie_cartouche.numero_enregistrement = Cell.Offset(0, 16).Value
feuille_saisie_cartouche.rep_date = Cell.Offset(0, 17).Value
feuille_saisie_cartouche.num_indice = Cell.Offset(0, 18).Value
feuille_saisie_cartouche.rep_par = Cell.Offset(0, 19).Value
feuille_saisie_cartouche.rep_designations = Cell.Offset(0, 20).Value
feuille_saisie_cartouche.rep_date_creation = Cell.Offset(0, 21).Value
feuille_saisie_cartouche.rep_emetteur = Cell.Offset(0, 22).Value
feuille_saisie_cartouche.rep_remarques = Cell.Offset(0, 23).Value
If Cell.Offset(0, 10).Value = 'CU1' Then feuille_saisie_cartouche.cu1.Value = True
If Cell.Offset(0, 10).Value = 'CU2' Then feuille_saisie_cartouche.cu2.Value = True
If Cell.Offset(0, 10).Value = 'CU3' Then feuille_saisie_cartouche.cu3.Value = True
If Cell.Offset(0, 10).Value = 'CU4' Then feuille_saisie_cartouche.cu4.Value = True
If Cell.Offset(0, 10).Value = 'CU5' Then feuille_saisie_cartouche.cu5.Value = True
If Cell.Offset(0, 10).Value = 'CU6' Then feuille_saisie_cartouche.cu6.Value = True
If Cell.Offset(0, 10).Value = 'CU7' Then feuille_saisie_cartouche.cu7.Value = True
If Cell.Offset(0, 10).Value = 'CU8' Then feuille_saisie_cartouche.cu8.Value = True
If Cell.Offset(0, 10).Value = 'CU9' Then feuille_saisie_cartouche.cu9.Value = True
If Cell.Offset(0, 10).Value = 'DDH' Then feuille_saisie_cartouche.ddh.Value = True



Exit For 'Sortie de la Boucle, car la condition est remplie
End If 'Fin de la Condition

'Passage à la Prochaine Cellule de la Plage (si on est pas Sorti pas Exit For)
Next Cell

With Sheets('base op 1 (operatoire)') ' La Feuille Cible 'With' (tout ce qui suit avec un '.')
L = .Range('A65536').End(xlUp).Row ' On trouve la dernière cellule non vide
' en partant du bas de la colonne 'A'
Set Plage = .Range('A10:A' & L) ' Définition dynamique de la Plage de Cellule par creation d'Objet (Set)
End With ' Fin de Avec

'Lancement d'un Boucle For Each (Pour Chaque Item Contenu dans une Collection)
For Each Cell In Plage 'Pour chaque Cellule dans la Plage donc ;-)

'Début de Condition SI.
'Si la Condition est Valeur de Cellule = Valeur de TextBox
If Cell.Value = Label15.Caption Then
'Alors :
feuille_saisie_cartouche.reference_usinee = TextBox1.Value 'La TextBox2 prend la valeur de la Cellule trouvée (Cell)
feuille_saisie_cartouche.TextBox4 = Cell.Offset(0, 4).Value '
feuille_saisie_cartouche.TextBox6 = Cell.Offset(0, 5).Value '
feuille_saisie_cartouche.TextBox5 = Cell.Offset(0, 6).Value '

feuille_saisie_equi_out_spe_op1.designation_A = Cell.Offset(0, 7).Value
feuille_saisie_equi_out_spe_op1.num_plan_A = Cell.Offset(0, 8).Value
feuille_saisie_equi_out_spe_op1.rep_A = Cell.Offset(0, 9).Value
feuille_saisie_equi_out_spe_op1.directive_A = Cell.Offset(0, 10).Value


feuille_saisie_equi_out_spe_op1.designation_B = Cell.Offset(0, 11).Value
feuille_saisie_equi_out_spe_op1.num_plan_B = Cell.Offset(0, 12).Value
feuille_saisie_equi_out_spe_op1.rep_B = Cell.Offset(0, 13).Value
feuille_saisie_equi_out_spe_op1.directive_B = Cell.Offset(0, 14).Value

feuille_saisie_equi_out_spe_op1.designation_C = Cell.Offset(0, 15).Value
feuille_saisie_equi_out_spe_op1.num_plan_C = Cell.Offset(0, 16).Value
feuille_saisie_equi_out_spe_op1.rep_C = Cell.Offset(0, 17).Value
feuille_saisie_equi_out_spe_op1.directive_C = Cell.Offset(0, 18).Value

feuille_saisie_equi_out_spe_op1.designation_D = Cell.Offset(0, 19).Value
feuille_saisie_equi_out_spe_op1.num_plan_D = Cell.Offset(0, 20).Value
feuille_saisie_equi_out_spe_op1.rep_D = Cell.Offset(0, 21).Value
feuille_saisie_equi_out_spe_op1.directive_D = Cell.Offset(0, 22).Value

feuille_saisie_equi_out_spe_op1.designation_E = Cell.Offset(0, 23).Value
feuille_saisie_equi_out_spe_op1.num_plan_E = Cell.Offset(0, 24).Value
feuille_saisie_equi_out_spe_op1.rep_E = Cell.Offset(0, 25).Value
feuille_saisie_equi_out_spe_op1.directive_e = Cell.Offset(0, 26).Value

feuille_saisie_equi_out_spe_op1.designation_F = Cell.Offset(0, 27).Value
feuille_saisie_equi_out_spe_op1.num_plan_F = Cell.Offset(0, 28).Value
feuille_saisie_equi_out_spe_op1.rep_F = Cell.Offset(0, 29).Value
feuille_saisie_equi_out_spe_op1.directive_F = Cell.Offset(0, 30).Value

feuille_saisie_equi_out_spe_op1.designation_G = Cell.Offset(0, 31).Value
feuille_saisie_equi_out_spe_op1.num_plan_G = Cell.Offset(0, 32).Value
feuille_saisie_equi_out_spe_op1.rep_G = Cell.Offset(0, 33).Value
feuille_saisie_equi_out_spe_op1.directive_G = Cell.Offset(0, 34).Value

feuille_saisie_equi_out_spe_op1.designation_H = Cell.Offset(0, 35).Value
feuille_saisie_equi_out_spe_op1.num_plan_H = Cell.Offset(0, 36).Value
feuille_saisie_equi_out_spe_op1.rep_H = Cell.Offset(0, 37).Value
feuille_saisie_equi_out_spe_op1.directive_H = Cell.Offset(0, 38).Value

feuille_saisie_equi_out_spe_op1.designation_I = Cell.Offset(0, 39).Value
feuille_saisie_equi_out_spe_op1.num_plan_I = Cell.Offset(0, 40).Value
feuille_saisie_equi_out_spe_op1.rep_I = Cell.Offset(0, 41).Value
feuille_saisie_equi_out_spe_op1.directive_I = Cell.Offset(0, 42).Value

feuille_saisie_equi_out_spe_op1.designation_J = Cell.Offset(0, 43).Value
feuille_saisie_equi_out_spe_op1.num_plan_J = Cell.Offset(0, 44).Value
feuille_saisie_equi_out_spe_op1.rep_J = Cell.Offset(0, 45).Value
feuille_saisie_equi_out_spe_op1.directive_J = Cell.Offset(0, 46).Value

feuille_saisie_equi_out_spe_op1.designation_K = Cell.Offset(0, 47).Value
feuille_saisie_equi_out_spe_op1.num_plan_K = Cell.Offset(0, 48).Value
feuille_saisie_equi_out_spe_op1.rep_K = Cell.Offset(0, 49).Value
feuille_saisie_equi_out_spe_op1.directive_K = Cell.Offset(0, 50).Value

feuille_saisie_equi_out_spe_op1.designation_L = Cell.Offset(0, 51).Value
feuille_saisie_equi_out_spe_op1.num_plan_L = Cell.Offset(0, 52).Value
feuille_saisie_equi_out_spe_op1.rep_L = Cell.Offset(0, 53).Value
feuille_saisie_equi_out_spe_op1.directive_L = Cell.Offset(0, 54).Value


feuille_saisie_equip_mach_op1.designation_A = Cell.Offset(0, 55).Value
feuille_saisie_equip_mach_op1.num_plan_A = Cell.Offset(0, 56).Value
feuille_saisie_equip_mach_op1.rep_A = Cell.Offset(0, 57).Value
feuille_saisie_equip_mach_op1.directive_A = Cell.Offset(0, 58).Value


feuille_saisie_equip_mach_op1.designation_B = Cell.Offset(0, 59).Value
feuille_saisie_equip_mach_op1.num_plan_B = Cell.Offset(0, 60).Value
feuille_saisie_equip_mach_op1.rep_B = Cell.Offset(0, 61).Value
feuille_saisie_equip_mach_op1.directive_B = Cell.Offset(0, 62).Value

feuille_saisie_equip_mach_op1.designation_C = Cell.Offset(0, 63).Value
feuille_saisie_equip_mach_op1.num_plan_C = Cell.Offset(0, 64).Value
feuille_saisie_equip_mach_op1.rep_C = Cell.Offset(0, 65).Value
feuille_saisie_equip_mach_op1.directive_C = Cell.Offset(0, 66).Value

feuille_saisie_equip_mach_op1.designation_D = Cell.Offset(0, 67).Value
feuille_saisie_equip_mach_op1.num_plan_D = Cell.Offset(0, 68).Value
feuille_saisie_equip_mach_op1.rep_D = Cell.Offset(0, 69).Value
feuille_saisie_equip_mach_op1.directive_D = Cell.Offset(0, 70).Value

feuille_saisie_equip_mach_op1.designation_E = Cell.Offset(0, 71).Value
feuille_saisie_equip_mach_op1.num_plan_E = Cell.Offset(0, 72).Value
feuille_saisie_equip_mach_op1.rep_E = Cell.Offset(0, 73).Value
feuille_saisie_equip_mach_op1.directive_e = Cell.Offset(0, 74).Value

feuille_saisie_equip_mach_op1.designation_F = Cell.Offset(0, 75).Value
feuille_saisie_equip_mach_op1.num_plan_F = Cell.Offset(0, 76).Value
feuille_saisie_equip_mach_op1.rep_F = Cell.Offset(0, 77).Value
feuille_saisie_equip_mach_op1.directive_F = Cell.Offset(0, 78).Value

feuille_saisie_equip_mach_op1.designation_G = Cell.Offset(0, 79).Value
feuille_saisie_equip_mach_op1.num_plan_G = Cell.Offset(0, 80).Value
feuille_saisie_equip_mach_op1.rep_G = Cell.Offset(0, 81).Value
feuille_saisie_equip_mach_op1.directive_G = Cell.Offset(0, 82).Value

feuille_saisie_equip_mach_op1.designation_H = Cell.Offset(0, 83).Value
feuille_saisie_equip_mach_op1.num_plan_H = Cell.Offset(0, 84).Value
feuille_saisie_equip_mach_op1.rep_H = Cell.Offset(0, 85).Value
feuille_saisie_equip_mach_op1.directive_H = Cell.Offset(0, 86).Value

feuille_saisie_equip_mach_op1.designation_I = Cell.Offset(0, 87).Value
feuille_saisie_equip_mach_op1.num_plan_I = Cell.Offset(0, 88).Value
feuille_saisie_equip_mach_op1.rep_I = Cell.Offset(0, 89).Value
feuille_saisie_equip_mach_op1.directive_I = Cell.Offset(0, 90).Value

feuille_saisie_equip_mach_op1.designation_J = Cell.Offset(0, 91).Value
feuille_saisie_equip_mach_op1.num_plan_J = Cell.Offset(0, 92).Value
feuille_saisie_equip_mach_op1.rep_J = Cell.Offset(0, 93).Value
feuille_saisie_equip_mach_op1.directive_J = Cell.Offset(0, 94).Value

feuille_saisie_equip_mach_op1.designation_K = Cell.Offset(0, 95).Value
feuille_saisie_equip_mach_op1.num_plan_K = Cell.Offset(0, 96).Value
feuille_saisie_equip_mach_op1.rep_K = Cell.Offset(0, 97).Value
feuille_saisie_equip_mach_op1.directive_K = Cell.Offset(0, 98).Value

feuille_saisie_equip_mach_op1.designation_L = Cell.Offset(0, 99).Value
feuille_saisie_equip_mach_op1.num_plan_L = Cell.Offset(0, 100).Value
feuille_saisie_equip_mach_op1.rep_L = Cell.Offset(0, 101).Value
feuille_saisie_equip_mach_op1.directive_L = Cell.Offset(0, 102).Value


feuille_saisie_out_coup_op1.rep_A = Cell.Offset(0, 103).Value
feuille_saisie_out_coup_op1.designation_A = Cell.Offset(0, 104).Value
feuille_saisie_out_coup_op1.num_po_A = Cell.Offset(0, 105).Value
feuille_saisie_out_coup_op1.plaquette_A = Cell.Offset(0, 106).Value

feuille_saisie_out_coup_op1.rep_B = Cell.Offset(0, 107).Value
feuille_saisie_out_coup_op1.designation_B = Cell.Offset(0, 108).Value
feuille_saisie_out_coup_op1.num_po_B = Cell.Offset(0, 109).Value
feuille_saisie_out_coup_op1.plaquette_B = Cell.Offset(0, 110).Value

feuille_saisie_out_coup_op1.rep_C = Cell.Offset(0, 111).Value
feuille_saisie_out_coup_op1.designation_C = Cell.Offset(0, 112).Value
feuille_saisie_out_coup_op1.num_po_C = Cell.Offset(0, 113).Value
feuille_saisie_out_coup_op1.plaquette_C = Cell.Offset(0, 114).Value

feuille_saisie_out_coup_op1.rep_D = Cell.Offset(0, 115).Value
feuille_saisie_out_coup_op1.designation_D = Cell.Offset(0, 116).Value
feuille_saisie_out_coup_op1.num_po_D = Cell.Offset(0, 117).Value
feuille_saisie_out_coup_op1.plaquette_D = Cell.Offset(0, 118).Value

feuille_saisie_out_coup_op1.rep_E = Cell.Offset(0, 119).Value
feuille_saisie_out_coup_op1.designation_E = Cell.Offset(0, 120).Value
feuille_saisie_out_coup_op1.num_po_E = Cell.Offset(0, 121).Value
feuille_saisie_out_coup_op1.plaquette_E = Cell.Offset(0, 122).Value

feuille_saisie_cond_coup_op1.TextBox24 = Cell.Offset(0, 123).Value
feuille_saisie_cond_coup_op1.TextBox21 = Cell.Offset(0, 124).Value
feuille_saisie_cond_coup_op1.TextBox22 = Cell.Offset(0, 125).Value
feuille_saisie_cond_coup_op1.TextBox23 = Cell.Offset(0, 126).Value

feuille_saisie_cond_coup_op1.TextBox25 = Cell.Offset(0, 127).Value
feuille_saisie_cond_coup_op1.TextBox26 = Cell.Offset(0, 128).Value
feuille_saisie_cond_coup_op1.TextBox27 = Cell.Offset(0, 129).Value
feuille_saisie_cond_coup_op1.TextBox28 = Cell.Offset(0, 130).Value

feuille_saisie_cond_coup_op1.TextBox29 = Cell.Offset(0, 131).Value
feuille_saisie_cond_coup_op1.TextBox30 = Cell.Offset(0, 132).Value
feuille_saisie_cond_coup_op1.TextBox31 = Cell.Offset(0, 133).Value
feuille_saisie_cond_coup_op1.TextBox32 = Cell.Offset(0, 134).Value

feuille_saisie_cond_coup_op1.TextBox33 = Cell.Offset(0, 135).Value
feuille_saisie_cond_coup_op1.TextBox34 = Cell.Offset(0, 136).Value
feuille_saisie_cond_coup_op1.TextBox35 = Cell.Offset(0, 137).Value
feuille_saisie_cond_coup_op1.TextBox36 = Cell.Offset(0, 138).Value

feuille_saisie_cond_coup_op1.TextBox37 = Cell.Offset(0, 139).Value
feuille_saisie_cond_coup_op1.TextBox38 = Cell.Offset(0, 140).Value
feuille_saisie_cond_coup_op1.TextBox39 = Cell.Offset(0, 141).Value
feuille_saisie_cond_coup_op1.TextBox40 = Cell.Offset(0, 142).Value


Exit For 'Sortie de la Boucle, car la condition est remplie
End If 'Fin de la Condition

'Passage à la Prochaine Cellule de la Plage (si on est pas Sorti pas Exit For)
Next Cell

With Sheets('base op 2 (operatoire)') ' La Feuille Cible 'With' (tout ce qui suit avec un '.')
L = .Range('A65536').End(xlUp).Row ' On trouve la dernière cellule non vide
' en partant du bas de la colonne 'A'
Set Plage = .Range('A10:A' & L) ' Définition dynamique de la Plage de Cellule par creation d'Objet (Set)
End With ' Fin de Avec

'Lancement d'un Boucle For Each (Pour Chaque Item Contenu dans une Collection)
For Each Cell In Plage 'Pour chaque Cellule dans la Plage donc ;-)

'Début de Condition SI.
'Si la Condition est Valeur de Cellule = Valeur de TextBox
If Cell.Value = Label15.Caption Then
'Alors :
feuille_saisie_cartouche.reference_usinee = TextBox1.Value 'La TextBox2 prend la valeur de la Cellule trouvée (Cell)
feuille_saisie_cartouche.TextBox7 = Cell.Offset(0, 4).Value '
feuille_saisie_cartouche.TextBox9 = Cell.Offset(0, 5).Value '
feuille_saisie_cartouche.TextBox8 = Cell.Offset(0, 6).Value '

feuille_saisie_equi_out_spe_op2.designation_A = Cell.Offset(0, 7).Value
feuille_saisie_equi_out_spe_op2.num_plan_A = Cell.Offset(0, 8).Value
feuille_saisie_equi_out_spe_op2.rep_A = Cell.Offset(0, 9).Value
feuille_saisie_equi_out_spe_op2.directive_A = Cell.Offset(0, 10).Value


feuille_saisie_equi_out_spe_op2.designation_B = Cell.Offset(0, 11).Value
feuille_saisie_equi_out_spe_op2.num_plan_B = Cell.Offset(0, 12).Value
feuille_saisie_equi_out_spe_op2.rep_B = Cell.Offset(0, 13).Value
feuille_saisie_equi_out_spe_op2.directive_B = Cell.Offset(0, 14).Value

feuille_saisie_equi_out_spe_op2.designation_C = Cell.Offset(0, 15).Value
feuille_saisie_equi_out_spe_op2.num_plan_C = Cell.Offset(0, 16).Value
feuille_saisie_equi_out_spe_op2.rep_C = Cell.Offset(0, 17).Value
feuille_saisie_equi_out_spe_op2.directive_C = Cell.Offset(0, 18).Value

feuille_saisie_equi_out_spe_op2.designation_D = Cell.Offset(0, 19).Value
feuille_saisie_equi_out_spe_op2.num_plan_D = Cell.Offset(0, 20).Value
feuille_saisie_equi_out_spe_op2.rep_D = Cell.Offset(0, 21).Value
feuille_saisie_equi_out_spe_op2.directive_D = Cell.Offset(0, 22).Value

feuille_saisie_equi_out_spe_op2.designation_E = Cell.Offset(0, 23).Value
feuille_saisie_equi_out_spe_op2.num_plan_E = Cell.Offset(0, 24).Value
feuille_saisie_equi_out_spe_op2.rep_E = Cell.Offset(0, 25).Value
feuille_saisie_equi_out_spe_op2.directive_e = Cell.Offset(0, 26).Value

feuille_saisie_equi_out_spe_op2.designation_F = Cell.Offset(0, 27).Value
feuille_saisie_equi_out_spe_op2.num_plan_F = Cell.Offset(0, 28).Value
feuille_saisie_equi_out_spe_op2.rep_F = Cell.Offset(0, 29).Value
feuille_saisie_equi_out_spe_op2.directive_F = Cell.Offset(0, 30).Value

feuille_saisie_equi_out_spe_op2.designation_G = Cell.Offset(0, 31).Value
feuille_saisie_equi_out_spe_op2.num_plan_G = Cell.Offset(0, 32).Value
feuille_saisie_equi_out_spe_op2.rep_G = Cell.Offset(0, 33).Value
feuille_saisie_equi_out_spe_op2.directive_G = Cell.Offset(0, 34).Value

feuille_saisie_equi_out_spe_op2.designation_H = Cell.Offset(0, 35).Value
feuille_saisie_equi_out_spe_op2.num_plan_H = Cell.Offset(0, 36).Value
feuille_saisie_equi_out_spe_op2.rep_H = Cell.Offset(0, 37).Value
feuille_saisie_equi_out_spe_op2.directive_H = Cell.Offset(0, 38).Value

feuille_saisie_equi_out_spe_op2.designation_I = Cell.Offset(0, 39).Value
feuille_saisie_equi_out_spe_op2.num_plan_I = Cell.Offset(0, 40).Value
feuille_saisie_equi_out_spe_op2.rep_I = Cell.Offset(0, 41).Value
feuille_saisie_equi_out_spe_op2.directive_I = Cell.Offset(0, 42).Value

feuille_saisie_equi_out_spe_op2.designation_J = Cell.Offset(0, 43).Value
feuille_saisie_equi_out_spe_op2.num_plan_J = Cell.Offset(0, 44).Value
feuille_saisie_equi_out_spe_op2.rep_J = Cell.Offset(0, 45).Value
feuille_saisie_equi_out_spe_op2.directive_J = Cell.Offset(0, 46).Value

feuille_saisie_equi_out_spe_op2.designation_K = Cell.Offset(0, 47).Value
feuille_saisie_equi_out_spe_op2.num_plan_K = Cell.Offset(0, 48).Value
feuille_saisie_equi_out_spe_op2.rep_K = Cell.Offset(0, 49).Value
feuille_saisie_equi_out_spe_op2.directive_K = Cell.Offset(0, 50).Value

feuille_saisie_equi_out_spe_op2.designation_L = Cell.Offset(0, 51).Value
feuille_saisie_equi_out_spe_op2.num_plan_L = Cell.Offset(0, 52).Value
feuille_saisie_equi_out_spe_op2.rep_L = Cell.Offset(0, 53).Value
feuille_saisie_equi_out_spe_op2.directive_L = Cell.Offset(0, 54).Value


feuille_saisie_equip_mach_op2.designation_A = Cell.Offset(0, 55).Value
feuille_saisie_equip_mach_op2.num_plan_A = Cell.Offset(0, 56).Value
feuille_saisie_equip_mach_op2.rep_A = Cell.Offset(0, 57).Value
feuille_saisie_equip_mach_op2.directive_A = Cell.Offset(0, 58).Value


feuille_saisie_equip_mach_op2.designation_B = Cell.Offset(0, 59).Value
feuille_saisie_equip_mach_op2.num_plan_B = Cell.Offset(0, 60).Value
feuille_saisie_equip_mach_op2.rep_B = Cell.Offset(0, 61).Value
feuille_saisie_equip_mach_op2.directive_B = Cell.Offset(0, 62).Value

feuille_saisie_equip_mach_op2.designation_C = Cell.Offset(0, 63).Value
feuille_saisie_equip_mach_op2.num_plan_C = Cell.Offset(0, 64).Value
feuille_saisie_equip_mach_op2.rep_C = Cell.Offset(0, 65).Value
feuille_saisie_equip_mach_op2.directive_C = Cell.Offset(0, 66).Value

feuille_saisie_equip_mach_op2.designation_D = Cell.Offset(0, 67).Value
feuille_saisie_equip_mach_op2.num_plan_D = Cell.Offset(0, 68).Value
feuille_saisie_equip_mach_op2.rep_D = Cell.Offset(0, 69).Value
feuille_saisie_equip_mach_op2.directive_D = Cell.Offset(0, 70).Value

feuille_saisie_equip_mach_op2.designation_E = Cell.Offset(0, 71).Value
feuille_saisie_equip_mach_op2.num_plan_E = Cell.Offset(0, 72).Value
feuille_saisie_equip_mach_op2.rep_E = Cell.Offset(0, 73).Value
feuille_saisie_equip_mach_op2.directive_e = Cell.Offset(0, 74).Value

feuille_saisie_equip_mach_op2.designation_F = Cell.Offset(0, 75).Value
feuille_saisie_equip_mach_op2.num_plan_F = Cell.Offset(0, 76).Value
feuille_saisie_equip_mach_op2.rep_F = Cell.Offset(0, 77).Value
feuille_saisie_equip_mach_op2.directive_F = Cell.Offset(0, 78).Value

feuille_saisie_equip_mach_op2.designation_G = Cell.Offset(0, 79).Value
feuille_saisie_equip_mach_op2.num_plan_G = Cell.Offset(0, 80).Value
feuille_saisie_equip_mach_op2.rep_G = Cell.Offset(0, 81).Value
feuille_saisie_equip_mach_op2.directive_G = Cell.Offset(0, 82).Value

feuille_saisie_equip_mach_op2.designation_H = Cell.Offset(0, 83).Value
feuille_saisie_equip_mach_op2.num_plan_H = Cell.Offset(0, 84).Value
feuille_saisie_equip_mach_op2.rep_H = Cell.Offset(0, 85).Value
feuille_saisie_equip_mach_op2.directive_H = Cell.Offset(0, 86).Value

feuille_saisie_equip_mach_op2.designation_I = Cell.Offset(0, 87).Value
feuille_saisie_equip_mach_op2.num_plan_I = Cell.Offset(0, 88).Value
feuille_saisie_equip_mach_op2.rep_I = Cell.Offset(0, 89).Value
feuille_saisie_equip_mach_op2.directive_I = Cell.Offset(0, 90).Value

feuille_saisie_equip_mach_op2.designation_J = Cell.Offset(0, 91).Value
feuille_saisie_equip_mach_op2.num_plan_J = Cell.Offset(0, 92).Value
feuille_saisie_equip_mach_op2.rep_J = Cell.Offset(0, 93).Value
feuille_saisie_equip_mach_op2.directive_J = Cell.Offset(0, 94).Value

feuille_saisie_equip_mach_op2.designation_K = Cell.Offset(0, 95).Value
feuille_saisie_equip_mach_op2.num_plan_K = Cell.Offset(0, 96).Value
feuille_saisie_equip_mach_op2.rep_K = Cell.Offset(0, 97).Value
feuille_saisie_equip_mach_op2.directive_K = Cell.Offset(0, 98).Value

feuille_saisie_equip_mach_op2.designation_L = Cell.Offset(0, 99).Value
feuille_saisie_equip_mach_op2.num_plan_L = Cell.Offset(0, 100).Value
feuille_saisie_equip_mach_op2.rep_L = Cell.Offset(0, 101).Value
feuille_saisie_equip_mach_op2.directive_L = Cell.Offset(0, 102).Value


feuille_saisie_out_coup_op2.rep_A = Cell.Offset(0, 103).Value
feuille_saisie_out_coup_op2.designation_A = Cell.Offset(0, 104).Value
feuille_saisie_out_coup_op2.num_po_A = Cell.Offset(0, 105).Value
feuille_saisie_out_coup_op2.plaquette_A = Cell.Offset(0, 106).Value

feuille_saisie_out_coup_op2.rep_B = Cell.Offset(0, 107).Value
feuille_saisie_out_coup_op2.designation_B = Cell.Offset(0, 108).Value
feuille_saisie_out_coup_op2.num_po_B = Cell.Offset(0, 109).Value
feuille_saisie_out_coup_op2.plaquette_B = Cell.Offset(0, 110).Value

feuille_saisie_out_coup_op2.rep_C = Cell.Offset(0, 111).Value
feuille_saisie_out_coup_op2.designation_C = Cell.Offset(0, 112).Value
feuille_saisie_out_coup_op2.num_po_C = Cell.Offset(0, 113).Value
feuille_saisie_out_coup_op2.plaquette_C = Cell.Offset(0, 114).Value

feuille_saisie_out_coup_op2.rep_D = Cell.Offset(0, 115).Value
feuille_saisie_out_coup_op2.designation_D = Cell.Offset(0, 116).Value
feuille_saisie_out_coup_op2.num_po_D = Cell.Offset(0, 117).Value
feuille_saisie_out_coup_op2.plaquette_D = Cell.Offset(0, 118).Value

feuille_saisie_out_coup_op2.rep_E = Cell.Offset(0, 119).Value
feuille_saisie_out_coup_op2.designation_E = Cell.Offset(0, 120).Value
feuille_saisie_out_coup_op2.num_po_E = Cell.Offset(0, 121).Value
feuille_saisie_out_coup_op2.plaquette_E = Cell.Offset(0, 122).Value

feuille_saisie_condcoup_op2.rep_A = Cell.Offset(0, 123).Value
feuille_saisie_condcoup_op2.designation_A = Cell.Offset(0, 124).Value
feuille_saisie_condcoup_op2.vc_A = Cell.Offset(0, 125).Value
feuille_saisie_condcoup_op2.at_A = Cell.Offset(0, 126).Value

feuille_saisie_condcoup_op2.rep_B = Cell.Offset(0, 127).Value
feuille_saisie_condcoup_op2.designation_B = Cell.Offset(0, 128).Value
feuille_saisie_condcoup_op2.vc_B = Cell.Offset(0, 129).Value
feuille_saisie_condcoup_op2.at_B = Cell.Offset(0, 130).Value

feuille_saisie_condcoup_op2.rep_C = Cell.Offset(0, 131).Value
feuille_saisie_condcoup_op2.designation_C = Cell.Offset(0, 132).Value
feuille_saisie_condcoup_op2.vc_C = Cell.Offset(0, 133).Value
feuille_saisie_condcoup_op2.at_C = Cell.Offset(0, 134).Value

feuille_saisie_condcoup_op2.rep_D = Cell.Offset(0, 135).Value
feuille_saisie_condcoup_op2.designation_D = Cell.Offset(0, 136).Value
feuille_saisie_condcoup_op2.vc_D = Cell.Offset(0, 137).Value
feuille_saisie_condcoup_op2.at_D = Cell.Offset(0, 138).Value

feuille_saisie_condcoup_op2.rep_E = Cell.Offset(0, 139).Value
feuille_saisie_condcoup_op2.designation_E = Cell.Offset(0, 140).Value
feuille_saisie_condcoup_op2.vc_E = Cell.Offset(0, 141).Value
feuille_saisie_condcoup_op2.at_E = Cell.Offset(0, 142).Value


Exit For 'Sortie de la Boucle, car la condition est remplie
End If 'Fin de la Condition

'Passage à la Prochaine Cellule de la Plage (si on est pas Sorti pas Exit For)
Next Cell

With Sheets('base op 3 (operatoire)') ' La Feuille Cible 'With' (tout ce qui suit avec un '.')
L = .Range('A65536').End(xlUp).Row ' On trouve la dernière cellule non vide
' en partant du bas de la colonne 'A'
Set Plage = .Range('A10:A' & L) ' Définition dynamique de la Plage de Cellule par creation d'Objet (Set)
End With ' Fin de Avec

'Lancement d'un Boucle For Each (Pour Chaque Item Contenu dans une Collection)
For Each Cell In Plage 'Pour chaque Cellule dans la Plage donc ;-)

'Début de Condition SI.
'Si la Condition est Valeur de Cellule = Valeur de TextBox
If Cell.Value = Label15.Caption Then
'Alors :
feuille_saisie_cartouche.reference_usinee = TextBox1.Value 'La TextBox2 prend la valeur de la Cellule trouvée (Cell)
feuille_saisie_cartouche.TextBox10 = Cell.Offset(0, 4).Value '
feuille_saisie_cartouche.TextBox12 = Cell.Offset(0, 5).Value '

feuille_saisie_equi_out_spe_op3.designation_A = Cell.Offset(0, 6).Value
feuille_saisie_equi_out_spe_op3.num_plan_A = Cell.Offset(0, 7).Value
feuille_saisie_equi_out_spe_op3.rep_A = Cell.Offset(0, 8).Value
feuille_saisie_equi_out_spe_op3.directive_A = Cell.Offset(0, 9).Value


feuille_saisie_equi_out_spe_op3.designation_B = Cell.Offset(0, 10).Value
feuille_saisie_equi_out_spe_op3.num_plan_B = Cell.Offset(0, 11).Value
feuille_saisie_equi_out_spe_op3.rep_B = Cell.Offset(0, 12).Value
feuille_saisie_equi_out_spe_op3.directive_B = Cell.Offset(0, 13).Value

feuille_saisie_equi_out_spe_op3.designation_C = Cell.Offset(0, 14).Value
feuille_saisie_equi_out_spe_op3.num_plan_C = Cell.Offset(0, 15).Value
feuille_saisie_equi_out_spe_op3.rep_C = Cell.Offset(0, 16).Value
feuille_saisie_equi_out_spe_op3.directive_C = Cell.Offset(0, 17).Value

feuille_saisie_equi_out_spe_op3.designation_D = Cell.Offset(0, 18).Value
feuille_saisie_equi_out_spe_op3.num_plan_D = Cell.Offset(0, 19).Value
feuille_saisie_equi_out_spe_op3.rep_D = Cell.Offset(0, 20).Value
feuille_saisie_equi_out_spe_op3.directive_D = Cell.Offset(0, 21).Value

feuille_saisie_equi_out_spe_op3.designation_E = Cell.Offset(0, 22).Value
feuille_saisie_equi_out_spe_op3.num_plan_E = Cell.Offset(0, 23).Value
feuille_saisie_equi_out_spe_op3.rep_E = Cell.Offset(0, 24).Value
feuille_saisie_equi_out_spe_op3.directive_e = Cell.Offset(0, 25).Value

feuille_saisie_equi_out_spe_op3.designation_F = Cell.Offset(0, 26).Value
feuille_saisie_equi_out_spe_op3.num_plan_F = Cell.Offset(0, 27).Value
feuille_saisie_equi_out_spe_op3.rep_F = Cell.Offset(0, 28).Value
feuille_saisie_equi_out_spe_op3.directive_F = Cell.Offset(0, 29).Value

feuille_saisie_equi_out_spe_op3.designation_G = Cell.Offset(0, 30).Value
feuille_saisie_equi_out_spe_op3.num_plan_G = Cell.Offset(0, 31).Value
feuille_saisie_equi_out_spe_op3.rep_G = Cell.Offset(0, 32).Value
feuille_saisie_equi_out_spe_op3.directive_G = Cell.Offset(0, 33).Value

feuille_saisie_equi_out_spe_op3.designation_H = Cell.Offset(0, 34).Value
feuille_saisie_equi_out_spe_op3.num_plan_H = Cell.Offset(0, 35).Value
feuille_saisie_equi_out_spe_op3.rep_H = Cell.Offset(0, 36).Value
feuille_saisie_equi_out_spe_op3.directive_H = Cell.Offset(0, 37).Value

feuille_saisie_equi_out_spe_op3.designation_I = Cell.Offset(0, 38).Value
feuille_saisie_equi_out_spe_op3.num_plan_I = Cell.Offset(0, 39).Value
feuille_saisie_equi_out_spe_op3.rep_I = Cell.Offset(0, 40).Value
feuille_saisie_equi_out_spe_op3.directive_I = Cell.Offset(0, 41).Value

feuille_saisie_equi_out_spe_op3.designation_J = Cell.Offset(0, 42).Value
feuille_saisie_equi_out_spe_op3.num_plan_J = Cell.Offset(0, 43).Value
feuille_saisie_equi_out_spe_op3.rep_J = Cell.Offset(0, 44).Value
feuille_saisie_equi_out_spe_op3.directive_J = Cell.Offset(0, 45).Value

feuille_saisie_equi_out_spe_op3.designation_K = Cell.Offset(0, 46).Value
feuille_saisie_equi_out_spe_op3.num_plan_K = Cell.Offset(0, 47).Value
feuille_saisie_equi_out_spe_op3.rep_K = Cell.Offset(0, 48).Value
feuille_saisie_equi_out_spe_op3.directive_K = Cell.Offset(0, 49).Value

feuille_saisie_equi_out_spe_op3.designation_L = Cell.Offset(0, 50).Value
feuille_saisie_equi_out_spe_op3.num_plan_L = Cell.Offset(0, 51).Value
feuille_saisie_equi_out_spe_op3.rep_L = Cell.Offset(0, 52).Value
feuille_saisie_equi_out_spe_op3.directive_L = Cell.Offset(0, 53).Value

feuille_saisie_equip_mach_op3.designation_A = Cell.Offset(0, 54).Value
feuille_saisie_equip_mach_op3.num_plan_A = Cell.Offset(0, 55).Value
feuille_saisie_equip_mach_op3.rep_A = Cell.Offset(0, 56).Value
feuille_saisie_equip_mach_op3.directive_A = Cell.Offset(0, 57).Value


feuille_saisie_equip_mach_op3.designation_B = Cell.Offset(0, 58).Value
feuille_saisie_equip_mach_op3.num_plan_B = Cell.Offset(0, 59).Value
feuille_saisie_equip_mach_op3.rep_B = Cell.Offset(0, 60).Value
feuille_saisie_equip_mach_op3.directive_B = Cell.Offset(0, 61).Value

feuille_saisie_equip_mach_op3.designation_C = Cell.Offset(0, 62).Value
feuille_saisie_equip_mach_op3.num_plan_C = Cell.Offset(0, 63).Value
feuille_saisie_equip_mach_op3.rep_C = Cell.Offset(0, 64).Value
feuille_saisie_equip_mach_op3.directive_C = Cell.Offset(0, 65).Value

feuille_saisie_equip_mach_op3.designation_D = Cell.Offset(0, 66).Value
feuille_saisie_equip_mach_op3.num_plan_D = Cell.Offset(0, 67).Value
feuille_saisie_equip_mach_op3.rep_D = Cell.Offset(0, 68).Value
feuille_saisie_equip_mach_op3.directive_D = Cell.Offset(0, 69).Value

feuille_saisie_equip_mach_op3.designation_E = Cell.Offset(0, 70).Value
feuille_saisie_equip_mach_op3.num_plan_E = Cell.Offset(0, 71).Value
feuille_saisie_equip_mach_op3.rep_E = Cell.Offset(0, 72).Value
feuille_saisie_equip_mach_op3.directive_e = Cell.Offset(0, 73).Value

feuille_saisie_equip_mach_op3.designation_F = Cell.Offset(0, 74).Value
feuille_saisie_equip_mach_op3.num_plan_F = Cell.Offset(0, 75).Value
feuille_saisie_equip_mach_op3.rep_F = Cell.Offset(0, 76).Value
feuille_saisie_equip_mach_op3.directive_F = Cell.Offset(0, 77).Value

feuille_saisie_equip_mach_op3.designation_G = Cell.Offset(0, 78).Value
feuille_saisie_equip_mach_op3.num_plan_G = Cell.Offset(0, 79).Value
feuille_saisie_equip_mach_op3.rep_G = Cell.Offset(0, 80).Value
feuille_saisie_equip_mach_op3.directive_G = Cell.Offset(0, 81).Value

feuille_saisie_equip_mach_op3.designation_H = Cell.Offset(0, 82).Value
feuille_saisie_equip_mach_op3.num_plan_H = Cell.Offset(0, 83).Value
feuille_saisie_equip_mach_op3.rep_H = Cell.Offset(0, 84).Value
feuille_saisie_equip_mach_op3.directive_H = Cell.Offset(0, 85).Value

feuille_saisie_equip_mach_op3.designation_I = Cell.Offset(0, 86).Value
feuille_saisie_equip_mach_op3.num_plan_I = Cell.Offset(0, 87).Value
feuille_saisie_equip_mach_op3.rep_I = Cell.Offset(0, 88).Value
feuille_saisie_equip_mach_op3.directive_I = Cell.Offset(0, 89).Value

feuille_saisie_equip_mach_op3.designation_J = Cell.Offset(0, 90).Value
feuille_saisie_equip_mach_op3.num_plan_J = Cell.Offset(0, 91).Value
feuille_saisie_equip_mach_op3.rep_J = Cell.Offset(0, 92).Value
feuille_saisie_equip_mach_op3.directive_J = Cell.Offset(0, 93).Value

feuille_saisie_equip_mach_op3.designation_K = Cell.Offset(0, 94).Value
feuille_saisie_equip_mach_op3.num_plan_K = Cell.Offset(0, 95).Value
feuille_saisie_equip_mach_op3.rep_K = Cell.Offset(0, 96).Value
feuille_saisie_equip_mach_op3.directive_K = Cell.Offset(0, 97).Value

feuille_saisie_equip_mach_op3.designation_L = Cell.Offset(0, 98).Value
feuille_saisie_equip_mach_op3.num_plan_L = Cell.Offset(0, 99).Value
feuille_saisie_equip_mach_op3.rep_L = Cell.Offset(0, 100).Value
feuille_saisie_equip_mach_op3.directive_L = Cell.Offset(0, 101).Value

feuille_saisie_out_coup_op3.rep_A = Cell.Offset(0, 102).Value
feuille_saisie_out_coup_op3.designation_A = Cell.Offset(0, 103).Value
feuille_saisie_out_coup_op3.num_po_A = Cell.Offset(0, 104).Value
feuille_saisie_out_coup_op3.plaquette_A = Cell.Offset(0, 105).Value

feuille_saisie_out_coup_op3.rep_B = Cell.Offset(0, 106).Value
feuille_saisie_out_coup_op3.designation_B = Cell.Offset(0, 107).Value
feuille_saisie_out_coup_op3.num_po_B = Cell.Offset(0, 108).Value
feuille_saisie_out_coup_op3.plaquette_B = Cell.Offset(0, 109).Value

feuille_saisie_out_coup_op3.rep_C = Cell.Offset(0, 110).Value
feuille_saisie_out_coup_op3.designation_C = Cell.Offset(0, 111).Value
feuille_saisie_out_coup_op3.num_po_C = Cell.Offset(0, 112).Value
feuille_saisie_out_coup_op3.plaquette_C = Cell.Offset(0, 113).Value

feuille_saisie_out_coup_op3.rep_D = Cell.Offset(0, 114).Value
feuille_saisie_out_coup_op3.designation_D = Cell.Offset(0, 115).Value
feuille_saisie_out_coup_op3.num_po_D = Cell.Offset(0, 116).Value
feuille_saisie_out_coup_op3.plaquette_D = Cell.Offset(0, 117).Value

feuille_saisie_out_coup_op3.rep_E = Cell.Offset(0, 118).Value
feuille_saisie_out_coup_op3.designation_E = Cell.Offset(0, 119).Value
feuille_saisie_out_coup_op3.num_po_E = Cell.Offset(0, 120).Value
feuille_saisie_out_coup_op3.plaquette_E = Cell.Offset(0, 121).Value

feuille_saisie_cond_coup_op3.rep_A = Cell.Offset(0, 122).Value
feuille_saisie_cond_coup_op3.designation_A = Cell.Offset(0, 123).Value
feuille_saisie_cond_coup_op3.rpm_A = Cell.Offset(0, 124).Value
feuille_saisie_cond_coup_op3.at_A = Cell.Offset(0, 125).Value

feuille_saisie_cond_coup_op3.rep_B = Cell.Offset(0, 126).Value
feuille_saisie_cond_coup_op3.designation_B = Cell.Offset(0, 127).Value
feuille_saisie_cond_coup_op3.rpm_B = Cell.Offset(0, 128).Value
feuille_saisie_cond_coup_op3.at_B = Cell.Offset(0, 129).Value

feuille_saisie_cond_coup_op3.rep_C = Cell.Offset(0, 130).Value
feuille_saisie_cond_coup_op3.designation_C = Cell.Offset(0, 131).Value
feuille_saisie_cond_coup_op3.rpm_C = Cell.Offset(0, 132).Value
feuille_saisie_cond_coup_op3.at_C = Cell.Offset(0, 133).Value

feuille_saisie_cond_coup_op3.rep_D = Cell.Offset(0, 134).Value
feuille_saisie_cond_coup_op3.designation_D = Cell.Offset(0, 135).Value
feuille_saisie_cond_coup_op3.rpm_D = Cell.Offset(0, 136).Value
feuille_saisie_cond_coup_op3.at_D = Cell.Offset(0, 137).Value

feuille_saisie_cond_coup_op3.rep_E = Cell.Offset(0, 138).Value
feuille_saisie_cond_coup_op3.designation_E = Cell.Offset(0, 139).Value
feuille_saisie_cond_coup_op3.rpm_E = Cell.Offset(0, 140).Value
feuille_saisie_cond_coup_op3.at_E = Cell.Offset(0, 141).Value

Exit For 'Sortie de la Boucle, car la condition est remplie
End If 'Fin de la Condition

'Passage à la Prochaine Cellule de la Plage (si on est pas Sorti pas Exit For)
Next Cell

With Sheets('base op 1 (controle)') ' La Feuille Cible 'With' (tout ce qui suit avec un '.')
L = .Range('A65536').End(xlUp).Row ' On trouve la dernière cellule non vide
' en partant du bas de la colonne 'A'
Set Plage = .Range('A10:A' & L) ' Définition dynamique de la Plage de Cellule par creation d'Objet (Set)
End With ' Fin de Avec

'Lancement d'un Boucle For Each (Pour Chaque Item Contenu dans une Collection)
For Each Cell In Plage 'Pour chaque Cellule dans la Plage donc ;-)

'Début de Condition SI.
'Si la Condition est Valeur de Cellule = Valeur de TextBox
If Cell.Value = Label15.Caption Then
'Alors :
'onglet A

feuille_saisie_cartouche.reference_usinee = TextBox1.Value
'feuille_saisie_controle_op1.Label82 = TextBox1.Value 'La TextBox2 prend la valeur de la Cellule trouvée (Cell)
feuille_saisie_controle_op1.TextBox1 = Cell.Offset(0, 4).Value '
feuille_saisie_controle_op1.TextBox2 = Cell.Offset(0, 5).Value
feuille_saisie_controle_op1.TextBox3 = Cell.Offset(0, 6).Value
feuille_saisie_controle_op1.ComboBox1 = Cell.Offset(0, 7).Value
feuille_saisie_controle_op1.ComboBox2 = Cell.Offset(0, 8).Value
feuille_saisie_controle_op1.TextBox4 = Cell.Offset(0, 9).Value
feuille_saisie_controle_op1.TextBox5 = Cell.Offset(0, 10).Value

'onglet B
feuille_saisie_controle_op1.TextBox6 = Cell.Offset(0, 11).Value '
feuille_saisie_controle_op1.TextBox7 = Cell.Offset(0, 12).Value
feuille_saisie_controle_op1.TextBox8 = Cell.Offset(0, 13).Value
feuille_saisie_controle_op1.ComboBox3 = Cell.Offset(0, 14).Value
feuille_saisie_controle_op1.ComboBox4 = Cell.Offset(0, 15).Value
feuille_saisie_controle_op1.TextBox9 = Cell.Offset(0, 16).Value
feuille_saisie_controle_op1.TextBox10 = Cell.Offset(0, 17).Value

'onglet C
feuille_saisie_controle_op1.TextBox11 = Cell.Offset(0, 18).Value '
feuille_saisie_controle_op1.TextBox12 = Cell.Offset(0, 19).Value
feuille_saisie_controle_op1.TextBox13 = Cell.Offset(0, 20).Value
feuille_saisie_controle_op1.ComboBox5 = Cell.Offset(0, 21).Value
feuille_saisie_controle_op1.ComboBox6 = Cell.Offset(0, 22).Value
feuille_saisie_controle_op1.TextBox14 = Cell.Offset(0, 23).Value
feuille_saisie_controle_op1.TextBox15 = Cell.Offset(0, 24).Value

'onglet D
feuille_saisie_controle_op1.TextBox16 = Cell.Offset(0, 25).Value '
feuille_saisie_controle_op1.TextBox17 = Cell.Offset(0, 26).Value
feuille_saisie_controle_op1.TextBox18 = Cell.Offset(0, 27).Value
feuille_saisie_controle_op1.ComboBox7 = Cell.Offset(0, 28).Value
feuille_saisie_controle_op1.ComboBox8 = Cell.Offset(0, 29).Value
feuille_saisie_controle_op1.TextBox19 = Cell.Offset(0, 30).Value
feuille_saisie_controle_op1.TextBox20 = Cell.Offset(0, 31).Value

'onglet E
feuille_saisie_controle_op1.TextBox21 = Cell.Offset(0, 32).Value '
feuille_saisie_controle_op1.TextBox22 = Cell.Offset(0, 33).Value
feuille_saisie_controle_op1.TextBox23 = Cell.Offset(0, 34).Value
feuille_saisie_controle_op1.ComboBox9 = Cell.Offset(0, 35).Value
feuille_saisie_controle_op1.ComboBox10 = Cell.Offset(0, 36).Value
feuille_saisie_controle_op1.TextBox24 = Cell.Offset(0, 37).Value
feuille_saisie_controle_op1.TextBox25 = Cell.Offset(0, 38).Value

'onglet F
feuille_saisie_controle_op1.TextBox26 = Cell.Offset(0, 39).Value '
feuille_saisie_controle_op1.TextBox27 = Cell.Offset(0, 40).Value
feuille_saisie_controle_op1.TextBox28 = Cell.Offset(0, 41).Value
feuille_saisie_controle_op1.ComboBox11 = Cell.Offset(0, 42).Value
feuille_saisie_controle_op1.ComboBox12 = Cell.Offset(0, 43).Value
feuille_saisie_controle_op1.TextBox29 = Cell.Offset(0, 44).Value
feuille_saisie_controle_op1.TextBox30 = Cell.Offset(0, 45).Value

'onglet G
feuille_saisie_controle_op1.TextBox31 = Cell.Offset(0, 46).Value '
feuille_saisie_controle_op1.TextBox32 = Cell.Offset(0, 47).Value
feuille_saisie_controle_op1.TextBox33 = Cell.Offset(0, 48).Value
feuille_saisie_controle_op1.ComboBox13 = Cell.Offset(0, 49).Value
feuille_saisie_controle_op1.ComboBox14 = Cell.Offset(0, 50).Value
feuille_saisie_controle_op1.TextBox34 = Cell.Offset(0, 51).Value
feuille_saisie_controle_op1.TextBox35 = Cell.Offset(0, 52).Value

'onglet H
feuille_saisie_controle_op1.TextBox36 = Cell.Offset(0, 53).Value '
feuille_saisie_controle_op1.TextBox37 = Cell.Offset(0, 54).Value
feuille_saisie_controle_op1.TextBox38 = Cell.Offset(0, 55).Value
feuille_saisie_controle_op1.ComboBox15 = Cell.Offset(0, 56).Value
feuille_saisie_controle_op1.ComboBox16 = Cell.Offset(0, 57).Value
feuille_saisie_controle_op1.TextBox39 = Cell.Offset(0, 58).Value
feuille_saisie_controle_op1.TextBox40 = Cell.Offset(0, 59).Value

'onglet I
feuille_saisie_controle_op1.TextBox41 = Cell.Offset(0, 60).Value '
feuille_saisie_controle_op1.TextBox42 = Cell.Offset(0, 61).Value
feuille_saisie_controle_op1.TextBox43 = Cell.Offset(0, 62).Value
feuille_saisie_controle_op1.ComboBox17 = Cell.Offset(0, 63).Value
feuille_saisie_controle_op1.ComboBox18 = Cell.Offset(0, 64).Value
feuille_saisie_controle_op1.TextBox44 = Cell.Offset(0, 65).Value
feuille_saisie_controle_op1.TextBox45 = Cell.Offset(0, 66).Value

'onglet J
feuille_saisie_controle_op1.TextBox46 = Cell.Offset(0, 67).Value '
feuille_saisie_controle_op1.TextBox47 = Cell.Offset(0, 68).Value
feuille_saisie_controle_op1.TextBox48 = Cell.Offset(0, 69).Value
feuille_saisie_controle_op1.ComboBox19 = Cell.Offset(0, 70).Value
feuille_saisie_controle_op1.ComboBox20 = Cell.Offset(0, 71).Value
feuille_saisie_controle_op1.TextBox49 = Cell.Offset(0, 72).Value
feuille_saisie_controle_op1.TextBox50 = Cell.Offset(0, 73).Value

'onglet K
feuille_saisie_controle_op1.TextBox51 = Cell.Offset(0, 74).Value '
feuille_saisie_controle_op1.TextBox52 = Cell.Offset(0, 75).Value
feuille_saisie_controle_op1.TextBox53 = Cell.Offset(0, 76).Value
feuille_saisie_controle_op1.ComboBox21 = Cell.Offset(0, 77).Value
feuille_saisie_controle_op1.ComboBox22 = Cell.Offset(0, 78).Value
feuille_saisie_controle_op1.TextBox54 = Cell.Offset(0, 79).Value
feuille_saisie_controle_op1.TextBox55 = Cell.Offset(0, 80).Value

'onglet L
feuille_saisie_controle_op1.TextBox56 = Cell.Offset(0, 81).Value '
feuille_saisie_controle_op1.TextBox57 = Cell.Offset(0, 82).Value
feuille_saisie_controle_op1.TextBox58 = Cell.Offset(0, 83).Value
feuille_saisie_controle_op1.ComboBox23 = Cell.Offset(0, 84).Value
feuille_saisie_controle_op1.ComboBox24 = Cell.Offset(0, 85).Value
feuille_saisie_controle_op1.TextBox59 = Cell.Offset(0, 86).Value
feuille_saisie_controle_op1.TextBox60 = Cell.Offset(0, 87).Value
Exit For 'Sortie de la Boucle, car la condition est remplie
End If 'Fin de la Condition

'Passage à la Prochaine Cellule de la Plage (si on est pas Sorti pas Exit For)
Next Cell


With Sheets('base op 2 (controle)') ' La Feuille Cible 'With' (tout ce qui suit avec un '.')
L = .Range('A65536').End(xlUp).Row ' On trouve la dernière cellule non vide
' en partant du bas de la colonne 'A'
Set Plage = .Range('A10:A' & L) ' Définition dynamique de la Plage de Cellule par creation d'Objet (Set)
End With ' Fin de Avec

'Lancement d'un Boucle For Each (Pour Chaque Item Contenu dans une Collection)
For Each Cell In Plage 'Pour chaque Cellule dans la Plage donc ;-)

'Début de Condition SI.
'Si la Condition est Valeur de Cellule = Valeur de TextBox
If Cell.Value = Label15.Caption Then
'Alors :
'onglet A
feuille_saisie_cartouche.reference_usinee = TextBox1.Value
'feuille_saisie_controle_op2.Label84 = TextBox1.Value 'La TextBox2 prend la valeur de la Cellule trouvée (Cell)
feuille_saisie_controle_op2.TextBox1 = Cell.Offset(0, 4).Value '
feuille_saisie_controle_op2.TextBox2 = Cell.Offset(0, 5).Value
feuille_saisie_controle_op2.TextBox3 = Cell.Offset(0, 6).Value
feuille_saisie_controle_op2.ComboBox1 = Cell.Offset(0, 7).Value
feuille_saisie_controle_op2.ComboBox2 = Cell.Offset(0, 8).Value
feuille_saisie_controle_op2.TextBox4 = Cell.Offset(0, 9).Value
feuille_saisie_controle_op2.TextBox5 = Cell.Offset(0, 10).Value

'onglet B
feuille_saisie_controle_op2.TextBox6 = Cell.Offset(0, 11).Value '
feuille_saisie_controle_op2.TextBox7 = Cell.Offset(0, 12).Value
feuille_saisie_controle_op2.TextBox8 = Cell.Offset(0, 13).Value
feuille_saisie_controle_op2.ComboBox3 = Cell.Offset(0, 14).Value
feuille_saisie_controle_op2.ComboBox4 = Cell.Offset(0, 15).Value
feuille_saisie_controle_op2.TextBox9 = Cell.Offset(0, 16).Value
feuille_saisie_controle_op2.TextBox10 = Cell.Offset(0, 17).Value

'onglet C
feuille_saisie_controle_op2.TextBox11 = Cell.Offset(0, 18).Value '
feuille_saisie_controle_op2.TextBox12 = Cell.Offset(0, 19).Value
feuille_saisie_controle_op2.TextBox13 = Cell.Offset(0, 20).Value
feuille_saisie_controle_op2.ComboBox5 = Cell.Offset(0, 21).Value
feuille_saisie_controle_op2.ComboBox6 = Cell.Offset(0, 22).Value
feuille_saisie_controle_op2.TextBox14 = Cell.Offset(0, 23).Value
feuille_saisie_controle_op2.TextBox15 = Cell.Offset(0, 24).Value

'onglet D
feuille_saisie_controle_op2.TextBox16 = Cell.Offset(0, 25).Value '
feuille_saisie_controle_op2.TextBox17 = Cell.Offset(0, 26).Value
feuille_saisie_controle_op2.TextBox18 = Cell.Offset(0, 27).Value
feuille_saisie_controle_op2.ComboBox7 = Cell.Offset(0, 28).Value
feuille_saisie_controle_op2.ComboBox8 = Cell.Offset(0, 29).Value
feuille_saisie_controle_op2.TextBox19 = Cell.Offset(0, 30).Value
feuille_saisie_controle_op2.TextBox20 = Cell.Offset(0, 31).Value

'onglet E
feuille_saisie_controle_op2.TextBox21 = Cell.Offset(0, 32).Value '
feuille_saisie_controle_op2.TextBox22 = Cell.Offset(0, 33).Value
feuille_saisie_controle_op2.TextBox23 = Cell.Offset(0, 34).Value
feuille_saisie_controle_op2.ComboBox9 = Cell.Offset(0, 35).Value
feuille_saisie_controle_op2.ComboBox10 = Cell.Offset(0, 36).Value
feuille_saisie_controle_op2.TextBox24 = Cell.Offset(0, 37).Value
feuille_saisie_controle_op2.TextBox25 = Cell.Offset(0, 38).Value

'onglet F
feuille_saisie_controle_op2.TextBox26 = Cell.Offset(0, 39).Value '
feuille_saisie_controle_op2.TextBox27 = Cell.Offset(0, 40).Value
feuille_saisie_controle_op2.TextBox28 = Cell.Offset(0, 41).Value
feuille_saisie_controle_op2.ComboBox11 = Cell.Offset(0, 42).Value
feuille_saisie_controle_op2.ComboBox12 = Cell.Offset(0, 43).Value
feuille_saisie_controle_op2.TextBox29 = Cell.Offset(0, 44).Value
feuille_saisie_controle_op2.TextBox30 = Cell.Offset(0, 45).Value

'onglet G
feuille_saisie_controle_op2.TextBox31 = Cell.Offset(0, 46).Value '
feuille_saisie_controle_op2.TextBox32 = Cell.Offset(0, 47).Value
feuille_saisie_controle_op2.TextBox33 = Cell.Offset(0, 48).Value
feuille_saisie_controle_op2.ComboBox13 = Cell.Offset(0, 49).Value
feuille_saisie_controle_op2.ComboBox14 = Cell.Offset(0, 50).Value
feuille_saisie_controle_op2.TextBox34 = Cell.Offset(0, 51).Value
feuille_saisie_controle_op2.TextBox35 = Cell.Offset(0, 52).Value

'onglet H
feuille_saisie_controle_op2.TextBox36 = Cell.Offset(0, 53).Value '
feuille_saisie_controle_op2.TextBox37 = Cell.Offset(0, 54).Value
feuille_saisie_controle_op2.TextBox38 = Cell.Offset(0, 55).Value
feuille_saisie_controle_op2.ComboBox15 = Cell.Offset(0, 56).Value
feuille_saisie_controle_op2.ComboBox16 = Cell.Offset(0, 57).Value
feuille_saisie_controle_op2.TextBox39 = Cell.Offset(0, 58).Value
feuille_saisie_controle_op2.TextBox40 = Cell.Offset(0, 59).Value

'onglet I
feuille_saisie_controle_op2.TextBox41 = Cell.Offset(0, 60).Value '
feuille_saisie_controle_op2.TextBox42 = Cell.Offset(0, 61).Value
feuille_saisie_controle_op2.TextBox43 = Cell.Offset(0, 62).Value
feuille_saisie_controle_op2.ComboBox17 = Cell.Offset(0, 63).Value
feuille_saisie_controle_op2.ComboBox18 = Cell.Offset(0, 64).Value
feuille_saisie_controle_op2.TextBox44 = Cell.Offset(0, 65).Value
feuille_saisie_controle_op2.TextBox45 = Cell.Offset(0, 66).Value

'onglet J
feuille_saisie_controle_op2.TextBox46 = Cell.Offset(0, 67).Value '
feuille_saisie_controle_op2.TextBox47 = Cell.Offset(0, 68).Value
feuille_saisie_controle_op2.TextBox48 = Cell.Offset(0, 69).Value
feuille_saisie_controle_op2.ComboBox19 = Cell.Offset(0, 70).Value
feuille_saisie_controle_op2.ComboBox20 = Cell.Offset(0, 71).Value
feuille_saisie_controle_op2.TextBox49 = Cell.Offset(0, 72).Value
feuille_saisie_controle_op2.TextBox50 = Cell.Offset(0, 73).Value

'onglet K
feuille_saisie_controle_op2.TextBox51 = Cell.Offset(0, 74).Value '
feuille_saisie_controle_op2.TextBox52 = Cell.Offset(0, 75).Value
feuille_saisie_controle_op2.TextBox53 = Cell.Offset(0, 76).Value
feuille_saisie_controle_op2.ComboBox21 = Cell.Offset(0, 77).Value
feuille_saisie_controle_op2.ComboBox22 = Cell.Offset(0, 78).Value
feuille_saisie_controle_op2.TextBox54 = Cell.Offset(0, 79).Value
feuille_saisie_controle_op2.TextBox55 = Cell.Offset(0, 80).Value

'onglet L
feuille_saisie_controle_op2.TextBox56 = Cell.Offset(0, 81).Value '
feuille_saisie_controle_op2.TextBox57 = Cell.Offset(0, 82).Value
feuille_saisie_controle_op2.TextBox58 = Cell.Offset(0, 83).Value
feuille_saisie_controle_op2.ComboBox23 = Cell.Offset(0, 84).Value
feuille_saisie_controle_op2.ComboBox24 = Cell.Offset(0, 85).Value
feuille_saisie_controle_op2.TextBox59 = Cell.Offset(0, 86).Value
feuille_saisie_controle_op2.TextBox60 = Cell.Offset(0, 87).Value

Exit For 'Sortie de la Boucle, car la condition est remplie
End If 'Fin de la Condition

'Passage à la Prochaine Cellule de la Plage (si on est pas Sorti pas Exit For)
Next Cell


With Sheets('base op 3 (controle)') ' La Feuille Cible 'With' (tout ce qui suit avec un '.')
L = .Range('A65536').End(xlUp).Row ' On trouve la dernière cellule non vide
' en partant du bas de la colonne 'A'
Set Plage = .Range('A10:A' & L) ' Définition dynamique de la Plage de Cellule par creation d'Objet (Set)
End With ' Fin de Avec

'Lancement d'un Boucle For Each (Pour Chaque Item Contenu dans une Collection)
For Each Cell In Plage 'Pour chaque Cellule dans la Plage donc ;-)

'Début de Condition SI.
'Si la Condition est Valeur de Cellule = Valeur de TextBox
If Cell.Value = Label15.Caption Then
'Alors :
'onglet A

feuille_saisie_cartouche.reference_usinee = TextBox1.Value
'feuille_saisie_controle_op3.Label88 = TextBox1.Value 'La TextBox2 prend la valeur de la Cellule trouvée (Cell)
feuille_saisie_controle_op3.TextBox1 = Cell.Offset(0, 4).Value '
feuille_saisie_controle_op3.TextBox2 = Cell.Offset(0, 5).Value
feuille_saisie_controle_op3.TextBox3 = Cell.Offset(0, 6).Value
feuille_saisie_controle_op3.ComboBox1 = Cell.Offset(0, 7).Value
feuille_saisie_controle_op3.ComboBox2 = Cell.Offset(0, 8).Value
feuille_saisie_controle_op3.TextBox4 = Cell.Offset(0, 9).Value
feuille_saisie_controle_op3.TextBox5 = Cell.Offset(0, 10).Value

'onglet B
feuille_saisie_controle_op3.TextBox6 = Cell.Offset(0, 11).Value '
feuille_saisie_controle_op3.TextBox7 = Cell.Offset(0, 12).Value
feuille_saisie_controle_op3.TextBox8 = Cell.Offset(0, 13).Value
feuille_saisie_controle_op3.ComboBox3 = Cell.Offset(0, 14).Value
feuille_saisie_controle_op3.ComboBox4 = Cell.Offset(0, 15).Value
feuille_saisie_controle_op3.TextBox9 = Cell.Offset(0, 16).Value
feuille_saisie_controle_op3.TextBox10 = Cell.Offset(0, 17).Value

'onglet C
feuille_saisie_controle_op3.TextBox11 = Cell.Offset(0, 18).Value '
feuille_saisie_controle_op3.TextBox12 = Cell.Offset(0, 19).Value
feuille_saisie_controle_op3.TextBox13 = Cell.Offset(0, 20).Value
feuille_saisie_controle_op3.ComboBox5 = Cell.Offset(0, 21).Value
feuille_saisie_controle_op3.ComboBox6 = Cell.Offset(0, 22).Value
feuille_saisie_controle_op3.TextBox14 = Cell.Offset(0, 23).Value
feuille_saisie_controle_op3.TextBox15 = Cell.Offset(0, 24).Value

'onglet D
feuille_saisie_controle_op3.TextBox16 = Cell.Offset(0, 25).Value '
feuille_saisie_controle_op3.TextBox17 = Cell.Offset(0, 26).Value
feuille_saisie_controle_op3.TextBox18 = Cell.Offset(0, 27).Value
feuille_saisie_controle_op3.ComboBox7 = Cell.Offset(0, 28).Value
feuille_saisie_controle_op3.ComboBox8 = Cell.Offset(0, 29).Value
feuille_saisie_controle_op3.TextBox19 = Cell.Offset(0, 30).Value
feuille_saisie_controle_op3.TextBox20 = Cell.Offset(0, 31).Value

'onglet E
feuille_saisie_controle_op3.TextBox21 = Cell.Offset(0, 32).Value '
feuille_saisie_controle_op3.TextBox22 = Cell.Offset(0, 33).Value
feuille_saisie_controle_op3.TextBox23 = Cell.Offset(0, 34).Value
feuille_saisie_controle_op3.ComboBox9 = Cell.Offset(0, 35).Value
feuille_saisie_controle_op3.ComboBox10 = Cell.Offset(0, 36).Value
feuille_saisie_controle_op3.TextBox24 = Cell.Offset(0, 37).Value
feuille_saisie_controle_op3.TextBox25 = Cell.Offset(0, 38).Value

'onglet F
feuille_saisie_controle_op3.TextBox26 = Cell.Offset(0, 39).Value '
feuille_saisie_controle_op3.TextBox27 = Cell.Offset(0, 40).Value
feuille_saisie_controle_op3.TextBox28 = Cell.Offset(0, 41).Value
feuille_saisie_controle_op3.ComboBox11 = Cell.Offset(0, 42).Value
feuille_saisie_controle_op3.ComboBox12 = Cell.Offset(0, 43).Value
feuille_saisie_controle_op3.TextBox29 = Cell.Offset(0, 44).Value
feuille_saisie_controle_op3.TextBox30 = Cell.Offset(0, 45).Value

'onglet G
feuille_saisie_controle_op3.TextBox31 = Cell.Offset(0, 46).Value '
feuille_saisie_controle_op3.TextBox32 = Cell.Offset(0, 47).Value
feuille_saisie_controle_op3.TextBox33 = Cell.Offset(0, 48).Value
feuille_saisie_controle_op3.ComboBox13 = Cell.Offset(0, 49).Value
feuille_saisie_controle_op3.ComboBox14 = Cell.Offset(0, 50).Value
feuille_saisie_controle_op3.TextBox34 = Cell.Offset(0, 51).Value
feuille_saisie_controle_op3.TextBox35 = Cell.Offset(0, 52).Value

'onglet H
feuille_saisie_controle_op3.TextBox36 = Cell

 

[PascalXLD]

Tu dis que ce code marchait et maintenant qu'il ne marche plus

Tu as un message d'erreur ??

Tu as une partie du code qui marche ??

Qu'est-ce qui ne marche pas ??

 

[violaine]

dans mon classeur actuel, je narrive plus a recuperer les données des feuilles suivantes:
-base op1 (operatoire)
-base op2 (operatoire)
-base op3 (operatoire)
-base op1 (controle)
-base op2 (controle)
-base op3 (controle)

dc j ai supprimer la feuille base op1 (operatoire) j ai inserer une nouvelle feuille que j ai renommer base op1 (operatoire) pour ne pas a avoir a modifier mon code et je l ai compoleter de la meme maniere que celle du depart

et la CA FONCTIONNE pour cette feuille
ma programmation reprend bien mes valeurs

(j ai l, impression qu il ne reconnaisplus mes feuilles du depart)

 

[PascalXLD]

re

Si il ne les connaissait pas tes feuilles ton programme buggerait car il ne trouverait pas ta feuille

Donc il faudrait que tu fasses un point d'arrêt quelque part pour effectuer ton code pas à pas pour voir à quel endroit il ne prend pas en compte tes données

 

[violaine]

re

ok peux tu me dire comment faire? pour excuter pas a pas

merci

 

[PascalXLD]

re

tu mets un point d'arret dans ton code en cliquant dans la marge de ton code là où tu veux qu'il sarrête (un pont marron apparait dans la marge et ta ligne est surlignée en marron)

ton code s'arretera à ce point

Puis tu continues ton code en appuyant sur F8 et tu peux voir ainsi quelle condition il ne prend pas ou ce qui cloche

 

[violaine]

ok merci