Se connecter avec
S'enregistrer | Connectez-vous

formule , erreur de compilation

Dernière réponse : dans Programmation

Salut à tous
cett formule me permet d'avoir le nom du mois dernier.
ça fonctionne très bien sur une cellule.
Mais dès que je l'intègre dans mon code, il me met erreur de compilation:fou: 
MERCI :ange: 

  1. With Worksheets(Sheets.Count)
    

  2. .Cells(1, 17).FormulaR1C1Local = "=TEXTE(DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())-1;JOUR(AUJOURDHUI()));"mmmm")"
    

  3. End With

Autres pages sur : formule erreur compilation

fopy12 a édité ce message
Lassé par la pub ? Créez un compte
Expert Programmation

Salut,

Cells() s'applique à la feuille active.
ma_feuille.Cells() s'applique à l'objet ma_feuille.
.Cells() s'applique à l'objet désigné par With.

plop, plop, plop...

Sinon, recompte tes guillemets

plop, plop, plop...
zeb a édité ce message
Expert Programmation

Comment ça " :??:  "

  1. ' Mon code qui ne compile pas !
  2. ma_chaine = "blabla"bloblo"blublu"

N'y-a-t'il rien qui te gêne ?

Même la coloration syntaxique te dit où est l'erreur !!!!!
zeb a édité ce message

un double guillemets :bounce: 
merci zeb


  1. With Worksheets(Sheets.Count)
  2. .Cells(1, 17).FormulaR1C1Local = "=TEXTE(DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())-1;JOUR(AUJOURDHUI()));""mmmm"")"
  3. End With
fopy12 a édité ce message
Expert Programmation

Le site nouveau permet de préciser le langage du code présenté.
Ainsi, au lieu de la balise standard [code], je t'invite à plus de détails : [code=VB].
C'est juste pour faire zoli ! ;) 
zeb a édité ce message
Lassé par la pub ? Créez un compte

Créer un nouveau sujet