Creer un fonction ?
Fermé
loulou68
-
8 juin 2008 à 21:13
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 10 juin 2008 à 14:55
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 - 10 juin 2008 à 14:55
A voir également:
- Creer un fonction ?
- Créer un compte google - Guide
- Créer un compte gmail - Guide
- Comment créer un groupe whatsapp - Guide
- Fonction si et - Guide
- Créer un compte instagram sur google - Guide
3 réponses
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 juin 2008 à 01:05
9 juin 2008 à 01:05
Bonsoir,
Mettre un titre plus explicite te permettrais d'avoir une r"ponse plus rapidement.
Avec quel logiciel ?
Avec formule ou VBA ?
Explique mieux ce que tu ceux faire parce que j'ai rien compris.
A+
Mettre un titre plus explicite te permettrais d'avoir une r"ponse plus rapidement.
Avec quel logiciel ?
Avec formule ou VBA ?
Explique mieux ce que tu ceux faire parce que j'ai rien compris.
A+
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 juin 2008 à 16:53
9 juin 2008 à 16:53
Pour avoir la date..
L'emplacement où mettre les données dans Word (Je connais pas bien ce VBA)
Dans Excell
par formule dans une feuille
EDIT:
J'ai oublié de dire..
Après avoir rentrer la formule il faut remettre le format de la cellule en standard.
L'emplacement où mettre les données dans Word (Je connais pas bien ce VBA)
Dans Excell
par formule dans une feuille
=AUJOURDHUI()-DATEVAL("01/01/" & ANNEE(AUJOURDHUI()))+1
EDIT:
J'ai oublié de dire..
Après avoir rentrer la formule il faut remettre le format de la cellule en standard.
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
9 juin 2008 à 18:06
9 juin 2008 à 18:06
Bon, j'ai regardé pour word, comme je connais quand même VBA j'ai pas eu difficile.
tu ouvre Word >> Ctrl+F11
A gauche tu a l'explorateur de document, document "Normal" ,double clic sur ThisDocument
dans la fenêtre qui s'ouvre tu copie la macro...
Chaque fois que tu ouvre un nouveau document la date et le N° du jour s'inscrirot.
A toi d'ajuster les emplacements.
A+
tu ouvre Word >> Ctrl+F11
A gauche tu a l'explorateur de document, document "Normal" ,double clic sur ThisDocument
dans la fenêtre qui s'ouvre tu copie la macro...
Private Sub Document_New()
Selection.TypeText Text:=vbTab & vbTab & vbTab & vbTab & Date
Selection.TypeParagraph
Selection.TypeText Text:=vbTab & vbTab & vbTab & vbTab _
& "Jour N° " & DatePart("y", Date)
Selection.TypeParagraph
End Sub
Chaque fois que tu ouvre un nouveau document la date et le N° du jour s'inscrirot.
A toi d'ajuster les emplacements.
A+
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
>
loulou68
10 juin 2008 à 02:24
10 juin 2008 à 02:24
Comment si ca marche !!!! bien sûr que ca marche... :-DDD
louloul68
Messages postés
1
Date d'inscription
mardi 10 juin 2008
Statut
Membre
Dernière intervention
10 juin 2008
>
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
10 juin 2008 à 14:45
10 juin 2008 à 14:45
Bonjour,
Desolé mais ca ne marche pas ou c'est moi qui quelque chose de mal.
Lors de la saisi de la procedure,
Private Sub Document_New()
Selection.TypeText Text:=vbTab & vbTab & vbTab & vbTab & Date
Selection.TypeParagraph
Selection.TypeText Text:=vbTab & vbTab & vbTab & vbTab _
& "Jour N° " & DatePart("y", Date) (fonction erroné)
Selection.TypeParagraph
End Sub
Et par contre le ctrl+F11 ne marche pas, est ce la version d'office qui est pourri ?
Desolé mais ca ne marche pas ou c'est moi qui quelque chose de mal.
Lors de la saisi de la procedure,
Private Sub Document_New()
Selection.TypeText Text:=vbTab & vbTab & vbTab & vbTab & Date
Selection.TypeParagraph
Selection.TypeText Text:=vbTab & vbTab & vbTab & vbTab _
& "Jour N° " & DatePart("y", Date) (fonction erroné)
Selection.TypeParagraph
End Sub
Et par contre le ctrl+F11 ne marche pas, est ce la version d'office qui est pourri ?
lermite222
Messages postés
8724
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 190
>
louloul68
Messages postés
1
Date d'inscription
mardi 10 juin 2008
Statut
Membre
Dernière intervention
10 juin 2008
10 juin 2008 à 14:55
10 juin 2008 à 14:55
J'ai fait une erreur, c'est Alt+F11 !!
Je revoi l'erreur et je revient, mais chez moi ca allais, quel Version ? quel langue Francais/Anglais ?
Je revoi l'erreur et je revient, mais chez moi ca allais, quel Version ? quel langue Francais/Anglais ?
9 juin 2008 à 15:07
Je m'explique : J'ai un fichier excel et word et j'aimerai que la date et le quantieme de jour s'affiche automatiquement lors de l'ouverture quotidien du fichier sans que j'ai besoin de la saisir manuellement.
Cordialement