Convertir formule Excel en VBA

bon jour tt le mon j'ai besoin de votre aide SVP

Y a t'il un moyen de convertire cette formule en VBA

="Fac-"&TEXTE(STXT(ARCHIVESBDC!A3;5;3)+1;"000")&"-"&MAJUSCULE(TEXTE(E6;"MMM"))

pour afficher se résultat dans la cellule (E8) de la feuil 1 exp:Fac-001-JUIL., Fac-002-JUI... a chaque sauvegarde

merci pour vous tous

Bonjour kabuka, le forum,

Y a t'il un moyen de convertir cette formule en VBA

="Fac-"&TEXTE(STXT(ARCHIVESBDC!A3;5;3)+1;"000")&"-"&MAJUSCULE(TEXTE(E6;"MMM"))

A tester:

Range("E8").Formula = "=""Fac-""&TEXT(MID(ARCHIVESBDC!A3,5,3)+1,""000"")&"" - ""&UPPER(TEXT(E6,""MMM""))"

Cordialement,

bonjour Mr xorsankukai merci pour ton aide la formule elle fonction très bien, j'ai autre chose a vous demander si ça vous dérange pas.

j'ai un autre problème sur le même classeur quand je clic sur le bouton 1 sur ma feuil 1 pour sauvegarder les données; le N° Fac-001-JUIL de E8 est enregistrer sou la forme de chiffre 1,2.... sur la feuil ARCHIVESBDC, et normalement il doit être enregistrer comme suit Fac-001-JUIL plus un a chaque sauvegarde
je pense que le problème de la ligne 2 du bout de code en bas du texte qui s’adapte pas avec la formule que vous m'avez proposer et elle fonction bien et si a cause de la ligne 2 que je n'arrive pas a sauvegarder mes numéro de cette maniéré Fac-001-JUIL puis Fac-002-JUIL.......

Range("A3").Select
Range("A3:E3").Formula = "=MAX(A4:A50000)+1"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues
Range("A1").Select<br>

je vous joins mon classeur

et merci