Procedure too large - VBA - Userform

jptaz

New Member
Joined
May 1, 2020
Messages
33
Office Version
  1. 2010
Platform
  1. Windows
Hello, new member here! I'm beginning with VBA and I've runned in a new problem with my code. I have a userform with about 610 textboxes which values are copied in a column in a database. If I enter new data the code works well, but if I want to edit I get this error message "Compile Error: Procedure too large". If I remove some code, the error msg stops, but some textboxes won't be edited. In my "new" entry macro I have the same number of code lines and it works.

Is there a way to break the code and use the "call" function to make it work? I'm sure there might be some clean up to do in this code to reduce the lenght, but I can't see where to start as I begin with VBA.

Hope I'm being clear

ps : I've used a "tiger spreadsheet" userform as a starter for my code

Thank you

JP



VBA Code:
[/
Private Sub CommandButton1_Click()

Dim TargetRow As Integer 'variable to save position of this person in database

'use Match worksheet function to find position of chosen name
TargetRow = Application.WorksheetFunction.Match(ColumnE_Menu, Sheets("Data").Range("Dyn_Full_Name"), 0)
Sheets("Engine").Range("B5").Value = TargetRow 'save position in the engine, for use later

Unload Find_Entry_UF 'unload the userform to select a name
    
'''Begin retrieving data from database'''
Data_UF.Txt_First = Sheets("Data").Range("Data_Start").Offset(TargetRow, 1).Value 'first name
Data_UF.Txt_Surname = Sheets("Data").Range("Data_Start").Offset(TargetRow, 2).Value 'surname

Data_UF.Text_Dossier = Sheets("Data").Range("Data_Start").Offset(TargetRow, 4).Value '# dossier
Data_UF.Text_ddn = Sheets("Data").Range("Data_Start").Offset(TargetRow, 5).Value 'DDN
Data_UF.Combo_Gender = Sheets("Data").Range("Data_Start").Offset(TargetRow, 6).Value 'Sexe
Data_UF.Combo_dominance = Sheets("Data").Range("Data_Start").Offset(TargetRow, 7).Value 'Dominance
Data_UF.Text_Kin = Sheets("Data").Range("Data_Start").Offset(TargetRow, 8).Value 'Kinésiologue
Data_UF.Combo_Programme = Sheets("Data").Range("Data_Start").Offset(TargetRow, 9).Value 'Programme
Data_UF.Text_date_eval_ini = Sheets("Data").Range("Data_Start").Offset(TargetRow, 10).Value 'Date éval initiale
Data_UF.Combo_menopause = Sheets("Data").Range("Data_Start").Offset(TargetRow, 11).Value 'Ménopause
Data_UF.Text_taille_ini = Sheets("Data").Range("Data_Start").Offset(TargetRow, 12).Value
Data_UF.Text_poids_ini = Sheets("Data").Range("Data_Start").Offset(TargetRow, 13).Value
Data_UF.Text_ct_ini = Sheets("Data").Range("Data_Start").Offset(TargetRow, 14).Value
Data_UF.Text_com_pds_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 15).Value
Data_UF.Text_tas_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 16).Value
Data_UF.Text_tad_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 17).Value
Data_UF.Text_fc_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 18).Value
Data_UF.Text_gly_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 19).Value
Data_UF.Text_mg_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 20).Value
Data_UF.Text_mm_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 21).Value
Data_UF.Text_mh_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 22).Value
Data_UF.Text_pg_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 23).Value
Data_UF.Text_dx = Sheets("data").Range("Data_Start").Offset(TargetRow, 24).Value
Data_UF.Txt_condasso1 = Sheets("data").Range("Data_Start").Offset(TargetRow, 25).Value
Data_UF.Txt_condasso2 = Sheets("data").Range("Data_Start").Offset(TargetRow, 26).Value
Data_UF.Txt_condasso3 = Sheets("data").Range("Data_Start").Offset(TargetRow, 27).Value
Data_UF.Txt_condasso4 = Sheets("data").Range("Data_Start").Offset(TargetRow, 28).Value
Data_UF.Txt_condasso5 = Sheets("data").Range("Data_Start").Offset(TargetRow, 29).Value
Data_UF.Txt_condasso6 = Sheets("data").Range("Data_Start").Offset(TargetRow, 30).Value
Data_UF.Txt_condasso7 = Sheets("data").Range("Data_Start").Offset(TargetRow, 31).Value
Data_UF.Txt_condasso8 = Sheets("data").Range("Data_Start").Offset(TargetRow, 32).Value
Data_UF.Text_rx1 = Sheets("data").Range("Data_Start").Offset(TargetRow, 33).Value
Data_UF.Text_rx2 = Sheets("data").Range("Data_Start").Offset(TargetRow, 34).Value
Data_UF.Text_rx3 = Sheets("data").Range("Data_Start").Offset(TargetRow, 35).Value
Data_UF.Text_rx4 = Sheets("data").Range("Data_Start").Offset(TargetRow, 36).Value
Data_UF.Text_rx5 = Sheets("data").Range("Data_Start").Offset(TargetRow, 37).Value
Data_UF.Text_rx6 = Sheets("data").Range("Data_Start").Offset(TargetRow, 38).Value
Data_UF.Text_rx7 = Sheets("data").Range("Data_Start").Offset(TargetRow, 39).Value
Data_UF.Text_rx8 = Sheets("data").Range("Data_Start").Offset(TargetRow, 40).Value
Data_UF.Text_rx9 = Sheets("data").Range("Data_Start").Offset(TargetRow, 41).Value
Data_UF.Text_rx10 = Sheets("data").Range("Data_Start").Offset(TargetRow, 42).Value
Data_UF.Text_rx11 = Sheets("data").Range("Data_Start").Offset(TargetRow, 43).Value
Data_UF.Text_rx12 = Sheets("data").Range("Data_Start").Offset(TargetRow, 44).Value
Data_UF.Text_rx13 = Sheets("data").Range("Data_Start").Offset(TargetRow, 45).Value
Data_UF.Text_rx14 = Sheets("data").Range("Data_Start").Offset(TargetRow, 46).Value
Data_UF.Text_rx15 = Sheets("data").Range("Data_Start").Offset(TargetRow, 47).Value
Data_UF.Text_rx16 = Sheets("data").Range("Data_Start").Offset(TargetRow, 48).Value
Data_UF.Text_rx17 = Sheets("data").Range("Data_Start").Offset(TargetRow, 49).Value
Data_UF.Text_rx18 = Sheets("data").Range("Data_Start").Offset(TargetRow, 50).Value
Data_UF.Text_rx19 = Sheets("data").Range("Data_Start").Offset(TargetRow, 51).Value
Data_UF.Text_rx20 = Sheets("data").Range("Data_Start").Offset(TargetRow, 52).Value
Data_UF.Text_rx21 = Sheets("data").Range("Data_Start").Offset(TargetRow, 53).Value
Data_UF.Text_rx22 = Sheets("data").Range("Data_Start").Offset(TargetRow, 54).Value
Data_UF.Text_rx23 = Sheets("data").Range("Data_Start").Offset(TargetRow, 55).Value
Data_UF.Text_rx24 = Sheets("data").Range("Data_Start").Offset(TargetRow, 56).Value
Data_UF.Text_fr_age_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 57).Value
Data_UF.Text_fr_obesite_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 58).Value
Data_UF.Combo_fr1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 59).Value
Data_UF.Combo_fr2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 60).Value
Data_UF.Combo_fr3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 61).Value
Data_UF.Combo_fr4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 62).Value
Data_UF.Combo_fr5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 63).Value
Data_UF.Combo_fr6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 64).Value
Data_UF.Combo_fr7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 65).Value
Data_UF.Combo_malconnu1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 66).Value
Data_UF.Combo_malconnu2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 67).Value
Data_UF.Text_passe_sportif = Sheets("data").Range("Data_Start").Offset(TargetRow, 68).Value
Data_UF.Text_ps1 = Sheets("data").Range("Data_Start").Offset(TargetRow, 69).Value
Data_UF.Text_ps2 = Sheets("data").Range("Data_Start").Offset(TargetRow, 70).Value
Data_UF.Text_ps3 = Sheets("data").Range("Data_Start").Offset(TargetRow, 71).Value
Data_UF.Text_ps4 = Sheets("data").Range("Data_Start").Offset(TargetRow, 72).Value
Data_UF.Text_ps5 = Sheets("data").Range("Data_Start").Offset(TargetRow, 73).Value
Data_UF.Text_ps6 = Sheets("data").Range("Data_Start").Offset(TargetRow, 74).Value
Data_UF.Text_ps7 = Sheets("data").Range("Data_Start").Offset(TargetRow, 75).Value
Data_UF.Text_ps8 = Sheets("data").Range("Data_Start").Offset(TargetRow, 76).Value
Data_UF.Text_ps9 = Sheets("data").Range("Data_Start").Offset(TargetRow, 77).Value
Data_UF.Text_passe_actif = Sheets("data").Range("Data_Start").Offset(TargetRow, 78).Value
Data_UF.Text_pa1 = Sheets("data").Range("Data_Start").Offset(TargetRow, 79).Value
Data_UF.Text_pa2 = Sheets("data").Range("Data_Start").Offset(TargetRow, 80).Value
Data_UF.Text_pa3 = Sheets("data").Range("Data_Start").Offset(TargetRow, 81).Value
Data_UF.Text_pa4 = Sheets("data").Range("Data_Start").Offset(TargetRow, 82).Value
Data_UF.Text_pa5 = Sheets("data").Range("Data_Start").Offset(TargetRow, 83).Value
Data_UF.Text_pa6 = Sheets("data").Range("Data_Start").Offset(TargetRow, 84).Value
Data_UF.Text_pa7 = Sheets("data").Range("Data_Start").Offset(TargetRow, 85).Value
Data_UF.Text_pa8 = Sheets("data").Range("Data_Start").Offset(TargetRow, 86).Value
Data_UF.Text_pa9 = Sheets("data").Range("Data_Start").Offset(TargetRow, 87).Value
Data_UF.Text_apactuelle = Sheets("data").Range("Data_Start").Offset(TargetRow, 88).Value
Data_UF.Text_ap1 = Sheets("data").Range("Data_Start").Offset(TargetRow, 89).Value
Data_UF.Text_ap2 = Sheets("data").Range("Data_Start").Offset(TargetRow, 90).Value
Data_UF.Text_ap3 = Sheets("data").Range("Data_Start").Offset(TargetRow, 91).Value
Data_UF.Text_ap4 = Sheets("data").Range("Data_Start").Offset(TargetRow, 92).Value
Data_UF.Text_ap5 = Sheets("data").Range("Data_Start").Offset(TargetRow, 93).Value
Data_UF.Text_ap6 = Sheets("data").Range("Data_Start").Offset(TargetRow, 94).Value
Data_UF.Text_ap7 = Sheets("data").Range("Data_Start").Offset(TargetRow, 95).Value
Data_UF.Text_ap8 = Sheets("data").Range("Data_Start").Offset(TargetRow, 96).Value
Data_UF.Text_ap9 = Sheets("data").Range("Data_Start").Offset(TargetRow, 97).Value
Data_UF.Text_materiel = Sheets("data").Range("Data_Start").Offset(TargetRow, 98).Value
Data_UF.Text_AP_commentaires = Sheets("data").Range("Data_Start").Offset(TargetRow, 99).Value
Data_UF.Text_nbrepas = Sheets("data").Range("Data_Start").Offset(TargetRow, 100).Value
Data_UF.Text_nbcoll = Sheets("data").Range("Data_Start").Offset(TargetRow, 101).Value
Data_UF.Text_hydra = Sheets("data").Range("Data_Start").Offset(TargetRow, 102).Value
Data_UF.Text_alcool = Sheets("data").Range("Data_Start").Offset(TargetRow, 103).Value
Data_UF.Text_cafe = Sheets("data").Range("Data_Start").Offset(TargetRow, 104).Value
Data_UF.Text_boisson_sucrees = Sheets("data").Range("Data_Start").Offset(TargetRow, 105).Value
Data_UF.Text_dej = Sheets("data").Range("Data_Start").Offset(TargetRow, 106).Value
Data_UF.TextBox_diner = Sheets("data").Range("Data_Start").Offset(TargetRow, 107).Value
Data_UF.Text_souper = Sheets("data").Range("Data_Start").Offset(TargetRow, 108).Value
Data_UF.Text_alim_comment = Sheets("data").Range("Data_Start").Offset(TargetRow, 109).Value
Data_UF.Text_alim_remplacement = Sheets("data").Range("Data_Start").Offset(TargetRow, 110).Value
Data_UF.Text_tabac = Sheets("data").Range("Data_Start").Offset(TargetRow, 111).Value
Data_UF.Text_attente1 = Sheets("data").Range("Data_Start").Offset(TargetRow, 112).Value
Data_UF.Text_attente2 = Sheets("data").Range("Data_Start").Offset(TargetRow, 113).Value
Data_UF.Text_attente3 = Sheets("data").Range("Data_Start").Offset(TargetRow, 114).Value
Data_UF.Text_attente4 = Sheets("data").Range("Data_Start").Offset(TargetRow, 115).Value
Data_UF.Text_attente5 = Sheets("data").Range("Data_Start").Offset(TargetRow, 116).Value
Data_UF.Text_obj_kin1 = Sheets("data").Range("Data_Start").Offset(TargetRow, 117).Value
Data_UF.Text_obj_kin2 = Sheets("data").Range("Data_Start").Offset(TargetRow, 118).Value
Data_UF.Text_obj_kin3 = Sheets("data").Range("Data_Start").Offset(TargetRow, 119).Value
Data_UF.Text_obj_kin4 = Sheets("data").Range("Data_Start").Offset(TargetRow, 120).Value
Data_UF.Text_conclu_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 121).Value
Data_UF.Text_date_leapa_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 122).Value
Data_UF.Combo_rapport_leapa_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 123).Value
Data_UF.Combo_app_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 124).Value
Data_UF.Combo_prot_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 125).Value
Data_UF.Text_EPE_fin_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 126).Value
Data_UF.Text_fc_repos_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 127).Value
Data_UF.Text_TA_repos_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 128).Value
Data_UF.Text_vit_tapis_max_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 129).Value
Data_UF.Text_vit_ergo_max_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 130).Value
Data_UF.Text_pente_max_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 131).Value
Data_UF.Text_charge_ergo_max_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 132).Value
Data_UF.Text_duree_test_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 133).Value
Data_UF.Text_dlr_pre_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 134).Value
Data_UF.Text_dlr_post_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 135).Value
Data_UF.Text_raison_arret_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 136).Value
Data_UF.Text_FCRmin_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 137).Value
Data_UF.Text_FCRmax_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 138).Value
Data_UF.Combo_cardio_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 139).Value
Data_UF.Combo_inf_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 140).Value
Data_UF.Text_com_cardio_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 141).Value
Data_UF.Text_evol_fc_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 142).Value
Data_UF.Text_recup_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 143).Value
Data_UF.Text_dlr_text_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 144).Value
Data_UF.Text_obs_effort_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 145).Value
Data_UF.Text_leapa_text_perso_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 146).Value
Data_UF.Text_descri_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 147).Value
Data_UF.Text_fc_1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 148).Value
Data_UF.Text_fc_2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 149).Value
Data_UF.Text_fc_3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 150).Value
Data_UF.Text_fc_4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 151).Value
Data_UF.Text_fc_5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 152).Value
Data_UF.Text_fc_6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 153).Value
Data_UF.Text_fc_7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 154).Value
Data_UF.Text_fc_8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 155).Value
Data_UF.Text_fc_9_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 156).Value
Data_UF.Text_fc_10_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 157).Value
Data_UF.Text_fc_11_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 158).Value
Data_UF.Text_fc_12_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 159).Value
Data_UF.Text_fc_13_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 160).Value
Data_UF.Text_fc_14_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 161).Value
Data_UF.Text_fc_15_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 162).Value
Data_UF.Text_fc_16_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 163).Value
Data_UF.Text_TAS1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 168).Value
Data_UF.Text_TAS2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 169).Value
Data_UF.Text_TAS3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 170).Value
Data_UF.Text_TAS4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 171).Value
Data_UF.Text_TAS5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 172).Value
Data_UF.Text_TAS6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 173).Value
Data_UF.Text_TAS7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 174).Value
Data_UF.Text_TAS8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 175).Value


Data_UF.Text_TAD1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 178).Value
Data_UF.Text_TAD2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 179).Value
Data_UF.Text_TAD3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 180).Value
Data_UF.Text_TAD4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 181).Value
Data_UF.Text_TAD5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 182).Value
Data_UF.Text_TAD6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 183).Value
Data_UF.Text_TAD7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 184).Value
Data_UF.Text_TAD8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 185).Value


Data_UF.Text_epe1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 188).Value
Data_UF.Text_epe2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 189).Value
Data_UF.Text_epe3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 190).Value
Data_UF.Text_epe4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 191).Value
Data_UF.Text_epe5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 192).Value
Data_UF.Text_epe6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 193).Value
Data_UF.Text_epe7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 194).Value
Data_UF.Text_epe8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 195).Value
Data_UF.Text_epe9_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 196).Value
Data_UF.Text_epe10_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 197).Value
Data_UF.Text_epe11_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 198).Value
Data_UF.Text_epe12_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 199).Value
Data_UF.Text_epe13_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 200).Value
Data_UF.Text_epe14_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 201).Value
Data_UF.Text_epe15_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 202).Value
Data_UF.Text_epe16_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 203).Value




Data_UF.Text_dlr1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 208).Value
Data_UF.Text_dlr2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 209).Value
Data_UF.Text_dlr3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 210).Value
Data_UF.Text_dlr4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 211).Value
Data_UF.Text_dlr5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 212).Value
Data_UF.Text_dlr6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 213).Value
Data_UF.Text_dlr7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 214).Value
Data_UF.Text_dlr8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 215).Value
Data_UF.Text_dlr9_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 216).Value
Data_UF.Text_dlr10_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 217).Value
Data_UF.Text_dlr11_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 218).Value
Data_UF.Text_dlr12_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 219).Value
Data_UF.Text_dlr13_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 220).Value
Data_UF.Text_dlr14_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 221).Value
Data_UF.Text_dlr15_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 222).Value
Data_UF.Text_dlr16_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 223).Value




Data_UF.Text_vit1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 228).Value
Data_UF.Text_vit2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 229).Value
Data_UF.Text_vit3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 230).Value
Data_UF.Text_vit4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 231).Value
Data_UF.Text_vit5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 232).Value
Data_UF.Text_vit6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 233).Value
Data_UF.Text_vit7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 234).Value
Data_UF.Text_vit8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 235).Value
Data_UF.Text_vit9_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 236).Value
Data_UF.Text_vit10_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 237).Value
Data_UF.Text_vit11_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 238).Value
Data_UF.Text_vit12_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 239).Value
Data_UF.Text_vit13_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 240).Value
Data_UF.Text_vit14_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 241).Value
Data_UF.Text_vit15_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 242).Value
Data_UF.Text_vit16_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 243).Value




Data_UF.Text_pente1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 248).Value
Data_UF.Text_pente2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 249).Value
Data_UF.Text_pente3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 250).Value
Data_UF.Text_pente4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 251).Value
Data_UF.Text_pente5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 252).Value
Data_UF.Text_pente6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 253).Value
Data_UF.Text_pente7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 254).Value
Data_UF.Text_pente8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 255).Value
Data_UF.Text_pente9_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 256).Value
Data_UF.Text_pente10_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 257).Value
Data_UF.Text_pente11_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 258).Value
Data_UF.Text_pente12_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 259).Value
Data_UF.Text_pente13_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 260).Value
Data_UF.Text_pente14_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 261).Value
Data_UF.Text_pente15_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 262).Value
Data_UF.Text_pente16_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 263).Value




Data_UF.Combo_dom_preh_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 268).Value
Data_UF.Text_MSD_1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 269).Value
Data_UF.Text_MSD_2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 270).Value
Data_UF.Text_MSD_3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 271).Value
Data_UF.Text_MSG_1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 272).Value
Data_UF.Text_MSG_2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 273).Value
Data_UF.Text_MSG_3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 274).Value
Data_UF.Text_preh_obs_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 275).Value
Data_UF.Text_résult_6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 276).Value
Data_UF.Text_dlr_6_pre_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 277).Value
Data_UF.Text_dlr_6_post_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 278).Value
Data_UF.Text_obs_6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 279).Value
Data_UF.Text_date_pod_1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 280).Value
Data_UF.Text_date_pod_2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 281).Value
Data_UF.Text_date_pod_3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 282).Value
Data_UF.Text_date_pod_4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 283).Value
Data_UF.Text_date_pod_5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 284).Value
Data_UF.Text_date_pod_6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 285).Value
Data_UF.Text_date_pod_7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 286).Value
Data_UF.Text_date_pod_8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 287).Value
Data_UF.Text_result_podo1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 288).Value
Data_UF.Text_result_podo2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 289).Value
Data_UF.Text_result_podo3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 290).Value
Data_UF.Text_result_podo4_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 291).Value
Data_UF.Text_result_podo5_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 292).Value
Data_UF.Text_result_podo6_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 293).Value
Data_UF.Text_result_podo7_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 294).Value
Data_UF.Text_result_podo8_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 295).Value
Data_UF.Combo_poignet_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 296).Value
Data_UF.Text_com_podo_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 297).Value
Data_UF.Combo_CAP_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 298).Value
Data_UF.Text_marche_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 299).Value
Data_UF.Text_obs_marche_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 300).Value
Data_UF.Text_planche_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 301).Value
Data_UF.Text_planche_obs_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 302).Value
Data_UF.Text_corde_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 303).Value
Data_UF.Text_corde_obs_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 304).Value
Data_UF.Text_saut_1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 305).Value
Data_UF.Text_saut_2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 306).Value
Data_UF.Text_saut_obs_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 307).Value
Data_UF.Text_push_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 308).Value
Data_UF.Text_push_obs_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 309).Value
Data_UF.Text_chaise_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 310).Value
Data_UF.Text_chaise_obs_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 311).Value
Data_UF.Text_equi_d1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 312).Value
Data_UF.Text_equi_d2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 313).Value
Data_UF.Text_equi_d3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 314).Value
Data_UF.Combo_45sd_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 315).Value
Data_UF.Text_equi_g1_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 316).Value
Data_UF.Text_equi_g2_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 317).Value
Data_UF.Text_equi_g3_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 318).Value
Data_UF.Combo_45sg_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 319).Value
Data_UF.Text_equi_obs_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 320).Value
Data_UF.Text_stress_pré_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 321).Value
Data_UF.Text_stress_act_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 322).Value
Data_UF.Text_energie_pre_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 323).Value
Data_UF.Text_energie_act_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 324).Value
Data_UF.Text_kinap_capacites_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 325).Value
Data_UF.Text_kinap_craintes_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 326).Value
Data_UF.Text_kinap_tsk_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 327).Value
Data_UF.Text_tsk_appr_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 328).Value
Data_UF.Text_assisdebout_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 329).Value
Data_UF.Text_assisdebout_com_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 330).Value
Data_UF.Text_sign_ini = Sheets("data").Range("Data_Start").Offset(TargetRow, 331).Value
Data_UF.Text_date_eval_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 332).Value
Data_UF.Text_taille_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 333).Value
Data_UF.Text_poids_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 334).Value
Data_UF.Text_ct_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 335).Value
Data_UF.Text_com_pds_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 336).Value
Data_UF.Text_tas_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 337).Value
Data_UF.Text_tad_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 338).Value
Data_UF.Text_fc_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 339).Value
Data_UF.Text_gly_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 340).Value
Data_UF.Text_mg_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 341).Value
Data_UF.Text_mm_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 342).Value
Data_UF.Text_mh_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 343).Value
Data_UF.Text_pg_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 344).Value
Data_UF.Text_fr_age_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 345).Value
Data_UF.Text_fr_obesite_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 346).Value
Data_UF.Combo_fr1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 347).Value
Data_UF.Combo_fr2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 348).Value
Data_UF.Combo_fr3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 349).Value
Data_UF.Combo_fr4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 350).Value
Data_UF.Combo_fr5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 351).Value
Data_UF.Combo_fr6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 352).Value
Data_UF.Combo_fr7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 353).Value
Data_UF.Combo_malconnu1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 354).Value
Data_UF.Combo_malconnu2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 355).Value
Data_UF.Text_passe_sportif_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 356).Value
Data_UF.Text_ps1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 357).Value
Data_UF.Text_ps2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 358).Value
Data_UF.Text_ps3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 359).Value
Data_UF.Text_ps4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 360).Value
Data_UF.Text_ps5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 361).Value
Data_UF.Text_ps6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 362).Value
Data_UF.Text_ps7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 363).Value
Data_UF.Text_ps8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 364).Value
Data_UF.Text_ps9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 365).Value
Data_UF.Text_passe_actif_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 366).Value
Data_UF.Text_pa1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 367).Value
Data_UF.Text_pa2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 368).Value
Data_UF.Text_pa3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 369).Value
Data_UF.Text_pa4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 370).Value
Data_UF.Text_pa5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 371).Value
Data_UF.Text_pa6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 372).Value
Data_UF.Text_pa7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 373).Value
Data_UF.Text_pa8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 374).Value
Data_UF.Text_pa9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 375).Value
Data_UF.Text_apactuelle_fni = Sheets("data").Range("Data_Start").Offset(TargetRow, 376).Value
Data_UF.Text_ap1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 377).Value
Data_UF.Text_ap2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 378).Value
Data_UF.Text_ap3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 379).Value
Data_UF.Text_ap4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 380).Value
Data_UF.Text_ap5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 381).Value
Data_UF.Text_ap6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 382).Value
Data_UF.Text_ap7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 383).Value
Data_UF.Text_ap8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 384).Value
Data_UF.Text_ap9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 385).Value
Data_UF.Text_materiel_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 386).Value
Data_UF.Text_AP_commentaires_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 387).Value
Data_UF.Text_nbrepas_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 388).Value
Data_UF.Text_nbcoll_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 389).Value
Data_UF.Text_hydra_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 390).Value
Data_UF.Text_alcool_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 391).Value
Data_UF.Text_cafe_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 392).Value
Data_UF.Text_boisson_sucrees_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 393).Value
Data_UF.Text_dej_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 394).Value
Data_UF.TextBox_diner_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 395).Value
Data_UF.Text_souper_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 396).Value
Data_UF.Text_alim_comment_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 397).Value
Data_UF.Text_alim_remplacement_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 398).Value
Data_UF.Text_tabac_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 399).Value
Data_UF.Text_stress_pré_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 400).Value
Data_UF.Text_stress_act_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 401).Value
Data_UF.Text_energie_pre_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 402).Value
Data_UF.Text_energie_act_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 403).Value
Data_UF.Text_date_leapa_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 404).Value
Data_UF.Combo_cardio_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 405).Value
Data_UF.Combo_inf_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 406).Value
Data_UF.Combo_app_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 407).Value
Data_UF.Combo_prot_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 408).Value
Data_UF.Text_duree_test_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 409).Value
Data_UF.Text_descri_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 410).Value
Data_UF.Text_fc_repos_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 411).Value
Data_UF.Text_TA_repos_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 412).Value
Data_UF.Text_EPE_fin_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 413).Value
Data_UF.Text_vit_tapis_max_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 414).Value
Data_UF.Text_pente_max_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 415).Value
Data_UF.Text_vit_ergo_max_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 416).Value
Data_UF.Text_charge_ergo_max_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 417).Value
Data_UF.Text_dlr_pre_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 418).Value
Data_UF.Text_dlr_post_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 419).Value
Data_UF.Text_FCRmin_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 420).Value
Data_UF.Text_FCRmax_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 421).Value
Data_UF.Combo_rapport_leapa_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 422).Value
Data_UF.Text_fc_1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 423).Value
Data_UF.Text_fc_2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 424).Value
Data_UF.Text_fc_3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 425).Value
Data_UF.Text_fc_4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 426).Value
Data_UF.Text_fc_5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 427).Value
Data_UF.Text_fc_6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 428).Value
Data_UF.Text_fc_7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 429).Value
Data_UF.Text_fc_8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 430).Value
Data_UF.Text_fc_9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 431).Value
Data_UF.Text_fc_10_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 432).Value
Data_UF.Text_fc_11_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 433).Value
Data_UF.Text_fc_12_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 434).Value
Data_UF.Text_fc_13_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 435).Value
Data_UF.Text_fc_14_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 436).Value
Data_UF.Text_fc_15_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 437).Value
Data_UF.Text_fc_16_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 438).Value




Data_UF.Text_TAS1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 443).Value
Data_UF.Text_TAS2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 444).Value
Data_UF.Text_TAS3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 445).Value
Data_UF.Text_TAS4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 446).Value
Data_UF.Text_TAS5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 447).Value
Data_UF.Text_TAS6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 448).Value
Data_UF.Text_TAS7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 449).Value
Data_UF.Text_TAS8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 450).Value


Data_UF.Text_TAD1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 453).Value
Data_UF.Text_TAD2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 454).Value
Data_UF.Text_TAD3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 455).Value
Data_UF.Text_TAD4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 456).Value
Data_UF.Text_TAD5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 457).Value
Data_UF.Text_TAD6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 458).Value
Data_UF.Text_TAD7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 459).Value
Data_UF.Text_TAD8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 460).Value


Data_UF.Text_epe1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 463).Value
Data_UF.Text_epe2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 464).Value
Data_UF.Text_epe3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 465).Value
Data_UF.Text_epe4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 466).Value
Data_UF.Text_epe5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 467).Value
Data_UF.Text_epe6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 468).Value
Data_UF.Text_epe7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 469).Value
Data_UF.Text_epe8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 470).Value
Data_UF.Text_epe9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 471).Value
Data_UF.Text_epe10_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 472).Value
Data_UF.Text_epe11_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 473).Value
Data_UF.Text_epe12_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 474).Value
Data_UF.Text_epe13_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 475).Value
Data_UF.Text_epe14_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 476).Value
Data_UF.Text_epe15_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 477).Value
Data_UF.Text_epe16_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 478).Value




Data_UF.Text_dlr1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 483).Value
Data_UF.Text_dlr2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 484).Value
Data_UF.Text_dlr3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 485).Value
Data_UF.Text_dlr4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 486).Value
Data_UF.Text_dlr5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 487).Value
Data_UF.Text_dlr6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 488).Value
Data_UF.Text_dlr7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 489).Value
Data_UF.Text_dlr8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 490).Value
Data_UF.Text_dlr9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 491).Value
Data_UF.Text_dlr10_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 492).Value
Data_UF.Text_dlr11_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 493).Value
Data_UF.Text_dlr12_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 494).Value
Data_UF.Text_dlr13_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 495).Value
Data_UF.Text_dlr14_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 496).Value
Data_UF.Text_dlr15_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 497).Value
Data_UF.Text_dlr16_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 498).Value




Data_UF.Text_vit1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 503).Value
Data_UF.Text_vit2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 504).Value
Data_UF.Text_vit3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 505).Value
Data_UF.Text_vit4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 506).Value
Data_UF.Text_vit5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 507).Value
Data_UF.Text_vit6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 508).Value
Data_UF.Text_vit7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 509).Value
Data_UF.Text_vit8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 510).Value
Data_UF.Text_vit9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 511).Value
Data_UF.Text_vit10_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 512).Value
Data_UF.Text_vit11_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 513).Value
Data_UF.Text_vit12_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 514).Value
Data_UF.Text_vit13_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 515).Value
Data_UF.Text_vit14_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 516).Value
Data_UF.Text_vit15_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 517).Value
Data_UF.Text_vit16_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 518).Value




Data_UF.Text_pente1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 523).Value
Data_UF.Text_pente2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 524).Value
Data_UF.Text_pente3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 525).Value
Data_UF.Text_pente4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 526).Value
Data_UF.Text_pente5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 527).Value
Data_UF.Text_pente6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 528).Value
Data_UF.Text_pente7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 529).Value
Data_UF.Text_pente8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 530).Value
Data_UF.Text_pente9_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 531).Value
Data_UF.Text_pente10_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 532).Value
Data_UF.Text_pente11_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 533).Value
Data_UF.Text_pente12_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 534).Value
Data_UF.Text_pente13_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 535).Value
Data_UF.Text_pente14_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 536).Value
Data_UF.Text_pente15_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 537).Value
Data_UF.Text_pente16_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 538).Value




Data_UF.Text_raison_arret_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 543).Value
Data_UF.Text_com_cardio_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 544).Value
Data_UF.Text_evol_fc_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 545).Value
Data_UF.Text_recup_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 546).Value
Data_UF.Text_dlr_text_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 547).Value
Data_UF.Text_obs_effort_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 548).Value
Data_UF.Text_leapa_text_perso_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 549).Value
Data_UF.Combo_CAP_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 550).Value
Data_UF.Text_marche_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 551).Value
Data_UF.Text_obs_marche_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 552).Value
Data_UF.Text_planche_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 553).Value
Data_UF.Text_planche_obs_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 554).Value
Data_UF.Text_corde_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 555).Value
Data_UF.Text_corde_obs_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 556).Value
Data_UF.Text_saut_1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 557).Value
Data_UF.Text_saut_2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 558).Value
Data_UF.Text_saut_obs_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 559).Value
Data_UF.Text_push_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 560).Value
Data_UF.Text_push_obs_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 561).Value
Data_UF.Text_chaise_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 562).Value
Data_UF.Text_chaise_obs_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 563).Value
Data_UF.Text_kinap_capacites_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 564).Value
Data_UF.Text_kinap_craintes_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 565).Value
Data_UF.Text_kinap_tsk_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 566).Value
Data_UF.Text_tsk_appr_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 567).Value
Data_UF.Combo_poignet_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 568).Value
Data_UF.Text_date_pod_1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 569).Value
Data_UF.Text_date_pod_2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 570).Value
Data_UF.Text_date_pod_3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 571).Value
Data_UF.Text_date_pod_4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 572).Value
Data_UF.Text_date_pod_5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 573).Value
Data_UF.Text_date_pod_6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 574).Value
Data_UF.Text_date_pod_7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 575).Value
Data_UF.Text_date_pod_8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 576).Value
Data_UF.Text_result_podo1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 577).Value
Data_UF.Text_result_podo2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 578).Value
Data_UF.Text_result_podo3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 579).Value
Data_UF.Text_result_podo4_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 580).Value
Data_UF.Text_result_podo5_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 581).Value
Data_UF.Text_result_podo6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 582).Value
Data_UF.Text_result_podo7_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 583).Value
Data_UF.Text_result_podo8_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 584).Value
Data_UF.Text_com_podo_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 585).Value
Data_UF.Combo_dom_preh_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 586).Value
Data_UF.Text_MSG_1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 587).Value
Data_UF.Text_MSG_2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 588).Value
Data_UF.Text_MSG_3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 589).Value
Data_UF.Text_MSD_1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 590).Value
Data_UF.Text_MSD_2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 591).Value
Data_UF.Text_MSD_3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 592).Value
Data_UF.Text_preh_obs_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 593).Value
Data_UF.Text_equi_g1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 594).Value
Data_UF.Text_equi_g2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 595).Value
Data_UF.Text_equi_g3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 596).Value
Data_UF.Combo_45sg_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 597).Value
Data_UF.Text_equi_d1_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 598).Value
Data_UF.Text_equi_d2_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 599).Value
Data_UF.Text_equi_d3_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 600).Value
Data_UF.Combo_45sd_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 601).Value
Data_UF.Text_equi_obs_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 602).Value
Data_UF.Text_dlr_6_pre_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 603).Value
Data_UF.Text_dlr_6_post_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 604).Value
Data_UF.Text_résult_6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 605).Value
Data_UF.Text_obs_6_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 606).Value
Data_UF.Text_assisdebout_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 607).Value
Data_UF.Text_assisdebout_com_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 608).Value
Data_UF.Text_conclu_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 609).Value
Data_UF.Text_sign_fin = Sheets("data").Range("Data_Start").Offset(TargetRow, 610).Value








'''End retrieving data from database'''

Data_UF.Caption = "Edit Existing" 'set caption to show that the user is editing
Data_UF.Show 'show the user form with the details loaded in

End Sub
]
 

Some videos you may like

Excel Facts

Control Word Wrap
Press Alt+Enter to move to a new row in a cell. Lets you control where the words wrap.

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
47,887
Office Version
  1. 365
Platform
  1. Windows
Hi & welcome to MrExcel.
Not sure if this will help, but try
VBA Code:
Private Sub CommandButton1_Click()

Dim TargetRow As Integer 'variable to save position of this person in database

'use Match worksheet function to find position of chosen name
TargetRow = Application.WorksheetFunction.Match(ColumnE_Menu, Sheets("Data").Range("Dyn_Full_Name"), 0)
Sheets("Engine").Range("B5").Value = TargetRow 'save position in the engine, for use later

Unload Find_Entry_UF 'unload the userform to select a name
   
'''Begin retrieving data from database'''
With Sheets("Data").Range("Data_Start")
   Data_UF.Txt_First = .Offset(TargetRow, 1).Value 'first name
   Data_UF.Txt_Surname = .Offset(TargetRow, 2).Value 'surname
  
   Data_UF.Text_Dossier = .Offset(TargetRow, 4).Value '# dossier
   Data_UF.Text_ddn = .Offset(TargetRow, 5).Value 'DDN
   Data_UF.Combo_Gender = .Offset(TargetRow, 6).Value 'Sexe
   Data_UF.Combo_dominance = .Offset(TargetRow, 7).Value 'Dominance
   Data_UF.Text_Kin = .Offset(TargetRow, 8).Value 'Kinésiologue
   Data_UF.Combo_Programme = .Offset(TargetRow, 9).Value 'Programme
   Data_UF.Text_date_eval_ini = .Offset(TargetRow, 10).Value 'Date éval initiale
   Data_UF.Combo_menopause = .Offset(TargetRow, 11).Value 'Ménopause
   Data_UF.Text_taille_ini = .Offset(TargetRow, 12).Value
   Data_UF.Text_poids_ini = .Offset(TargetRow, 13).Value
   Data_UF.Text_ct_ini = .Offset(TargetRow, 14).Value
   Data_UF.Text_com_pds_ini = .Offset(TargetRow, 15).Value
   Data_UF.Text_tas_ini = .Offset(TargetRow, 16).Value
   Data_UF.Text_tad_ini = .Offset(TargetRow, 17).Value
   Data_UF.Text_fc_ini = .Offset(TargetRow, 18).Value
   Data_UF.Text_gly_ini = .Offset(TargetRow, 19).Value
   Data_UF.Text_mg_ini = .Offset(TargetRow, 20).Value
   Data_UF.Text_mm_ini = .Offset(TargetRow, 21).Value
   Data_UF.Text_mh_ini = .Offset(TargetRow, 22).Value
   Data_UF.Text_pg_ini = .Offset(TargetRow, 23).Value
   Data_UF.Text_dx = .Offset(TargetRow, 24).Value
   Data_UF.Txt_condasso1 = .Offset(TargetRow, 25).Value
   Data_UF.Txt_condasso2 = .Offset(TargetRow, 26).Value
   Data_UF.Txt_condasso3 = .Offset(TargetRow, 27).Value
   Data_UF.Txt_condasso4 = .Offset(TargetRow, 28).Value
   Data_UF.Txt_condasso5 = .Offset(TargetRow, 29).Value
   Data_UF.Txt_condasso6 = .Offset(TargetRow, 30).Value
   Data_UF.Txt_condasso7 = .Offset(TargetRow, 31).Value
   Data_UF.Txt_condasso8 = .Offset(TargetRow, 32).Value
   Data_UF.Text_rx1 = .Offset(TargetRow, 33).Value
   Data_UF.Text_rx2 = .Offset(TargetRow, 34).Value
   Data_UF.Text_rx3 = .Offset(TargetRow, 35).Value
   Data_UF.Text_rx4 = .Offset(TargetRow, 36).Value
   Data_UF.Text_rx5 = .Offset(TargetRow, 37).Value
   Data_UF.Text_rx6 = .Offset(TargetRow, 38).Value
   Data_UF.Text_rx7 = .Offset(TargetRow, 39).Value
   Data_UF.Text_rx8 = .Offset(TargetRow, 40).Value
   Data_UF.Text_rx9 = .Offset(TargetRow, 41).Value
   Data_UF.Text_rx10 = .Offset(TargetRow, 42).Value
   Data_UF.Text_rx11 = .Offset(TargetRow, 43).Value
   Data_UF.Text_rx12 = .Offset(TargetRow, 44).Value
   Data_UF.Text_rx13 = .Offset(TargetRow, 45).Value
   Data_UF.Text_rx14 = .Offset(TargetRow, 46).Value
   Data_UF.Text_rx15 = .Offset(TargetRow, 47).Value
   Data_UF.Text_rx16 = .Offset(TargetRow, 48).Value
   Data_UF.Text_rx17 = .Offset(TargetRow, 49).Value
   Data_UF.Text_rx18 = .Offset(TargetRow, 50).Value
   Data_UF.Text_rx19 = .Offset(TargetRow, 51).Value
   Data_UF.Text_rx20 = .Offset(TargetRow, 52).Value
   Data_UF.Text_rx21 = .Offset(TargetRow, 53).Value
   Data_UF.Text_rx22 = .Offset(TargetRow, 54).Value
   Data_UF.Text_rx23 = .Offset(TargetRow, 55).Value
   Data_UF.Text_rx24 = .Offset(TargetRow, 56).Value
   Data_UF.Text_fr_age_ini = .Offset(TargetRow, 57).Value
   Data_UF.Text_fr_obesite_ini = .Offset(TargetRow, 58).Value
   Data_UF.Combo_fr1_ini = .Offset(TargetRow, 59).Value
   Data_UF.Combo_fr2_ini = .Offset(TargetRow, 60).Value
   Data_UF.Combo_fr3_ini = .Offset(TargetRow, 61).Value
   Data_UF.Combo_fr4_ini = .Offset(TargetRow, 62).Value
   Data_UF.Combo_fr5_ini = .Offset(TargetRow, 63).Value
   Data_UF.Combo_fr6_ini = .Offset(TargetRow, 64).Value
   Data_UF.Combo_fr7_ini = .Offset(TargetRow, 65).Value
   Data_UF.Combo_malconnu1_ini = .Offset(TargetRow, 66).Value
   Data_UF.Combo_malconnu2_ini = .Offset(TargetRow, 67).Value
   Data_UF.Text_passe_sportif = .Offset(TargetRow, 68).Value
   Data_UF.Text_ps1 = .Offset(TargetRow, 69).Value
   Data_UF.Text_ps2 = .Offset(TargetRow, 70).Value
   Data_UF.Text_ps3 = .Offset(TargetRow, 71).Value
   Data_UF.Text_ps4 = .Offset(TargetRow, 72).Value
   Data_UF.Text_ps5 = .Offset(TargetRow, 73).Value
   Data_UF.Text_ps6 = .Offset(TargetRow, 74).Value
   Data_UF.Text_ps7 = .Offset(TargetRow, 75).Value
   Data_UF.Text_ps8 = .Offset(TargetRow, 76).Value
   Data_UF.Text_ps9 = .Offset(TargetRow, 77).Value
   Data_UF.Text_passe_actif = .Offset(TargetRow, 78).Value
   Data_UF.Text_pa1 = .Offset(TargetRow, 79).Value
   Data_UF.Text_pa2 = .Offset(TargetRow, 80).Value
   Data_UF.Text_pa3 = .Offset(TargetRow, 81).Value
   Data_UF.Text_pa4 = .Offset(TargetRow, 82).Value
   Data_UF.Text_pa5 = .Offset(TargetRow, 83).Value
   Data_UF.Text_pa6 = .Offset(TargetRow, 84).Value
   Data_UF.Text_pa7 = .Offset(TargetRow, 85).Value
   Data_UF.Text_pa8 = .Offset(TargetRow, 86).Value
   Data_UF.Text_pa9 = .Offset(TargetRow, 87).Value
   Data_UF.Text_apactuelle = .Offset(TargetRow, 88).Value
   Data_UF.Text_ap1 = .Offset(TargetRow, 89).Value
   Data_UF.Text_ap2 = .Offset(TargetRow, 90).Value
   Data_UF.Text_ap3 = .Offset(TargetRow, 91).Value
   Data_UF.Text_ap4 = .Offset(TargetRow, 92).Value
   Data_UF.Text_ap5 = .Offset(TargetRow, 93).Value
   Data_UF.Text_ap6 = .Offset(TargetRow, 94).Value
   Data_UF.Text_ap7 = .Offset(TargetRow, 95).Value
   Data_UF.Text_ap8 = .Offset(TargetRow, 96).Value
   Data_UF.Text_ap9 = .Offset(TargetRow, 97).Value
   Data_UF.Text_materiel = .Offset(TargetRow, 98).Value
   Data_UF.Text_AP_commentaires = .Offset(TargetRow, 99).Value
   Data_UF.Text_nbrepas = .Offset(TargetRow, 100).Value
   Data_UF.Text_nbcoll = .Offset(TargetRow, 101).Value
   Data_UF.Text_hydra = .Offset(TargetRow, 102).Value
   Data_UF.Text_alcool = .Offset(TargetRow, 103).Value
   Data_UF.Text_cafe = .Offset(TargetRow, 104).Value
   Data_UF.Text_boisson_sucrees = .Offset(TargetRow, 105).Value
   Data_UF.Text_dej = .Offset(TargetRow, 106).Value
   Data_UF.TextBox_diner = .Offset(TargetRow, 107).Value
   Data_UF.Text_souper = .Offset(TargetRow, 108).Value
   Data_UF.Text_alim_comment = .Offset(TargetRow, 109).Value
   Data_UF.Text_alim_remplacement = .Offset(TargetRow, 110).Value
   Data_UF.Text_tabac = .Offset(TargetRow, 111).Value
   Data_UF.Text_attente1 = .Offset(TargetRow, 112).Value
   Data_UF.Text_attente2 = .Offset(TargetRow, 113).Value
   Data_UF.Text_attente3 = .Offset(TargetRow, 114).Value
   Data_UF.Text_attente4 = .Offset(TargetRow, 115).Value
   Data_UF.Text_attente5 = .Offset(TargetRow, 116).Value
   Data_UF.Text_obj_kin1 = .Offset(TargetRow, 117).Value
   Data_UF.Text_obj_kin2 = .Offset(TargetRow, 118).Value
   Data_UF.Text_obj_kin3 = .Offset(TargetRow, 119).Value
   Data_UF.Text_obj_kin4 = .Offset(TargetRow, 120).Value
   Data_UF.Text_conclu_ini = .Offset(TargetRow, 121).Value
   Data_UF.Text_date_leapa_ini = .Offset(TargetRow, 122).Value
   Data_UF.Combo_rapport_leapa_ini = .Offset(TargetRow, 123).Value
   Data_UF.Combo_app_ini = .Offset(TargetRow, 124).Value
   Data_UF.Combo_prot_ini = .Offset(TargetRow, 125).Value
   Data_UF.Text_EPE_fin_ini = .Offset(TargetRow, 126).Value
   Data_UF.Text_fc_repos_ini = .Offset(TargetRow, 127).Value
   Data_UF.Text_TA_repos_ini = .Offset(TargetRow, 128).Value
   Data_UF.Text_vit_tapis_max_ini = .Offset(TargetRow, 129).Value
   Data_UF.Text_vit_ergo_max_ini = .Offset(TargetRow, 130).Value
   Data_UF.Text_pente_max_ini = .Offset(TargetRow, 131).Value
   Data_UF.Text_charge_ergo_max_ini = .Offset(TargetRow, 132).Value
   Data_UF.Text_duree_test_ini = .Offset(TargetRow, 133).Value
   Data_UF.Text_dlr_pre_ini = .Offset(TargetRow, 134).Value
   Data_UF.Text_dlr_post_ini = .Offset(TargetRow, 135).Value
   Data_UF.Text_raison_arret_ini = .Offset(TargetRow, 136).Value
   Data_UF.Text_FCRmin_ini = .Offset(TargetRow, 137).Value
   Data_UF.Text_FCRmax_ini = .Offset(TargetRow, 138).Value
   Data_UF.Combo_cardio_ini = .Offset(TargetRow, 139).Value
   Data_UF.Combo_inf_ini = .Offset(TargetRow, 140).Value
   Data_UF.Text_com_cardio_ini = .Offset(TargetRow, 141).Value
   Data_UF.Text_evol_fc_ini = .Offset(TargetRow, 142).Value
   Data_UF.Text_recup_ini = .Offset(TargetRow, 143).Value
   Data_UF.Text_dlr_text_ini = .Offset(TargetRow, 144).Value
   Data_UF.Text_obs_effort_ini = .Offset(TargetRow, 145).Value
   Data_UF.Text_leapa_text_perso_ini = .Offset(TargetRow, 146).Value
   Data_UF.Text_descri_ini = .Offset(TargetRow, 147).Value
   Data_UF.Text_fc_1_ini = .Offset(TargetRow, 148).Value
   Data_UF.Text_fc_2_ini = .Offset(TargetRow, 149).Value
   Data_UF.Text_fc_3_ini = .Offset(TargetRow, 150).Value
   Data_UF.Text_fc_4_ini = .Offset(TargetRow, 151).Value
   Data_UF.Text_fc_5_ini = .Offset(TargetRow, 152).Value
   Data_UF.Text_fc_6_ini = .Offset(TargetRow, 153).Value
   Data_UF.Text_fc_7_ini = .Offset(TargetRow, 154).Value
   Data_UF.Text_fc_8_ini = .Offset(TargetRow, 155).Value
   Data_UF.Text_fc_9_ini = .Offset(TargetRow, 156).Value
   Data_UF.Text_fc_10_ini = .Offset(TargetRow, 157).Value
   Data_UF.Text_fc_11_ini = .Offset(TargetRow, 158).Value
   Data_UF.Text_fc_12_ini = .Offset(TargetRow, 159).Value
   Data_UF.Text_fc_13_ini = .Offset(TargetRow, 160).Value
   Data_UF.Text_fc_14_ini = .Offset(TargetRow, 161).Value
   Data_UF.Text_fc_15_ini = .Offset(TargetRow, 162).Value
   Data_UF.Text_fc_16_ini = .Offset(TargetRow, 163).Value
   Data_UF.Text_TAS1_ini = .Offset(TargetRow, 168).Value
   Data_UF.Text_TAS2_ini = .Offset(TargetRow, 169).Value
   Data_UF.Text_TAS3_ini = .Offset(TargetRow, 170).Value
   Data_UF.Text_TAS4_ini = .Offset(TargetRow, 171).Value
   Data_UF.Text_TAS5_ini = .Offset(TargetRow, 172).Value
   Data_UF.Text_TAS6_ini = .Offset(TargetRow, 173).Value
   Data_UF.Text_TAS7_ini = .Offset(TargetRow, 174).Value
   Data_UF.Text_TAS8_ini = .Offset(TargetRow, 175).Value
  
  
   Data_UF.Text_TAD1_ini = .Offset(TargetRow, 178).Value
   Data_UF.Text_TAD2_ini = .Offset(TargetRow, 179).Value
   Data_UF.Text_TAD3_ini = .Offset(TargetRow, 180).Value
   Data_UF.Text_TAD4_ini = .Offset(TargetRow, 181).Value
   Data_UF.Text_TAD5_ini = .Offset(TargetRow, 182).Value
   Data_UF.Text_TAD6_ini = .Offset(TargetRow, 183).Value
   Data_UF.Text_TAD7_ini = .Offset(TargetRow, 184).Value
   Data_UF.Text_TAD8_ini = .Offset(TargetRow, 185).Value
  
  
   Data_UF.Text_epe1_ini = .Offset(TargetRow, 188).Value
   Data_UF.Text_epe2_ini = .Offset(TargetRow, 189).Value
   Data_UF.Text_epe3_ini = .Offset(TargetRow, 190).Value
   Data_UF.Text_epe4_ini = .Offset(TargetRow, 191).Value
   Data_UF.Text_epe5_ini = .Offset(TargetRow, 192).Value
   Data_UF.Text_epe6_ini = .Offset(TargetRow, 193).Value
   Data_UF.Text_epe7_ini = .Offset(TargetRow, 194).Value
   Data_UF.Text_epe8_ini = .Offset(TargetRow, 195).Value
   Data_UF.Text_epe9_ini = .Offset(TargetRow, 196).Value
   Data_UF.Text_epe10_ini = .Offset(TargetRow, 197).Value
   Data_UF.Text_epe11_ini = .Offset(TargetRow, 198).Value
   Data_UF.Text_epe12_ini = .Offset(TargetRow, 199).Value
   Data_UF.Text_epe13_ini = .Offset(TargetRow, 200).Value
   Data_UF.Text_epe14_ini = .Offset(TargetRow, 201).Value
   Data_UF.Text_epe15_ini = .Offset(TargetRow, 202).Value
   Data_UF.Text_epe16_ini = .Offset(TargetRow, 203).Value
  
  
  
  
   Data_UF.Text_dlr1_ini = .Offset(TargetRow, 208).Value
   Data_UF.Text_dlr2_ini = .Offset(TargetRow, 209).Value
   Data_UF.Text_dlr3_ini = .Offset(TargetRow, 210).Value
   Data_UF.Text_dlr4_ini = .Offset(TargetRow, 211).Value
   Data_UF.Text_dlr5_ini = .Offset(TargetRow, 212).Value
   Data_UF.Text_dlr6_ini = .Offset(TargetRow, 213).Value
   Data_UF.Text_dlr7_ini = .Offset(TargetRow, 214).Value
   Data_UF.Text_dlr8_ini = .Offset(TargetRow, 215).Value
   Data_UF.Text_dlr9_ini = .Offset(TargetRow, 216).Value
   Data_UF.Text_dlr10_ini = .Offset(TargetRow, 217).Value
   Data_UF.Text_dlr11_ini = .Offset(TargetRow, 218).Value
   Data_UF.Text_dlr12_ini = .Offset(TargetRow, 219).Value
   Data_UF.Text_dlr13_ini = .Offset(TargetRow, 220).Value
   Data_UF.Text_dlr14_ini = .Offset(TargetRow, 221).Value
   Data_UF.Text_dlr15_ini = .Offset(TargetRow, 222).Value
   Data_UF.Text_dlr16_ini = .Offset(TargetRow, 223).Value
  
  
  
  
   Data_UF.Text_vit1_ini = .Offset(TargetRow, 228).Value
   Data_UF.Text_vit2_ini = .Offset(TargetRow, 229).Value
   Data_UF.Text_vit3_ini = .Offset(TargetRow, 230).Value
   Data_UF.Text_vit4_ini = .Offset(TargetRow, 231).Value
   Data_UF.Text_vit5_ini = .Offset(TargetRow, 232).Value
   Data_UF.Text_vit6_ini = .Offset(TargetRow, 233).Value
   Data_UF.Text_vit7_ini = .Offset(TargetRow, 234).Value
   Data_UF.Text_vit8_ini = .Offset(TargetRow, 235).Value
   Data_UF.Text_vit9_ini = .Offset(TargetRow, 236).Value
   Data_UF.Text_vit10_ini = .Offset(TargetRow, 237).Value
   Data_UF.Text_vit11_ini = .Offset(TargetRow, 238).Value
   Data_UF.Text_vit12_ini = .Offset(TargetRow, 239).Value
   Data_UF.Text_vit13_ini = .Offset(TargetRow, 240).Value
   Data_UF.Text_vit14_ini = .Offset(TargetRow, 241).Value
   Data_UF.Text_vit15_ini = .Offset(TargetRow, 242).Value
   Data_UF.Text_vit16_ini = .Offset(TargetRow, 243).Value
  
  
  
  
   Data_UF.Text_pente1_ini = .Offset(TargetRow, 248).Value
   Data_UF.Text_pente2_ini = .Offset(TargetRow, 249).Value
   Data_UF.Text_pente3_ini = .Offset(TargetRow, 250).Value
   Data_UF.Text_pente4_ini = .Offset(TargetRow, 251).Value
   Data_UF.Text_pente5_ini = .Offset(TargetRow, 252).Value
   Data_UF.Text_pente6_ini = .Offset(TargetRow, 253).Value
   Data_UF.Text_pente7_ini = .Offset(TargetRow, 254).Value
   Data_UF.Text_pente8_ini = .Offset(TargetRow, 255).Value
   Data_UF.Text_pente9_ini = .Offset(TargetRow, 256).Value
   Data_UF.Text_pente10_ini = .Offset(TargetRow, 257).Value
   Data_UF.Text_pente11_ini = .Offset(TargetRow, 258).Value
   Data_UF.Text_pente12_ini = .Offset(TargetRow, 259).Value
   Data_UF.Text_pente13_ini = .Offset(TargetRow, 260).Value
   Data_UF.Text_pente14_ini = .Offset(TargetRow, 261).Value
   Data_UF.Text_pente15_ini = .Offset(TargetRow, 262).Value
   Data_UF.Text_pente16_ini = .Offset(TargetRow, 263).Value
  
  
  
  
   Data_UF.Combo_dom_preh_ini = .Offset(TargetRow, 268).Value
   Data_UF.Text_MSD_1_ini = .Offset(TargetRow, 269).Value
   Data_UF.Text_MSD_2_ini = .Offset(TargetRow, 270).Value
   Data_UF.Text_MSD_3_ini = .Offset(TargetRow, 271).Value
   Data_UF.Text_MSG_1_ini = .Offset(TargetRow, 272).Value
   Data_UF.Text_MSG_2_ini = .Offset(TargetRow, 273).Value
   Data_UF.Text_MSG_3_ini = .Offset(TargetRow, 274).Value
   Data_UF.Text_preh_obs_ini = .Offset(TargetRow, 275).Value
   Data_UF.Text_résult_6_ini = .Offset(TargetRow, 276).Value
   Data_UF.Text_dlr_6_pre_ini = .Offset(TargetRow, 277).Value
   Data_UF.Text_dlr_6_post_ini = .Offset(TargetRow, 278).Value
   Data_UF.Text_obs_6_ini = .Offset(TargetRow, 279).Value
   Data_UF.Text_date_pod_1_ini = .Offset(TargetRow, 280).Value
   Data_UF.Text_date_pod_2_ini = .Offset(TargetRow, 281).Value
   Data_UF.Text_date_pod_3_ini = .Offset(TargetRow, 282).Value
   Data_UF.Text_date_pod_4_ini = .Offset(TargetRow, 283).Value
   Data_UF.Text_date_pod_5_ini = .Offset(TargetRow, 284).Value
   Data_UF.Text_date_pod_6_ini = .Offset(TargetRow, 285).Value
   Data_UF.Text_date_pod_7_ini = .Offset(TargetRow, 286).Value
   Data_UF.Text_date_pod_8_ini = .Offset(TargetRow, 287).Value
   Data_UF.Text_result_podo1_ini = .Offset(TargetRow, 288).Value
   Data_UF.Text_result_podo2_ini = .Offset(TargetRow, 289).Value
   Data_UF.Text_result_podo3_ini = .Offset(TargetRow, 290).Value
   Data_UF.Text_result_podo4_ini = .Offset(TargetRow, 291).Value
   Data_UF.Text_result_podo5_ini = .Offset(TargetRow, 292).Value
   Data_UF.Text_result_podo6_ini = .Offset(TargetRow, 293).Value
   Data_UF.Text_result_podo7_ini = .Offset(TargetRow, 294).Value
   Data_UF.Text_result_podo8_ini = .Offset(TargetRow, 295).Value
   Data_UF.Combo_poignet_ini = .Offset(TargetRow, 296).Value
   Data_UF.Text_com_podo_ini = .Offset(TargetRow, 297).Value
   Data_UF.Combo_CAP_ini = .Offset(TargetRow, 298).Value
   Data_UF.Text_marche_ini = .Offset(TargetRow, 299).Value
   Data_UF.Text_obs_marche_ini = .Offset(TargetRow, 300).Value
   Data_UF.Text_planche_ini = .Offset(TargetRow, 301).Value
   Data_UF.Text_planche_obs_ini = .Offset(TargetRow, 302).Value
   Data_UF.Text_corde_ini = .Offset(TargetRow, 303).Value
   Data_UF.Text_corde_obs_ini = .Offset(TargetRow, 304).Value
   Data_UF.Text_saut_1_ini = .Offset(TargetRow, 305).Value
   Data_UF.Text_saut_2_ini = .Offset(TargetRow, 306).Value
   Data_UF.Text_saut_obs_ini = .Offset(TargetRow, 307).Value
   Data_UF.Text_push_ini = .Offset(TargetRow, 308).Value
   Data_UF.Text_push_obs_ini = .Offset(TargetRow, 309).Value
   Data_UF.Text_chaise_ini = .Offset(TargetRow, 310).Value
   Data_UF.Text_chaise_obs_ini = .Offset(TargetRow, 311).Value
   Data_UF.Text_equi_d1_ini = .Offset(TargetRow, 312).Value
   Data_UF.Text_equi_d2_ini = .Offset(TargetRow, 313).Value
   Data_UF.Text_equi_d3_ini = .Offset(TargetRow, 314).Value
   Data_UF.Combo_45sd_ini = .Offset(TargetRow, 315).Value
   Data_UF.Text_equi_g1_ini = .Offset(TargetRow, 316).Value
   Data_UF.Text_equi_g2_ini = .Offset(TargetRow, 317).Value
   Data_UF.Text_equi_g3_ini = .Offset(TargetRow, 318).Value
   Data_UF.Combo_45sg_ini = .Offset(TargetRow, 319).Value
   Data_UF.Text_equi_obs_ini = .Offset(TargetRow, 320).Value
   Data_UF.Text_stress_pré_ini = .Offset(TargetRow, 321).Value
   Data_UF.Text_stress_act_ini = .Offset(TargetRow, 322).Value
   Data_UF.Text_energie_pre_ini = .Offset(TargetRow, 323).Value
   Data_UF.Text_energie_act_ini = .Offset(TargetRow, 324).Value
   Data_UF.Text_kinap_capacites_ini = .Offset(TargetRow, 325).Value
   Data_UF.Text_kinap_craintes_ini = .Offset(TargetRow, 326).Value
   Data_UF.Text_kinap_tsk_ini = .Offset(TargetRow, 327).Value
   Data_UF.Text_tsk_appr_ini = .Offset(TargetRow, 328).Value
   Data_UF.Text_assisdebout_ini = .Offset(TargetRow, 329).Value
   Data_UF.Text_assisdebout_com_ini = .Offset(TargetRow, 330).Value
   Data_UF.Text_sign_ini = .Offset(TargetRow, 331).Value
   Data_UF.Text_date_eval_fin = .Offset(TargetRow, 332).Value
   Data_UF.Text_taille_fin = .Offset(TargetRow, 333).Value
   Data_UF.Text_poids_fin = .Offset(TargetRow, 334).Value
   Data_UF.Text_ct_fin = .Offset(TargetRow, 335).Value
   Data_UF.Text_com_pds_fin = .Offset(TargetRow, 336).Value
   Data_UF.Text_tas_fin = .Offset(TargetRow, 337).Value
   Data_UF.Text_tad_fin = .Offset(TargetRow, 338).Value
   Data_UF.Text_fc_fin = .Offset(TargetRow, 339).Value
   Data_UF.Text_gly_fin = .Offset(TargetRow, 340).Value
   Data_UF.Text_mg_fin = .Offset(TargetRow, 341).Value
   Data_UF.Text_mm_fin = .Offset(TargetRow, 342).Value
   Data_UF.Text_mh_fin = .Offset(TargetRow, 343).Value
   Data_UF.Text_pg_fin = .Offset(TargetRow, 344).Value
   Data_UF.Text_fr_age_fin = .Offset(TargetRow, 345).Value
   Data_UF.Text_fr_obesite_fin = .Offset(TargetRow, 346).Value
   Data_UF.Combo_fr1_fin = .Offset(TargetRow, 347).Value
   Data_UF.Combo_fr2_fin = .Offset(TargetRow, 348).Value
   Data_UF.Combo_fr3_fin = .Offset(TargetRow, 349).Value
   Data_UF.Combo_fr4_fin = .Offset(TargetRow, 350).Value
   Data_UF.Combo_fr5_fin = .Offset(TargetRow, 351).Value
   Data_UF.Combo_fr6_fin = .Offset(TargetRow, 352).Value
   Data_UF.Combo_fr7_fin = .Offset(TargetRow, 353).Value
   Data_UF.Combo_malconnu1_fin = .Offset(TargetRow, 354).Value
   Data_UF.Combo_malconnu2_fin = .Offset(TargetRow, 355).Value
   Data_UF.Text_passe_sportif_fin = .Offset(TargetRow, 356).Value
   Data_UF.Text_ps1_fin = .Offset(TargetRow, 357).Value
   Data_UF.Text_ps2_fin = .Offset(TargetRow, 358).Value
   Data_UF.Text_ps3_fin = .Offset(TargetRow, 359).Value
   Data_UF.Text_ps4_fin = .Offset(TargetRow, 360).Value
   Data_UF.Text_ps5_fin = .Offset(TargetRow, 361).Value
   Data_UF.Text_ps6_fin = .Offset(TargetRow, 362).Value
   Data_UF.Text_ps7_fin = .Offset(TargetRow, 363).Value
   Data_UF.Text_ps8_fin = .Offset(TargetRow, 364).Value
   Data_UF.Text_ps9_fin = .Offset(TargetRow, 365).Value
   Data_UF.Text_passe_actif_fin = .Offset(TargetRow, 366).Value
   Data_UF.Text_pa1_fin = .Offset(TargetRow, 367).Value
   Data_UF.Text_pa2_fin = .Offset(TargetRow, 368).Value
   Data_UF.Text_pa3_fin = .Offset(TargetRow, 369).Value
   Data_UF.Text_pa4_fin = .Offset(TargetRow, 370).Value
   Data_UF.Text_pa5_fin = .Offset(TargetRow, 371).Value
   Data_UF.Text_pa6_fin = .Offset(TargetRow, 372).Value
   Data_UF.Text_pa7_fin = .Offset(TargetRow, 373).Value
   Data_UF.Text_pa8_fin = .Offset(TargetRow, 374).Value
   Data_UF.Text_pa9_fin = .Offset(TargetRow, 375).Value
   Data_UF.Text_apactuelle_fni = .Offset(TargetRow, 376).Value
   Data_UF.Text_ap1_fin = .Offset(TargetRow, 377).Value
   Data_UF.Text_ap2_fin = .Offset(TargetRow, 378).Value
   Data_UF.Text_ap3_fin = .Offset(TargetRow, 379).Value
   Data_UF.Text_ap4_fin = .Offset(TargetRow, 380).Value
   Data_UF.Text_ap5_fin = .Offset(TargetRow, 381).Value
   Data_UF.Text_ap6_fin = .Offset(TargetRow, 382).Value
   Data_UF.Text_ap7_fin = .Offset(TargetRow, 383).Value
   Data_UF.Text_ap8_fin = .Offset(TargetRow, 384).Value
   Data_UF.Text_ap9_fin = .Offset(TargetRow, 385).Value
   Data_UF.Text_materiel_fin = .Offset(TargetRow, 386).Value
   Data_UF.Text_AP_commentaires_fin = .Offset(TargetRow, 387).Value
   Data_UF.Text_nbrepas_fin = .Offset(TargetRow, 388).Value
   Data_UF.Text_nbcoll_fin = .Offset(TargetRow, 389).Value
   Data_UF.Text_hydra_fin = .Offset(TargetRow, 390).Value
   Data_UF.Text_alcool_fin = .Offset(TargetRow, 391).Value
   Data_UF.Text_cafe_fin = .Offset(TargetRow, 392).Value
   Data_UF.Text_boisson_sucrees_fin = .Offset(TargetRow, 393).Value
   Data_UF.Text_dej_fin = .Offset(TargetRow, 394).Value
   Data_UF.TextBox_diner_fin = .Offset(TargetRow, 395).Value
   Data_UF.Text_souper_fin = .Offset(TargetRow, 396).Value
   Data_UF.Text_alim_comment_fin = .Offset(TargetRow, 397).Value
   Data_UF.Text_alim_remplacement_fin = .Offset(TargetRow, 398).Value
   Data_UF.Text_tabac_fin = .Offset(TargetRow, 399).Value
   Data_UF.Text_stress_pré_fin = .Offset(TargetRow, 400).Value
   Data_UF.Text_stress_act_fin = .Offset(TargetRow, 401).Value
   Data_UF.Text_energie_pre_fin = .Offset(TargetRow, 402).Value
   Data_UF.Text_energie_act_fin = .Offset(TargetRow, 403).Value
   Data_UF.Text_date_leapa_fin = .Offset(TargetRow, 404).Value
   Data_UF.Combo_cardio_fin = .Offset(TargetRow, 405).Value
   Data_UF.Combo_inf_fin = .Offset(TargetRow, 406).Value
   Data_UF.Combo_app_fin = .Offset(TargetRow, 407).Value
   Data_UF.Combo_prot_fin = .Offset(TargetRow, 408).Value
   Data_UF.Text_duree_test_fin = .Offset(TargetRow, 409).Value
   Data_UF.Text_descri_fin = .Offset(TargetRow, 410).Value
   Data_UF.Text_fc_repos_fin = .Offset(TargetRow, 411).Value
   Data_UF.Text_TA_repos_fin = .Offset(TargetRow, 412).Value
   Data_UF.Text_EPE_fin_fin = .Offset(TargetRow, 413).Value
   Data_UF.Text_vit_tapis_max_fin = .Offset(TargetRow, 414).Value
   Data_UF.Text_pente_max_fin = .Offset(TargetRow, 415).Value
   Data_UF.Text_vit_ergo_max_fin = .Offset(TargetRow, 416).Value
   Data_UF.Text_charge_ergo_max_fin = .Offset(TargetRow, 417).Value
   Data_UF.Text_dlr_pre_fin = .Offset(TargetRow, 418).Value
   Data_UF.Text_dlr_post_fin = .Offset(TargetRow, 419).Value
   Data_UF.Text_FCRmin_fin = .Offset(TargetRow, 420).Value
   Data_UF.Text_FCRmax_fin = .Offset(TargetRow, 421).Value
   Data_UF.Combo_rapport_leapa_fin = .Offset(TargetRow, 422).Value
   Data_UF.Text_fc_1_fin = .Offset(TargetRow, 423).Value
   Data_UF.Text_fc_2_fin = .Offset(TargetRow, 424).Value
   Data_UF.Text_fc_3_fin = .Offset(TargetRow, 425).Value
   Data_UF.Text_fc_4_fin = .Offset(TargetRow, 426).Value
   Data_UF.Text_fc_5_fin = .Offset(TargetRow, 427).Value
   Data_UF.Text_fc_6_fin = .Offset(TargetRow, 428).Value
   Data_UF.Text_fc_7_fin = .Offset(TargetRow, 429).Value
   Data_UF.Text_fc_8_fin = .Offset(TargetRow, 430).Value
   Data_UF.Text_fc_9_fin = .Offset(TargetRow, 431).Value
   Data_UF.Text_fc_10_fin = .Offset(TargetRow, 432).Value
   Data_UF.Text_fc_11_fin = .Offset(TargetRow, 433).Value
   Data_UF.Text_fc_12_fin = .Offset(TargetRow, 434).Value
   Data_UF.Text_fc_13_fin = .Offset(TargetRow, 435).Value
   Data_UF.Text_fc_14_fin = .Offset(TargetRow, 436).Value
   Data_UF.Text_fc_15_fin = .Offset(TargetRow, 437).Value
   Data_UF.Text_fc_16_fin = .Offset(TargetRow, 438).Value
  
  
  
  
   Data_UF.Text_TAS1_fin = .Offset(TargetRow, 443).Value
   Data_UF.Text_TAS2_fin = .Offset(TargetRow, 444).Value
   Data_UF.Text_TAS3_fin = .Offset(TargetRow, 445).Value
   Data_UF.Text_TAS4_fin = .Offset(TargetRow, 446).Value
   Data_UF.Text_TAS5_fin = .Offset(TargetRow, 447).Value
   Data_UF.Text_TAS6_fin = .Offset(TargetRow, 448).Value
   Data_UF.Text_TAS7_fin = .Offset(TargetRow, 449).Value
   Data_UF.Text_TAS8_fin = .Offset(TargetRow, 450).Value
  
  
   Data_UF.Text_TAD1_fin = .Offset(TargetRow, 453).Value
   Data_UF.Text_TAD2_fin = .Offset(TargetRow, 454).Value
   Data_UF.Text_TAD3_fin = .Offset(TargetRow, 455).Value
   Data_UF.Text_TAD4_fin = .Offset(TargetRow, 456).Value
   Data_UF.Text_TAD5_fin = .Offset(TargetRow, 457).Value
   Data_UF.Text_TAD6_fin = .Offset(TargetRow, 458).Value
   Data_UF.Text_TAD7_fin = .Offset(TargetRow, 459).Value
   Data_UF.Text_TAD8_fin = .Offset(TargetRow, 460).Value
  
  
   Data_UF.Text_epe1_fin = .Offset(TargetRow, 463).Value
   Data_UF.Text_epe2_fin = .Offset(TargetRow, 464).Value
   Data_UF.Text_epe3_fin = .Offset(TargetRow, 465).Value
   Data_UF.Text_epe4_fin = .Offset(TargetRow, 466).Value
   Data_UF.Text_epe5_fin = .Offset(TargetRow, 467).Value
   Data_UF.Text_epe6_fin = .Offset(TargetRow, 468).Value
   Data_UF.Text_epe7_fin = .Offset(TargetRow, 469).Value
   Data_UF.Text_epe8_fin = .Offset(TargetRow, 470).Value
   Data_UF.Text_epe9_fin = .Offset(TargetRow, 471).Value
   Data_UF.Text_epe10_fin = .Offset(TargetRow, 472).Value
   Data_UF.Text_epe11_fin = .Offset(TargetRow, 473).Value
   Data_UF.Text_epe12_fin = .Offset(TargetRow, 474).Value
   Data_UF.Text_epe13_fin = .Offset(TargetRow, 475).Value
   Data_UF.Text_epe14_fin = .Offset(TargetRow, 476).Value
   Data_UF.Text_epe15_fin = .Offset(TargetRow, 477).Value
   Data_UF.Text_epe16_fin = .Offset(TargetRow, 478).Value
  
  
  
  
   Data_UF.Text_dlr1_fin = .Offset(TargetRow, 483).Value
   Data_UF.Text_dlr2_fin = .Offset(TargetRow, 484).Value
   Data_UF.Text_dlr3_fin = .Offset(TargetRow, 485).Value
   Data_UF.Text_dlr4_fin = .Offset(TargetRow, 486).Value
   Data_UF.Text_dlr5_fin = .Offset(TargetRow, 487).Value
   Data_UF.Text_dlr6_fin = .Offset(TargetRow, 488).Value
   Data_UF.Text_dlr7_fin = .Offset(TargetRow, 489).Value
   Data_UF.Text_dlr8_fin = .Offset(TargetRow, 490).Value
   Data_UF.Text_dlr9_fin = .Offset(TargetRow, 491).Value
   Data_UF.Text_dlr10_fin = .Offset(TargetRow, 492).Value
   Data_UF.Text_dlr11_fin = .Offset(TargetRow, 493).Value
   Data_UF.Text_dlr12_fin = .Offset(TargetRow, 494).Value
   Data_UF.Text_dlr13_fin = .Offset(TargetRow, 495).Value
   Data_UF.Text_dlr14_fin = .Offset(TargetRow, 496).Value
   Data_UF.Text_dlr15_fin = .Offset(TargetRow, 497).Value
   Data_UF.Text_dlr16_fin = .Offset(TargetRow, 498).Value
  
  
  
  
   Data_UF.Text_vit1_fin = .Offset(TargetRow, 503).Value
   Data_UF.Text_vit2_fin = .Offset(TargetRow, 504).Value
   Data_UF.Text_vit3_fin = .Offset(TargetRow, 505).Value
   Data_UF.Text_vit4_fin = .Offset(TargetRow, 506).Value
   Data_UF.Text_vit5_fin = .Offset(TargetRow, 507).Value
   Data_UF.Text_vit6_fin = .Offset(TargetRow, 508).Value
   Data_UF.Text_vit7_fin = .Offset(TargetRow, 509).Value
   Data_UF.Text_vit8_fin = .Offset(TargetRow, 510).Value
   Data_UF.Text_vit9_fin = .Offset(TargetRow, 511).Value
   Data_UF.Text_vit10_fin = .Offset(TargetRow, 512).Value
   Data_UF.Text_vit11_fin = .Offset(TargetRow, 513).Value
   Data_UF.Text_vit12_fin = .Offset(TargetRow, 514).Value
   Data_UF.Text_vit13_fin = .Offset(TargetRow, 515).Value
   Data_UF.Text_vit14_fin = .Offset(TargetRow, 516).Value
   Data_UF.Text_vit15_fin = .Offset(TargetRow, 517).Value
   Data_UF.Text_vit16_fin = .Offset(TargetRow, 518).Value
  
  
  
  
   Data_UF.Text_pente1_fin = .Offset(TargetRow, 523).Value
   Data_UF.Text_pente2_fin = .Offset(TargetRow, 524).Value
   Data_UF.Text_pente3_fin = .Offset(TargetRow, 525).Value
   Data_UF.Text_pente4_fin = .Offset(TargetRow, 526).Value
   Data_UF.Text_pente5_fin = .Offset(TargetRow, 527).Value
   Data_UF.Text_pente6_fin = .Offset(TargetRow, 528).Value
   Data_UF.Text_pente7_fin = .Offset(TargetRow, 529).Value
   Data_UF.Text_pente8_fin = .Offset(TargetRow, 530).Value
   Data_UF.Text_pente9_fin = .Offset(TargetRow, 531).Value
   Data_UF.Text_pente10_fin = .Offset(TargetRow, 532).Value
   Data_UF.Text_pente11_fin = .Offset(TargetRow, 533).Value
   Data_UF.Text_pente12_fin = .Offset(TargetRow, 534).Value
   Data_UF.Text_pente13_fin = .Offset(TargetRow, 535).Value
   Data_UF.Text_pente14_fin = .Offset(TargetRow, 536).Value
   Data_UF.Text_pente15_fin = .Offset(TargetRow, 537).Value
   Data_UF.Text_pente16_fin = .Offset(TargetRow, 538).Value
  
  
  
  
   Data_UF.Text_raison_arret_fin = .Offset(TargetRow, 543).Value
   Data_UF.Text_com_cardio_fin = .Offset(TargetRow, 544).Value
   Data_UF.Text_evol_fc_fin = .Offset(TargetRow, 545).Value
   Data_UF.Text_recup_fin = .Offset(TargetRow, 546).Value
   Data_UF.Text_dlr_text_fin = .Offset(TargetRow, 547).Value
   Data_UF.Text_obs_effort_fin = .Offset(TargetRow, 548).Value
   Data_UF.Text_leapa_text_perso_fin = .Offset(TargetRow, 549).Value
   Data_UF.Combo_CAP_fin = .Offset(TargetRow, 550).Value
   Data_UF.Text_marche_fin = .Offset(TargetRow, 551).Value
   Data_UF.Text_obs_marche_fin = .Offset(TargetRow, 552).Value
   Data_UF.Text_planche_fin = .Offset(TargetRow, 553).Value
   Data_UF.Text_planche_obs_fin = .Offset(TargetRow, 554).Value
   Data_UF.Text_corde_fin = .Offset(TargetRow, 555).Value
   Data_UF.Text_corde_obs_fin = .Offset(TargetRow, 556).Value
   Data_UF.Text_saut_1_fin = .Offset(TargetRow, 557).Value
   Data_UF.Text_saut_2_fin = .Offset(TargetRow, 558).Value
   Data_UF.Text_saut_obs_fin = .Offset(TargetRow, 559).Value
   Data_UF.Text_push_fin = .Offset(TargetRow, 560).Value
   Data_UF.Text_push_obs_fin = .Offset(TargetRow, 561).Value
   Data_UF.Text_chaise_fin = .Offset(TargetRow, 562).Value
   Data_UF.Text_chaise_obs_fin = .Offset(TargetRow, 563).Value
   Data_UF.Text_kinap_capacites_fin = .Offset(TargetRow, 564).Value
   Data_UF.Text_kinap_craintes_fin = .Offset(TargetRow, 565).Value
   Data_UF.Text_kinap_tsk_fin = .Offset(TargetRow, 566).Value
   Data_UF.Text_tsk_appr_fin = .Offset(TargetRow, 567).Value
   Data_UF.Combo_poignet_fin = .Offset(TargetRow, 568).Value
   Data_UF.Text_date_pod_1_fin = .Offset(TargetRow, 569).Value
   Data_UF.Text_date_pod_2_fin = .Offset(TargetRow, 570).Value
   Data_UF.Text_date_pod_3_fin = .Offset(TargetRow, 571).Value
   Data_UF.Text_date_pod_4_fin = .Offset(TargetRow, 572).Value
   Data_UF.Text_date_pod_5_fin = .Offset(TargetRow, 573).Value
   Data_UF.Text_date_pod_6_fin = .Offset(TargetRow, 574).Value
   Data_UF.Text_date_pod_7_fin = .Offset(TargetRow, 575).Value
   Data_UF.Text_date_pod_8_fin = .Offset(TargetRow, 576).Value
   Data_UF.Text_result_podo1_fin = .Offset(TargetRow, 577).Value
   Data_UF.Text_result_podo2_fin = .Offset(TargetRow, 578).Value
   Data_UF.Text_result_podo3_fin = .Offset(TargetRow, 579).Value
   Data_UF.Text_result_podo4_fin = .Offset(TargetRow, 580).Value
   Data_UF.Text_result_podo5_fin = .Offset(TargetRow, 581).Value
   Data_UF.Text_result_podo6_fin = .Offset(TargetRow, 582).Value
   Data_UF.Text_result_podo7_fin = .Offset(TargetRow, 583).Value
   Data_UF.Text_result_podo8_fin = .Offset(TargetRow, 584).Value
   Data_UF.Text_com_podo_fin = .Offset(TargetRow, 585).Value
   Data_UF.Combo_dom_preh_fin = .Offset(TargetRow, 586).Value
   Data_UF.Text_MSG_1_fin = .Offset(TargetRow, 587).Value
   Data_UF.Text_MSG_2_fin = .Offset(TargetRow, 588).Value
   Data_UF.Text_MSG_3_fin = .Offset(TargetRow, 589).Value
   Data_UF.Text_MSD_1_fin = .Offset(TargetRow, 590).Value
   Data_UF.Text_MSD_2_fin = .Offset(TargetRow, 591).Value
   Data_UF.Text_MSD_3_fin = .Offset(TargetRow, 592).Value
   Data_UF.Text_preh_obs_fin = .Offset(TargetRow, 593).Value
   Data_UF.Text_equi_g1_fin = .Offset(TargetRow, 594).Value
   Data_UF.Text_equi_g2_fin = .Offset(TargetRow, 595).Value
   Data_UF.Text_equi_g3_fin = .Offset(TargetRow, 596).Value
   Data_UF.Combo_45sg_fin = .Offset(TargetRow, 597).Value
   Data_UF.Text_equi_d1_fin = .Offset(TargetRow, 598).Value
   Data_UF.Text_equi_d2_fin = .Offset(TargetRow, 599).Value
   Data_UF.Text_equi_d3_fin = .Offset(TargetRow, 600).Value
   Data_UF.Combo_45sd_fin = .Offset(TargetRow, 601).Value
   Data_UF.Text_equi_obs_fin = .Offset(TargetRow, 602).Value
   Data_UF.Text_dlr_6_pre_fin = .Offset(TargetRow, 603).Value
   Data_UF.Text_dlr_6_post_fin = .Offset(TargetRow, 604).Value
   Data_UF.Text_résult_6_fin = .Offset(TargetRow, 605).Value
   Data_UF.Text_obs_6_fin = .Offset(TargetRow, 606).Value
   Data_UF.Text_assisdebout_fin = .Offset(TargetRow, 607).Value
   Data_UF.Text_assisdebout_com_fin = .Offset(TargetRow, 608).Value
   Data_UF.Text_conclu_fin = .Offset(TargetRow, 609).Value
   Data_UF.Text_sign_fin = .Offset(TargetRow, 610).Value
End With







'''End retrieving data from database'''

Data_UF.Caption = "Edit Existing" 'set caption to show that the user is editing
Data_UF.Show 'show the user form with the details loaded in

End Sub
 
Last edited:

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
47,887
Office Version
  1. 365
Platform
  1. Windows
Also where you have consecutive numbered controls you can use this
VBA Code:
Private Sub CommandButton1_Click()

Dim TargetRow As Integer 'variable to save position of this person in database
Dim i As Long
'use Match worksheet function to find position of chosen name
TargetRow = Application.WorksheetFunction.Match(ColumnE_Menu, Sheets("Data").Range("Dyn_Full_Name"), 0)
Sheets("Engine").Range("B5").Value = TargetRow 'save position in the engine, for use later

Unload Find_Entry_UF 'unload the userform to select a name
   
'''Begin retrieving data from database'''
With Sheets("Data").Range("Data_Start")
   Data_UF.Txt_First = .Offset(TargetRow, 1).Value 'first name
   Data_UF.Txt_Surname = .Offset(TargetRow, 2).Value 'surname
  
   Data_UF.Text_Dossier = .Offset(TargetRow, 4).Value '# dossier
   Data_UF.Text_ddn = .Offset(TargetRow, 5).Value 'DDN
   Data_UF.Combo_Gender = .Offset(TargetRow, 6).Value 'Sexe
   Data_UF.Combo_dominance = .Offset(TargetRow, 7).Value 'Dominance
   Data_UF.Text_Kin = .Offset(TargetRow, 8).Value 'Kinésiologue
   Data_UF.Combo_Programme = .Offset(TargetRow, 9).Value 'Programme
   Data_UF.Text_date_eval_ini = .Offset(TargetRow, 10).Value 'Date éval initiale
   Data_UF.Combo_menopause = .Offset(TargetRow, 11).Value 'Ménopause
   Data_UF.Text_taille_ini = .Offset(TargetRow, 12).Value
   Data_UF.Text_poids_ini = .Offset(TargetRow, 13).Value
   Data_UF.Text_ct_ini = .Offset(TargetRow, 14).Value
   Data_UF.Text_com_pds_ini = .Offset(TargetRow, 15).Value
   Data_UF.Text_tas_ini = .Offset(TargetRow, 16).Value
   Data_UF.Text_tad_ini = .Offset(TargetRow, 17).Value
   Data_UF.Text_fc_ini = .Offset(TargetRow, 18).Value
   Data_UF.Text_gly_ini = .Offset(TargetRow, 19).Value
   Data_UF.Text_mg_ini = .Offset(TargetRow, 20).Value
   Data_UF.Text_mm_ini = .Offset(TargetRow, 21).Value
   Data_UF.Text_mh_ini = .Offset(TargetRow, 22).Value
   Data_UF.Text_pg_ini = .Offset(TargetRow, 23).Value
   Data_UF.Text_dx = .Offset(TargetRow, 24).Value
   For i = 1 To 8
      Data_UF.Controls("Txt_condasso" & i) = .Offset(TargetRow, 24 + i)
   Next i
   For i = 1 To 24
      Data_UF.Controls("Text_rx" & i) = .Offset(TargetRow, 32 + i)
   Next i
   Data_UF.Text_fr_age_ini = .Offset(TargetRow, 57).Value
   Data_UF.Text_fr_obesite_ini = .Offset(TargetRow, 58).Value
 
Last edited:

jptaz

New Member
Joined
May 1, 2020
Messages
33
Office Version
  1. 2010
Platform
  1. Windows
Wow Thanks it does work so far!! Would you mind explaining what the << With Sheets("Data").Range("Data_Start") >> does?
And I will use your other tricks to shrink some text.

thank you again






Hi & welcome to MrExcel.
Not sure if this will help, but try
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
47,887
Office Version
  1. 365
Platform
  1. Windows

ADVERTISEMENT

The with statement is just a form of "shorthand", rather than having the Sheets.range on every line of code you put it at the top & then when referring to it you just use a fullstop.
So with this
Rich (BB code):
With Sheets("Data").Range("Data_Start")
   Data_UF.Txt_First = .Offset(TargetRow, 1).Value 'first name
the part in blue is "with" the sheets.range because it starts with a full stop.
Hope that makes sense.
 

jptaz

New Member
Joined
May 1, 2020
Messages
33
Office Version
  1. 2010
Platform
  1. Windows
The with statement is just a form of "shorthand", rather than having the Sheets.range on every line of code you put it at the top & then when referring to it you just use a fullstop.
So with this
Rich (BB code):
With Sheets("Data").Range("Data_Start")
   Data_UF.Txt_First = .Offset(TargetRow, 1).Value 'first name
the part in blue is "with" the sheets.range because it starts with a full stop.
Hope that makes sense.
Yes I understand, it makes lots of sense

Thank you
 

Fluff

MrExcel MVP, Moderator
Joined
Jun 12, 2014
Messages
47,887
Office Version
  1. 365
Platform
  1. Windows
You're welcome & thanks for the feedback.
 

Watch MrExcel Video

Forum statistics

Threads
1,112,771
Messages
5,542,433
Members
410,551
Latest member
Ali3ta1r
Top