Description :
La plus courante patience solitaire se pratique avec un jeu de 52 cartes que l'on prépare en sept colonnes de tailles décroissantes.
But du jeu: Reconstituer 4 piles de cartes dans chacune des couleurs, de l'As au Roi.
Bonjour usul, dans la fonction esExcel2003, essayez de changer la valeur de la version 12 à 14
Code:
Function esExcel2003() As Boolean
Dim arrVersion As Variant
arrVersion = Split(Application.Version, ".")
If arrVersion(0) < 14 Then
esExcel2003 = True
Else
esExcel2003 = False
End If
End Function