Re
Le bouton VALIDER est en effet une macro.
Fais ALT F11 pour voir le code qui est dans un module. C'est celui-ci
Sub valider()
For i = 1 To Sheets.Count 'boucle sur toutes les feuilles
If Sheets(i).Name = Range("C8") & "_" & Range("c9") Then 'si une feuille est nommée comme la cellule C8 et C9, alors
'on envoie un message d'erreur
MsgBox "Une feuille contenant ce nom a déjà été archivée." _
& vbCrLf & "Veuillez supprimer la feuille archivée avant de valider celle-ci.", _
vbCritical, "ExcelPratique dit:"
Exit Sub
End If
Next i 'suite de la boucle
'On copie la feuille pour la mettre en dernière position
ActiveSheet.Copy after:=Sheets(Sheets.Count)
' On renomme la feuille avec le nom et le prénom de la personne
Sheets(Sheets.Count).Name = Range("C8") & "_" & Range("c9")
End Sub
J'ai pas de solutions pour le reste de ta question
Euhh, bah dans ce cas, je n'en ai pas non plus.
-- 08 Mai 2011, 10:46 --
Bon, j'ai compris.
NVN = Nice Varsovie Nice
NAN = Nice Algesiras Nice
Vois le fichier en retour. Cependant, je pense un peu comme Amadeus: Ca m'étonnerais qu'on ne t'ai pas donné de cours la dessus. En tout cas, je pense qu'on a au moins du te donner la correspondance des code NVN et NAN. Ca m'aurais évité de cherché comme un abruti.
J'ai modifié la bdd au niveau des calendriers. Comment se compliquer la tâche! Je ne comprends pas l'utilité de mettre 3 calendriers. Si ça ne doit pas être modifiable, la formule devient très compliqué: