traduire en vba

[tail]

bonjour
je cherche ,je cherche mais je ne trouve pas
merci de votre aide
j'aimerai traduire la formule suivante en vba

merci
=SI(ET(RECHERCHEV($D$4;Spécialités!$B$2:$U69;7)='O';F$4='G');1;0)

merci de m'expliquer comment faire

 

[bertgrav]

bonsoir



'=IF(AND(VLOOKUP(R4C4,Spécialités!R2C2:R[68]C21,7)=''O'',R4C[5]=''G''),1,0)'


en gros c'est pas trop dur:

avant de faire ta macro tu copies le texte que tu as mis, puis tu fais une macro automatique: c'est à dire tu fais OUTILS / MACRO / NOUVELLE MACRO
dans la case qui t'interresse de venir mettre ta formule tu fais 'coller'
puis 'enter' et ensuite tu refais MACRO / ARRETER

Ensuite tu vas lire ta macro et tu as le résultat que je viens de te donner.

les personnes beaucoup plus expérimentées passent surement par un autre systéme...

amicalement

chantal

 

[myDearFriend!]

Bonsoir tail, bertgrav,

Effectivement bertgrav, tu as peut-être raison, pour ma part, je n'avais pas pensé que tail souhaitait 'réinjecter' la formule dans une cellule à l'aide de VBA.

J'avais pensé qu'il souhaitait exploiter directement la valeur trouvée depuis et pour VBA... et dans ce cas :

   MaValeur = IIf(WorksheetFunction.VLookup(Range('D4'), _
                                    Sheets('Spécialités').Range('B2:U69'), 7) = 'O' _
                                    And Range('F4') = 'G', 1, 0)

Cordialement,

 

[Tail]

bonjour
et merci de votre reponse je vais essayer et je vous tiens au cournat

merci

 

[Tail]

Bonjour
je suis novice et donc je ne comprend pas tres bien ,je vous envoie mon fichier j'y ai inseré des commentaires pour aider
merci de votre aide [file name=CopiedePlanninG2005.zip size=22342]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CopiedePlanninG2005.zip[/file]

 

[Tail]

bonjour
j'ai essayé , marche pas

 

[bertgrav]

bonsoir,

est ce que ta formule tu la mets en E12 de la feuille JANV ?
et que met on dans les autres cellules?

sinon met nous ton fichier avec tes formules de calcul on verra mieux.

AMICALEMENT

Chantal

 

[Tail]

merci
voici un exemple

merci de votre aide
[file name=test_20051012201900.zip size=26832]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/test_20051012201900.zip[/file]

 

[bertgrav]

bonsoir

3/0 pour la france à la mi-temps

est ce ceci que tu cherches:
voir macro2

apparamment ça merdé entre les 2 conditions avec le '+'
la macro ne redonnais pas la totalité de la fonction de calcul, j'ai dû décomposer en 2 macros et les recoller....

ça à l'air de marcher

à toi à décomposer sur toute ta feuille

amicalement

chantal

 

[bertgrav]

re essai pour l'envoi du fichier [file name=Planning2005_20051012215258.zip size=25094]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Planning2005_20051012215258.zip[/file]

 

[Tail]

bonsoir
en fait c'est un peu compliquer
j'aimerai que dans ma feuille 'janv' une fois que j'ai completer mes cellules avec mes 'g' 'j' 'n' etc que la macro recherche le nom correspondant dans la feuille 'spécialitées' verifie si il y a un 'O' dans la colonne chef de groupe par exemple et si en plus il y a un 'g' 'j' 'n' etc ce jour alors ça me compte 1 et ainsi de suite pour tous les noms et tous les jours du mois

je suis désolé mais je suis débutant en vba et c'est un peut compliqué pour me faire comprendre .
je vous remercie enormement pour tous ce que vous faites pour m'aider merci beaucoup

 

[bertgrav]

BONSOIR

si j'ai bien compris tu voudrais faire pour les 5 noms nom1 nom2 ...nom5 et reporter ceci dans le tableau
donc faire 5 fois la fonction si(et(recherchev(...)) + si(et(recherchev(...)


toi, l'exemple que tu as donné est pour les 2 noms: nom1 et nom4

oui ou non ?

CHANTAL

 

[Tail]

bonsoir
oui c'est ça meme pour beaucoup plus de nom (une cinquentaine en fait)

merci

 

[bertgrav]

Cest plus compexe que pour 5

je vais voir mais c'est pas évident pour moi, je suis aussi limitée en VBA

pour ce soir c'est fini, je te donne des nouvelles demain soir

amicalement

 

[Tail]

merci beaucoup