ActiveCell et Text(Today) incompatibles

Résolu/Fermé

touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 - Modifié le 4 avril 2020 à 09:36
touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 - 4 avril 2020 à 11:25

Bonjour le forum !

Je n'arrive pas à comprendre pourquoi Excel m'insulte par "Sub ou fonction non définie" avec ma formule concaténée :

ActiveCell.FormulaR1C1 = ActiveCell.Offset(0, 2) & "_" & Text(TODAY(), mmmm) & "_" & Year(TODAY())

Alors que les deux formules utilisées séparément fonctionnent ...

Une idée de mon erreur ?
Merci par avance !

A voir également:

ActiveCell et Text(Today) incompatibles
Ai text classifier - Accueil - Guide Intelligence artificielle
Text to image canva - Accueil - Outils
Texte argumentatif sur les avantages et les inconvénients du téléphone portable ✓ - Forum Mobile
Sublime text en francais ✓ - Forum Logiciels
Text wrangler - Télécharger - Traitement de texte

3 réponses

Réponse 1 / 3

yg_be Messages postés 23405 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 décembre 2024 Ambassadeur 1 557
4 avril 2020 à 11:15

bonjour, Excel réagit ainsi parce que tu l'insultes en lui fournissant un code totalement erroné.

peux-tu montrer ton code VBA fonctionnant bien avec les deux formules séparées?
merci d'utiliser les balises de code: https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code

Réponse 2 / 3

touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 16
4 avril 2020 à 11:18

Bonjour yg_be

J'ai fini par m'en sortir (à l'instant !) en remplaçant le 2ème membre par :

& Format(Date, "yyyy")

Soit :

ActiveCell.FormulaR1C1 = ActiveCell.Offset(0, 2) & Format(Date, "yyyy")

Reste que je n'ai pas saisi pourquoi le premier code était rejeté.
En séparé ça donnait :

ActiveCell.FormulaR1C1 = ActiveCell.Offset(0, 2)& "_"

Text(TODAY(), mmmm) & "_" & Year(TODAY())

Merci !

yg_be Messages postés 23405 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 20 décembre 2024 1 557
4 avril 2020 à 11:24

peux-tu alors marquer la discussion comme résolue?

Réponse 3 / 3

touroul Messages postés 475 Date d'inscription mardi 5 octobre 2010 Statut Membre Dernière intervention 11 novembre 2024 16
4 avril 2020 à 11:25

C'est fait.
Bonne journée ! Merci !

Discussions similaires

adele

copie de texte

avantages et inconvénients du téléphone portable

text me

Codage de texte