Discussion :

[CHARLI BONGO]

Salut à tous , merci pour votre aide considérable sur ce forum.
J'aimerais savoir comment est-ce que on peut séparer un code trop long en deux parties ( Le code est une requête SQL ) . Le voici :

Code :

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

Sql =  Sql & " SELECT tab_agr_suivi.id_microprojet, tab_agr_suivi_avancement.travaux_demarre, tab_agr_suivi_avancement.date_demarrage, tab_agr_suivi_avancement.situation, tab_agr_suivi_avancement.niveau_excution, tab_agr_suivi_avancement.chantier_abandon, tab_agr_suivi_avancement.raison_abandon, tab_agr_suivi_avancement.suivi_tech, tab_agr_suivi_avancement.nbre_visite_tech, tab_agr_suivi_avancement.qualite_travaux, tab_agr_suivi_avancement.cahier_chantier, tab_agr_suivi_avancement.utilisation_cahier, tab_agr_suivi_avancement.mesure_cges, tab_agr_suivi_avancement.observt_cges, tab_agr_suivi_avancement.recpt_provisoire, tab_agr_suivi_avancement.date_recept_pro, tab_agr_suivi_avancement.auto_evaluation, tab_agr_suivi_avancement.date_auto_evaluation, tab_agr_suivi_avancement.recept_definitive, tab_agr_suivi_avancement.date_recept_definitive, tab_agr_suivi_avancement.observations, tab_agr_suivi.mois_suivi, tab_agr_suivi.date_visite, tab_agr_suivi.renseigner_par, tab_dossier.Région, tab_dossier.Préfecture, tab_dossier.Canton, tab_dossier.village, tab_dossier.Nature "

Code trop long dons n'entre pas dans l'éditeur de VBA

D'avance merci pour votre aide

[Shanur]

Essayez ceci :

Code :

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

1
2
3
4
5
6
7
8
9
SQL = SQL & " SELECT tab_agr_suivi.id_microprojet, tab_agr_suivi_avancement.travaux_demarre, tab_agr_suivi_avancement.date_demarrage, " & _
            "tab_agr_suivi_avancement.situation , tab_agr_suivi_avancement.niveau_excution, tab_agr_suivi_avancement.chantier_abandon, " & _
            "tab_agr_suivi_avancement.raison_abandon, tab_agr_suivi_avancement.suivi_tech, tab_agr_suivi_avancement.nbre_visite_tech, " & _
            "tab_agr_suivi_avancement.qualite_travaux, tab_agr_suivi_avancement.cahier_chantier, tab_agr_suivi_avancement.utilisation_cahier, " & _
            "tab_agr_suivi_avancement.mesure_cges, tab_agr_suivi_avancement.observt_cges, tab_agr_suivi_avancement.recpt_provisoire, " & _
            "tab_agr_suivi_avancement.date_recept_pro, tab_agr_suivi_avancement.auto_evaluation, tab_agr_suivi_avancement.date_auto_evaluation, " & _
            "tab_agr_suivi_avancement.recept_definitive, tab_agr_suivi_avancement.date_recept_definitive, tab_agr_suivi_avancement.observations, " & _
            "tab_agr_suivi.mois_suivi, tab_agr_suivi.date_visite, tab_agr_suivi.renseigner_par, tab_dossier.Région, tab_dossier.Préfecture, " & _
            "tab_dossier.Canton, tab_dossier.village, tab_dossier.Nature "

[CHARLI BONGO]

ça marche .

Merci pour tout .

Bye