Convertir formulle en vba

[Ilino]

Bonsoir Forum

=SOMMEPROD((JOURSEM(LIGNE(INDIRECT(C1&":"&D1)))>1) *1)-SOMMEPROD(((JOURSEM(Ferie)>1))*(Ferie>=C1)*(Ferie<=D1))

Qlq un peut m'aider a convertire cette formule en VBA
MERCI

 

[vgendron]

Re : Convertir formulle en vba

Bonsoir
ce que je fais en général c'est

Dim formule as string

formule="=SOMMEPROD((JOURSEM(LIGNE(INDIRECT(C1&":"&D1)))>1) *1)-SOMMEPROD(((JOURSEM(Ferie)>1))*(Ferie>=C1)*(Ferie<=D1))"

cells(i,j).formulalocal=formule

 

[Ilino]

Re : Convertir formulle en vba

Bonjour Vgendron
merci pour la réponse mais malheureusement ça n'a pas fonctionné🙁
a+

 

[Modeste geedee]

Re : Convertir formulle en vba

Bonsoir
ce que je fais en général c'est

Dim formule as string

formule="=SOMMEPROD((JOURSEM(LIGNE(INDIRECT(C1&":"&D1)))>1) *1)-SOMMEPROD(((JOURSEM(Ferie)>1))*(Ferie>=C1)*(Ferie<=D1))"

cells(i,j).formulalocal=formule

🙄
as tu testé ???
ça marcherai déja mieux en doublant les quotes " existantes ...

cells(i,j).Formula = "=SUMPRODUCT((WEEKDAY(ROW(INDIRECT(C1&"":""&D1)))>1) *1)-SUMPRODUCT(((WEEKDAY(ferie)>1))*(ferie>=C1)*(ferie<=D1))"

 

[vgendron]

Re : Convertir formulle en vba

salut Modeste et merci
euh. oui désolé Ilino.. j'ai oublié les quotes.. le pire. c'est que j'y ai pensé et j'ai regardé.. mais trop vite..
et pour aller au bout de l'explication:
si tu veux mette un " dans une cellule. il faut mettre "" en vba

 

[Ilino]

Re : Convertir formulle en vba

Grazie
mais si vous permettez ci joint my fichier😱
Thinks

 

[vgendron]

Re : Convertir formulle en vba

ha ha ha. j'aurais du le parier avant d'ouvrir ton fichier....;-)

Cells(i,j) si i et j ne sont pas définis (comme c'est le cas), forcément. ca plante... VBA ne connait pas les valeurs de i et j
donc la question:
dans quelle cellule veux tu placer cette formule?
en E3 ?
donc à la place de cells(i,j) tu dois écrire cells(3,5) 3eme ligne, 5eme colonne(E)

 

[Ilino]

Re : Convertir formulle en vba

RE
OUPS J AI UN AUTRE PBLM
mais mon souci et de ne pas afficher la formule dans la cellule c'esy pour cette raison j'ai souhaité remplacer la formule par un code VBA est il possibl?????

 

[Modeste geedee]

Re : Convertir formulle en vba

Bonsour®

RE
OUPS J AI UN AUTRE PBLM
mais mon souci et de ne pas afficher la formule dans la cellule c'esy pour cette raison j'ai souhaité remplacer la formule par un code VBA est il possibl?????

il faut mettre l'option Masquée à la protection de la cellule
mais il faut alors aussi protéger la feuille

 

[Ilino]

Re : Convertir formulle en vba

Bonsour®

il faut mettre l'option Masquée à la protection de la cellule
mais il faut alors aussi protéger la feuille

Re
je l'ai déjà fait mais comme mon dossier est plein des codes ( et comme je Maitrise pas bien VBA) je pré faire de ne pas protéger et masquer les cellule
merci

 

[Ilino]

Re : Convertir formulle en vba

Bonsoir Forum
alors est t il possible de la convertir??😱
grazie

 

[Ilino]

Re : Convertir formulle en vba

buonasera Forum
Puis je avoir votre Help???😱
molte grazie😎

 

[Regueiro]

Re : Convertir formulle en vba

Bonsoir le Forum, Illino

Sub test()
Cells(3, 5).Formula = "=SUMPRODUCT((WEEKDAY(ROW(INDIRECT(C1&"":""&D1)))>1) *1)-SUMPRODUCT(((WEEKDAY(ferie)>1))*(ferie>=C1)*(ferie <=D1))"
Cells(3, 5).Value = Cells(3, 5).Value
End Sub

A+
Tu veux uniquement cette formule pour la cellule E3 ou pour tout les cellules de la colonnes E ?

 

[Ilino]

Re : Convertir formulle en vba

Bonsoir le Forum, Illino

A+
Tu veux uniquement cette formule pour la cellule E3 ou pour tout les cellules de la colonnes E ?

Bonsoir Regueiro
Merci pour la réponse c'est exactement ce que j'ai cherchais🙂 mais pour toutes les cellules de la colonne E
MERCI GRAZIE

 

[Regueiro]

Re : Convertir formulle en vba

Bonsoir.
Quel résultat veux-tu en colonne E.
Le nombre de jours ouvrés sans les Fériés ?
A+