OVH Cloud OVH Cloud

Traduction VBA

17 réponses
Avatar
Michel
Bonsoir
j'essaie de récupérer cette variable dans un msgbox
mais ma traduction VBA est plus que chaotique
Merci
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x

10 réponses

1 2
Avatar
anonymousA
bonjour,

pas essayé mais, les fonctions excel se traduisent par
Application.worksheetfunction et sommeprod est SumProduct et Joursem,
weekday.

A+

Bonsoir
j'essaie de récupérer cette variable dans un msgbox
mais ma traduction VBA est plus que chaotique
Merci
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x




Avatar
jps
depuis le titre de championne du monde de boxe de la marseillaise myriam
lamare, on parle de traduction chaotechnique...
jps

"Michel" a écrit dans le message de
news:%
mais ma traduction VBA est plus que chaotique


Avatar
Michel
Bonsoir
Euh...
J'ai essayé cela mais ;-(

x =
Application.WorksheetFunction(SumProduct(Travail_date<>"")*(weekday(Travail_date;2)>5))

Michel

"anonymousA" a écrit dans le message de news:
427a50ee$0$1230$
bonjour,

pas essayé mais, les fonctions excel se traduisent par
Application.worksheetfunction et sommeprod est SumProduct et Joursem,
weekday.

A+

Bonsoir
j'essaie de récupérer cette variable dans un msgbox
mais ma traduction VBA est plus que chaotique
Merci
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x




Avatar
anonymousA
Attention,

tu ne peux pas se faire comporter une formule comme une méthode de VBA
je ne m'interesse pas plus que cela aux formules et n'ai pas l'intention
de ravir à AV le titre de champion incontesté de ce créneau.
Par contre, en "VBAiste" désormais plus averti, je te rappelle que les
fonctions de worksheetfunction doivent être appelées par un point.
ex: Application.worksheetfunction.sumproduct et
Application.worksheetfunction.sumproduct.weekday
Donc à défaut de comprendre ce que tu veux faire, la syntaxe que tu
utilises dans ton instruction me parait déjà problématique pour
rencontrer un quelconque succès.

A+

Bonsoir
Euh...
J'ai essayé cela mais ;-(

x =
Application.WorksheetFunction(SumProduct(Travail_date<>"")*(weekday(Travail_date;2)>5))

Michel

"anonymousA" a écrit dans le message de news:
427a50ee$0$1230$

bonjour,

pas essayé mais, les fonctions excel se traduisent par
Application.worksheetfunction et sommeprod est SumProduct et Joursem,
weekday.

A+


Bonsoir
j'essaie de récupérer cette variable dans un msgbox
mais ma traduction VBA est plus que chaotique
Merci
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x









Avatar
Michel
Bonsoir et merci, c'est vrai c'est un peu benêt,
j'ai essayé avec l'enregistreur de macro de faire le transfert en VBA, mais
bien évidement, cela ne fonctionne pas.
Michel


"anonymousA" a écrit dans le message de news:
427a5aaf$0$1230$
Attention,

tu ne peux pas se faire comporter une formule comme une méthode de VBA
je ne m'interesse pas plus que cela aux formules et n'ai pas l'intention
de ravir à AV le titre de champion incontesté de ce créneau.
Par contre, en "VBAiste" désormais plus averti, je te rappelle que les
fonctions de worksheetfunction doivent être appelées par un point.
ex: Application.worksheetfunction.sumproduct et
Application.worksheetfunction.sumproduct.weekday
Donc à défaut de comprendre ce que tu veux faire, la syntaxe que tu
utilises dans ton instruction me parait déjà problématique pour rencontrer
un quelconque succès.

A+

Bonsoir
Euh...
J'ai essayé cela mais ;-(

x =
Application.WorksheetFunction(SumProduct(Travail_date<>"")*(weekday(Travail_date;2)>5))

Michel

"anonymousA" a écrit dans le message de news:
427a50ee$0$1230$

bonjour,

pas essayé mais, les fonctions excel se traduisent par
Application.worksheetfunction et sommeprod est SumProduct et Joursem,
weekday.

A+


Bonsoir
j'essaie de récupérer cette variable dans un msgbox
mais ma traduction VBA est plus que chaotique
Merci
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x










Avatar
isabelle
bonjour Michel,

que représente la variable Travail_date
est ce le nom d'une plage ou une référence variable vba ?

isabelle

Bonsoir et merci, c'est vrai c'est un peu benêt,
j'ai essayé avec l'enregistreur de macro de faire le transfert en VBA, mais
bien évidement, cela ne fonctionne pas.
Michel


"anonymousA" a écrit dans le message de news:
427a5aaf$0$1230$

Attention,

tu ne peux pas se faire comporter une formule comme une méthode de VBA
je ne m'interesse pas plus que cela aux formules et n'ai pas l'intention
de ravir à AV le titre de champion incontesté de ce créneau.
Par contre, en "VBAiste" désormais plus averti, je te rappelle que les
fonctions de worksheetfunction doivent être appelées par un point.
ex: Application.worksheetfunction.sumproduct et
Application.worksheetfunction.sumproduct.weekday
Donc à défaut de comprendre ce que tu veux faire, la syntaxe que tu
utilises dans ton instruction me parait déjà problématique pour rencontrer
un quelconque succès.

A+


Bonsoir
Euh...
J'ai essayé cela mais ;-(

x =
Application.WorksheetFunction(SumProduct(Travail_date<>"")*(weekday(Travail_date;2)>5))

Michel

"anonymousA" a écrit dans le message de news:
427a50ee$0$1230$


bonjour,

pas essayé mais, les fonctions excel se traduisent par
Application.worksheetfunction et sommeprod est SumProduct et Joursem,
weekday.

A+



Bonsoir
j'essaie de récupérer cette variable dans un msgbox
mais ma traduction VBA est plus que chaotique
Merci
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x













Avatar
Michel
Bonsoir et merci Isabelle
il s'agit d'une plage de cellule :
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x

"isabelle" a écrit dans le message de news:

bonjour Michel,

que représente la variable Travail_date
est ce le nom d'une plage ou une référence variable vba ?

isabelle

Bonsoir et merci, c'est vrai c'est un peu benêt,
j'ai essayé avec l'enregistreur de macro de faire le transfert en VBA,
mais bien évidement, cela ne fonctionne pas.
Michel


"anonymousA" a écrit dans le message de news:
427a5aaf$0$1230$

Attention,

tu ne peux pas se faire comporter une formule comme une méthode de VBA
je ne m'interesse pas plus que cela aux formules et n'ai pas l'intention
de ravir à AV le titre de champion incontesté de ce créneau.
Par contre, en "VBAiste" désormais plus averti, je te rappelle que les
fonctions de worksheetfunction doivent être appelées par un point.
ex: Application.worksheetfunction.sumproduct et
Application.worksheetfunction.sumproduct.weekday
Donc à défaut de comprendre ce que tu veux faire, la syntaxe que tu
utilises dans ton instruction me parait déjà problématique pour
rencontrer un quelconque succès.

A+


Bonsoir
Euh...
J'ai essayé cela mais ;-(

x =
Application.WorksheetFunction(SumProduct(Travail_date<>"")*(weekday(Travail_date;2)>5))

Michel

"anonymousA" a écrit dans le message de news:
427a50ee$0$1230$


bonjour,

pas essayé mais, les fonctions excel se traduisent par
Application.worksheetfunction et sommeprod est SumProduct et Joursem,
weekday.

A+



Bonsoir
j'essaie de récupérer cette variable dans un msgbox
mais ma traduction VBA est plus que chaotique
Merci
Michel

x =(SOMMEPROD((Travail_date<>"")*(JOURSEM(Travail_date;2)>5))
msgbox x















Avatar
AV
MsgBox [sumproduct((travail_date<>"")*(weekday(travail_date,2)>5))]

AV
Avatar
Michel
Bonjour AV
Cela ne fonctionne pas
il me renvoie Erreur 13
Michel


"AV" a écrit dans le message de news:

MsgBox [sumproduct((travail_date<>"")*(weekday(travail_date,2)>5))]

AV




Avatar
isabelle
re bonjour,

la formule donnée par Alain fonctionne bien sur mon poste si la plage
travail_date a été créer avec "insertion, nom"

isabelle

Bonjour AV
Cela ne fonctionne pas
il me renvoie Erreur 13
Michel


"AV" a écrit dans le message de news:


MsgBox [sumproduct((travail_date<>"")*(weekday(travail_date,2)>5))]

AV









1 2