Jeu de carte Solitaire

[David Aubert]

Titre de l'application et lien de téléchargement : Jeu de carte Solitaire

Auteur : Pedro Wave

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.

 

[usul]

Re : Jeu de carte Solitaire

Bonjour
j'ai un message d'erreur (excel 2007) :
"erreur d’exécution 1004 impossible de définir la propriété Formula de la classe Picture"

 

[pedrowave]

Re : Jeu de carte Solitaire

Bonjour usul, dans la fonction esExcel2003, essayez de changer la valeur de la version 12 à 14

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