Serait-il possible avant d'exporter les données d'inclure une condition et dans ce cas là effectuer telle façon d'exporter en fonction d'une ou plusieurs données sur la ligne sélectionnée?
Par exemple
' SI
Me.ListVACATAIRES.Column(2, NumLigne) = Monsieur alors effectue cette facon d'exporter
Me.ListVACATAIRES.Column(2, NumLigne)= Madame effectue cette facon d'exporter
SiMe.ListVACATAIRES.Column(2, NumLigne) = Mademoiselle telle facon ect
'Pour un Monsieur:
exporter "Sans titre - Bloc-notes", Me.ListVACATAIRES.Column(1, NumLigne) & ";" & Me.ListVACATAIRES.Column(2, NumLigne) & "," & Me.ListVACATAIRES.Column(4, NumLigne) _
" & ";" & Me.ListVACATAIRES.Column(26, NumLigne) & ";" & Format(Me.ListVACATAIRES.Column(29, NumLigne), "dd/mm/yyyy") & "210" & ";" & Me.ListVACATAIRES.Column(31, NumLigne)
'Pour une Madame:
exporter "Sans titre - Bloc-notes", Me.ListVACATAIRES.Column(1, NumLigne) & ";" & Me.ListVACATAIRES.Column(2, NumLigne) & "," & Me.ListVACATAIRES.Column(4, NumLigne) _
& ";" & "2" & ";" & Me.ListVACATAIRES.Column(27, NumLigne) & ";" & Format(Me.ListVACATAIRES.Column(29, NumLigne), "dd/mm/yyyy") & "210" & ";" & Me.ListVACATAIRES.Column(31, NumLigne)
'Pour une demoiselle:
exporter "Sans titre - Bloc-notes", Me.ListVACATAIRES.Column(1, NumLigne) & ";" & Me.ListVACATAIRES.Column(2, NumLigne) & "," & Me.ListVACATAIRES.Column(4, NumLigne) _
& ";" & "3" & ";" & Me.ListVACATAIRES.Column(27, NumLigne) & ";" & Format(Me.ListVACATAIRES.Column(29, NumLigne), "dd/mm/yyyy") & "210" & ";" & Me.ListVACATAIRES.Column(31, NumLigne)