\documentclass[a4paper]{article}
\usepackage[utf8x]{inputenc}
\usepackage[T1]{fontenc}

%\usepackage[french]{babel} 1 [1]

%\usepackage[babel=true,kerning=true]{microtype} 2 [2]
\usepackage[francais,bloc,pdfform,completemulti]{automultiplechoice}
\usepackage{csvsimple}
\newcommand{\sujet}{%
\exemplaire{1}{%
\AMCassociation{\etu}

%\shorthandon{;} 3 [3]
%%% debut de l’en-tête des copies :
\noindent{\bf QCM \hfill TEST}
\vspace*{.5cm}
\begin{minipage}{.4\linewidth}
\centering\large\bf Histoire et géographie\\ Examen du 01/01/2008
\end{minipage}
\champnom{\fbox{\begin{minipage}{.5\linewidth}
\nom{} \prenom{}
\vspace*{.5cm}\dotfill
\vspace*{1mm}
\end{minipage}}}
%%% fin de l’en-tête
\begin{center}
\hrule\vspace{2mm}
\bf\Large Géographie
\vspace{1mm}\hrule
\end{center}
\restituegroupe{geographie}
\begin{center}
\hrule\vspace{2mm}
\bf\Large Histoire
\vspace{2mm}\hrule
\end{center}
\restituegroupe{histoire}
}%fin commande \exemplaire
}%fin commande \newcommand
\begin{document}
%%% préparation des groupes
\setdefaultgroupmode{withreplacement}

\element{geographie}{
\begin{question}{Paris}
Dans quel continent se situe Paris~?
\begin{reponses}
\bonne{L’Europe}
\mauvaise{L’Afrique}
\mauvaise{L’Asie}
\mauvaise{La planète Mars}
\end{reponses}
\end{question}
}
\element{geographie}{
\begin{question}{Cameroun}
Quelle est la capitale du Cameroun~?
\begin{reponses}
\bonne{Yaoundé}
\mauvaise{Douala}
\mauvaise{Abou-Dabi}
\end{reponses}
\end{question}
}
\element{histoire}{
\begin{question}{Marignan}
En quelle année a eu lieu la bataille de Marignan~?
\begin{reponseshoriz}
\bonne{1515}
\mauvaise{1915}
\mauvaise{1519}
\end{reponseshoriz}
\end{question}
}
\element{histoire}{
\begin{questionmult}{Nantes}
Que peut-on dire de l’Édit de Nantes~?
\begin{reponses}
\bonne{Il a été signé en 1598}
\bonne{Il a été définitivement révoqué par Louis XIV}
\mauvaise{Il a été signé par Henri II}
\end{reponses}
\end{questionmult}
}
%%génération des sujets

\csvreader[head to column names]{liste-etu2.csv}{}{\sujet}

%\shorthandoff{;} 5 [3]

%\csvreader[head to column names,separator=semicolon]{liste.csv}{}{\sujet} 6 [5]
\end{document}