OVH Cloud OVH Cloud

compteur a l ouverture

8 réponses
Avatar
P0MM3
Je veux faire un compteur automatique pour gerer mes factures.

Merci

8 réponses

Avatar
jps
bonjour pomm3
va voir sur excelabo : tu y trouveras plein d'exemples
jps

"P0MM3" a écrit dans le message de news:

Je veux faire un compteur automatique pour gerer mes factures.

Merci


Avatar
Clément Marcotte
Si tu ne trouves pas sur Excelabo, il y a la FAQ.


"P0MM3" a écrit dans le message de news:

Je veux faire un compteur automatique pour gerer mes factures.

Merci


Avatar
Clément Marcotte
L'adresse de la FAQ est dans une réponse de Daniel J un peu plus haut/bas.


"Clément Marcotte" a écrit dans le message
de news:
Si tu ne trouves pas sur Excelabo, il y a la FAQ.


"P0MM3" a écrit dans le message de news:

Je veux faire un compteur automatique pour gerer mes factures.

Merci






Avatar
jps
piqué dans le "basket" de jacqouille, quelques adresses intéressantes :

http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

jps

"Clément Marcotte" a écrit dans le message
de news:
L'adresse de la FAQ est dans une réponse de Daniel J un peu plus haut/bas.


"Clément Marcotte" a écrit dans le message
de news:
Si tu ne trouves pas sur Excelabo, il y a la FAQ.


"P0MM3" a écrit dans le message de
news:
Je veux faire un compteur automatique pour gerer mes factures.

Merci










Avatar
JB
Bonjour,

http://cjoint.com/?fChqpJbqUR

Incrémente un numéro de facture:

-Le compteur se trouve dans un onglet Compteur: 2006-04-007

-La macro affecte un numéro à la sauvegarde et incrémente le
compteur de 1
-Le compteur est remis à 1 chaque mois
-Le classeur est enregistré avec le nom Facturexxxx
-Le bouton est caché après exécution pour que la macro ne puisse pas
être exécutée 2 fois

Private Sub b_sauve_Click()
compteur = Sheets("compteur").Range("a1")
If Val(Mid(compteur, 6, 2)) = Month(Date) Then
Sheets("compteur").Range("a1") = Left(compteur, 8) &
Format(Val(Right(compteur, 3)) + 1, "000")
Else
Sheets("compteur").Range("a1") = Left(compteur, 5) &
Format(Month(Date), "00") & "-001"
End If
ActiveWorkbook.Save ' sauvegarde modèle
Me.b_sauve.Visible = False
Range("E1") = Sheets("compteur").Range("a1")
Range("E1").Interior.ColorIndex = 4
ActiveWorkbook.SaveAs Filename:="Facture" &
Sheets("compteur").Range("a1")
End Sub

Cordialement JB
Avatar
Fredo P
"jps" a écrit dans le message de news:
O50Zr$
piqué dans le "basket" de jacqouille, quelques adresses intéressantes :

http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

tain! ça me donne une pensée vers Monique


Avatar
Fredo P
Bienvenue sur mpfe :-))

Parmi les sites proposés dans ce message d'a accueil, tu trouveras
une page complète consacrée aux problèmes de protection sur disciplus.

Je commence en te donnant la liste des sites dédiés à Excel, réalisés
par des mpfie(ne)s et que nous devons tous avoir dans nos favoris (la
date d'une mise à jour est signalée par ** ** )
http://dj.joss.free.fr/faq.htm ** 18/09/01 **
la FAQ du forum, mise en oeuvre par Daniel et à lire absolument par tout
nouveau sur mpfe : la bonne manière de participer au forum (charte,
souriettes, abréviations...), liens, bibliographie, les réponses aux
questions le plus souvent posées, des trucs et astuces, un moteur de
recherche interne et externe (Yahoo)
http://disciplus.simplex.free.fr/ ** 25/09/01 **
le site humoro-ludique de Misange : une importante rubrique "Trucs et
astuces", un glossaire, des jeux en VBA... et un méta-moteur de
recherche sur 5 sites de cette liste, mais aussi tout ce qui fait
"l'esprit mpfe" (les perles, les gifs...
et les photos des souper / dîner sur http://fotoflo.free.fr/)
http://longre.free.fr/
le site de Laurent, notre Grand Chef à Quatre Plumes : de très nombreux
liens commentés, les macros pointues de Laurent... (techniques de
programmation, calculs de dates et d'heures, Api...)
http://jacxl.free.fr/mpfe/ ** 26/08/01 **
le site de : les graphiques, la bourse, le Web, un cours VBA... et
le trombinoscope
... et là http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_aide
un moteur de recherche
http://ericrenaud.free.fr/index.html ** 13/08/01 **
le site d'Eric : particulièrement destiné aux débutants
http://perso.wanadoo.fr/frederic.sigonneau ** 26/08/01**
le site de Frédéric : gestions de temps, VBA pour Excel
http://touareg.citeweb.net/ ** 01/08/01 **
le site de Stéphane : cours VBA, Excel 4 (ou 5) et Excel 97/2000...
http://perso.club-internet.fr/bdafonse
le site de Bruno : formules, classeurs à télécharger...
http://www.chez.com/cherbe ** 25/03/01 **
le site de Christian : initiation à Excel, initiation à VBA, Excel
avancé
sans VBA...
http://www.ilyapa.net/excel/
le site de Pascal : procédures VBA, composants par l'exemple,
calendriers,
jeux
http://intendant.free.fr/ ** 28/08/01 **
le site de Thierry : cours VBA (début et perfectionnement), graphique,
Excel en bureautique...
http://www.polykromy.com/ ** 03/09/01 **
le site de Gaëtan : cours sur Excel sans VBA, les couleurs...
http://www.excel-downloads.com ** 08/10/01 **
le site de David, des programmes Excel à télécharger
http://www.anthony-penel.fr.st
le site d'Anthony : des macros appliquées à la finance
http://www.ibelgique.com/OfficeAssistant ** 08/08/01 **
le site de Bureauticien : nombreux exemples résolus par VBA,
fonctions...
http://cathyastuce.multimania.com
le site de Cathy : cours Excel avec ou sans VBA...

Tu y trouveras des réponses à certaines de tes questions ou des pistes
de recherche pour tes premiers essais.

Pour une collection très fouillée d'adresses (avec commentaires) :
le classeur de Clément M, à télécharger sur disciplus
Favoris.xls
Et un lien à y ajouter, la liste des constantes intrinsèques de VBA avec
leur valeur numérique (par versions d'Excel) :
http://support.microsoft.com/support/kb/articles/Q112/6/71.ASP
télécharger: wc0993.exe

Pour le passage de Excel 4 à Excel 97, un lien proposé par Geo
http://www.microsoft.com/FRANCE/officedev/infotech/info.asp?mar=/FRANCE/
offi
cedev/infotech/MacroXLtoVBA.html
Le lien tient sur plusieurs lignes, il se termine par html

Pour apprendre vite, voilà 5 bons trucs :
- utiliser souvent l'enregistreur de macro et analyser le code obtenu
- utiliser la touche F1 pour appeler l'aide (à propos du mot-clef, en
VBA, sur lequel se trouve le curseur)
- tester et essayer de comprendre des réponses faites à d'autres
- consulter souvent les sites renseignés
- ne jamais hésiter à poser des questions sur le forum

Enfin, pour retrouver d'anciens messages, tu peux aller sur
http://groups.google.com/advanced_group_search
avec les conseils de Clément M pour obtenir les meilleurs résultats :
--- Là, il y a un écran "bilingue" qui permet de faire une recherche
plus ou moins pointue, selon les informations dont l'on dispose.
Une fois que l'on a repéré un message, il est possible de récupérer
l'ensemble de la ficelle, en cliquant sur "Voyez Fil de Discussion (x
articles)".

Je me suis aperçu que Google fonctionnait très mal quand on fait une
recherche avec un nom qui contient des accents. Il semble donc
préférable d'utiliser l'adresse électronique comme nom d'auteur.
Auteur => 3.450 messages
Auteur Clément Marcotte => 1 message
Auteur Clément_Marcotte => 0 message ---

Bonne lecture et à bientôt sur mpfe.

--
Amicalement,
Monique
http://users.skynet.be/osga , pour les amateurs d'athlétisme



"patrick.schaefer" a écrit dans le
message news: 02a901c157c1$e81bdf90$
Je veux empêcher le clic dans une cellule protégée.

Je positionne la propriété EnableSelection d'une feuille
de calcul à la valeur "UnlockedCells". Lorsque lafeuille
est protégée, il est impossible de cliquer dans une
cellule protégée ==> ok

Mais ... je ne parviens pas à sauvegarder cette
modification et quoi que je fasse, la propriété est
revenue à sa valeur par défaut lorsque je rouvre la
feuille.








Avatar
jps
bonne idée, fredo, d'avoir repris le message de bienvenue de monique dont
seuls nos copains belges (et encore pas tous) ont des nouvelles....
jps

"Fredo P" a écrit dans le message de news:


"jps" a écrit dans le message de news:
O50Zr$
piqué dans le "basket" de jacqouille, quelques adresses intéressantes :

http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

tain! ça me donne une pensée vers Monique