Club d"Epargne "Levées"

eriiic

XLDnaute Barbatruc

• 25 Octobre 2011

• #2

Re : Club d"Epargne "Levées"

Bonjour,

le tableau a 20 colonnes sur 25 lignes : ça fait 500 casiers ça
Le mieux est de joindre le fichier qu'on voit comment il est construit exactement.
eric

 

Vote positif 0 Vote négatif

S

sleb

XLDnaute Nouveau

• 25 Octobre 2011

• #3

Re : Club d"Epargne "Levées"

J'ai attaché une feuille d'un fichier

 

Vote positif 0 Vote négatif

mutzik

XLDnaute Barbatruc

• 25 Octobre 2011

• #4

Re : Club d"Epargne "Levées"

bonjour,

j'étais trésorier d'un club d'épargne (il y a quelques années, maintenant)
nos levées se faisaient sur papier (2 en fait)
puis chacun calculait le total manuellement (cela fait du bien aux neurones, en plus)
si tout le monde était ok, on signait
un exemplaire restait chez le président et un chez le trésorier (cela exclut toute fraude)
tranquillement chez moi je mettais le tout sur l'ordi
à la fin, je ramenais tous les résultats et nous n'avions jamais de prob ...

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 25 Octobre 2011

• #5

Re : Club d"Epargne "Levées"

Re,

Code à mettre dans la feuille :

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target = [B1] And IsNumeric([B1]) Then
        If [B1] > 0 And [B1] <= 250 Then
            Cells(([B1] - 1) Mod 25 + 3, Int([B1] / 25) * 3 + 2).Select
        End If
    End If
End Sub

Le n° de casier est attendu en B1

eric

edit: ou bien, à la place de la sélection de la cellule, on peut ajouter un inputbox pour la saisie de la somme

 

Dernière édition: 25 Octobre 2011

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 25 Octobre 2011

• #6

Re : Club d"Epargne "Levées"

bonjour à tous

Vois en Feuil1 une procedure de remplissage avec laquelle seuls les nombres sont à saisir
si tu souhaites ensuite un report sur une feuille de totalsation reviens avec un fichier exemple
NB commencer en C1 le N° du casier à remplir

 

Pièces jointes

• Base des données(avec macro).xlsm

  35.2 KB · Affichages: 70
• Base des données(avec macro).xlsm

  35.2 KB · Affichages: 95
• Base des données(avec macro).xlsm

  35.2 KB · Affichages: 84

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 25 Octobre 2011

• #7

Re : Club d"Epargne "Levées"

Bonjour pierrejean,

pierrejean à dit:

bonjour à tous

Vois en Feuil1 une procedure de remplissage avec laquelle seuls les nombres sont à saisir
si tu souhaites ensuite un report sur une feuille de totalsation reviens avec un fichier exemple
NB commencer en C1 le N° du casier à remplir

Cliquez pour agrandir...

Il y a un pb sur ta proposition, il ne faut pas qu'une somme soit égale à un n° de casier...
eric

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 25 Octobre 2011

• #8

Re : Club d"Epargne "Levées"

Merci Eric

version corrigée

 

Pièces jointes

• Base des données(avec macro).xlsm

  35.8 KB · Affichages: 87
• Base des données(avec macro).xlsm

  35.8 KB · Affichages: 79
• Base des données(avec macro).xlsm

  35.8 KB · Affichages: 86

Vote positif 0 Vote négatif

S

sleb

XLDnaute Nouveau

• 25 Octobre 2011

• #9

Re : Club d"Epargne "Levées"

A pierrejean de la part de sleb c'est formidable, ça fonctionne très bien. Je suis un débutant il faudrait que tu m'explique un jour comment ça fonctionne.
Salutations avec tous mes remerciements sleb

 

Dernière édition: 25 Octobre 2011

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 25 Octobre 2011

• #10

Re : Club d"Epargne "Levées"

Re

Tu es sur que cest en C1 ?

 

Vote positif 0 Vote négatif

S

sleb

XLDnaute Nouveau

• 25 Octobre 2011

• #11

Re : Club d"Epargne "Levées"

ça fonctionne, j'ai changé ma réponse d'avant(à voir). Merci beaucoup sleb

 

Vote positif 0 Vote négatif

S

sleb

XLDnaute Nouveau

• 25 Octobre 2011

• #12

Re : Club d"Epargne "Levées"

De la part de sleb à pierrejean, je suis admiratif par le résultat et la rapidité avec lequel tu l'as fait. J'ai essayé de comprendre mais je n'y arrive pas. Merci encore

 

Vote positif 0 Vote négatif

S

sleb

XLDnaute Nouveau

• 28 Octobre 2011

• #13

Améliorer tableau Club d"Epargne "Levées"

Bonjour à tous, qui peux m'aider à améliorer le programme que j'ai créé grâce à pierrejean. Dans le fichier ci-joint; feuille "Casiers PC", cellule C1, je rentre le N° du casier puis la somme, ça fonctionne.
Je voudrais que quelqu'un me fasse les modifications suivantes:
-1) Que les sommes s'inscrivent également dans les cellules de la colonne E (novembre) de la feuille "versements".
-2) Que ces sommes restent définitivements, même après avoir effacé les sommes dans le tableau de la feuille "Casiers PC" que nous allons réutiliser le mois suivant.
-3) A la prochaine levée (décembre), il faut qu'elles s'inscrivent dans la colonne F de la feuille "Versements"
Merci

 

Pièces jointes

• Base des données(Forum).xlsm

  160.3 KB · Affichages: 81
• Base des données(Forum).xlsm

  160.3 KB · Affichages: 83
• Base des données(Forum).xlsm

  160.3 KB · Affichages: 91

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 28 Octobre 2011

• #14

Re : Club d"Epargne "Levées"

Re

Vois si cela te convient
Attention: J'ai supposé que la saisie est faite le mois precedent du versement .S'il en est autrement me le signaler
L'effacement d'une valeur ne modifie pas la feuille versement (pour annuler passer à 0)

 

Pièces jointes

• Base des données(Forum).xlsm

  157 KB · Affichages: 136
• Base des données(Forum).xlsm

  157 KB · Affichages: 153
• Base des données(Forum).xlsm

  157 KB · Affichages: 146

Vote positif 0 Vote négatif

S

sleb

XLDnaute Nouveau

• 28 Octobre 2011

• #15

Re : Club d"Epargne "Levées"

Heureux de pouvoir te lire. La saisie se fait le 2ème vendredi du mois. C'est à dire le 11 novembre, pour le mois de novembre. Le 9 décembre pour le mois de décembre etc..

 

Vote positif 0 Vote négatif