Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

écriture fonction en VBA

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

alfazoulou

XLDnaute Occasionnel
Bonjour le forum,
quelqu'un pourrait il me dire comment écrire cette fonction

=Ville&","&" "&"le"&" "&TEXTE(date_devis;"j mmmm aaaa")
(Ville étant une cellule nommée ainsi)
dans un code VBA

j'ai essayé
Sheets("Feuill1").Range("B15").formula= "=Ville&","&" "&"le"&" "&TEXTE(date_devis;"j mmmm aaaa")"
mais ça renvoi une erreur sur le ","

Merci de votre aide et bon dimanche.
 
Re : écriture fonction en VBA

Bonjour,
Je pensais que c'était du à un " manquant mais non, en fait.
Pour le moment, je ne vois pas...

Krut
 
Dernière modification par un modérateur:
Re : écriture fonction en VBA

Bonour à tous


Fonctionne sur XL2000
Code:
 Sheets("Feuill1").Range("B15").FormulaR1C1 = _
"=Ville&"", le ""&TEXT(TODAY(),""jj mm aaaa"")"

et ceci aussi
Code:
Sheets("Feuill1").Range("B15").FormulaR1C1 = _
"=Ville&"", le ""&TEXT(date_devis,""jj mm aaaa"")"
 
Dernière édition:
Re : écriture fonction en VBA

Bonjour Alfazoulou, Krut

essaye comme ci-dessous, si "ville" et "date_devis" sont des plages nommées :

Code:
Sheets("Feuill1").Range("B15").Formula = "=Ville&"", le ""&TEXT(date_devis,""j mmmm aaaa"")"

bon dimanche.
@+

Edition : bonjour Jean-Marie
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
15
Affichages
793
  • Question Question
Réponses
6
Affichages
778
  • Question Question
Microsoft 365 Code VBA
Réponses
10
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…