traduire en vba

T

tail

Guest
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

XLDnaute Occasionnel
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!

XLDnaute Barbatruc
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

XLDnaute Occasionnel
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]
 

Pièces jointes

  • CopiedePlanninG2005.zip
    21.8 KB · Affichages: 39
  • CopiedePlanninG2005.zip
    21.8 KB · Affichages: 34
  • CopiedePlanninG2005.zip
    21.8 KB · Affichages: 37

Tail

XLDnaute Occasionnel
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]
 

Pièces jointes

  • test_20051012201900.zip
    26.2 KB · Affichages: 33

bertgrav

XLDnaute Occasionnel
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

XLDnaute Occasionnel
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]
 

Pièces jointes

  • Planning2005_20051012215258.zip
    24.5 KB · Affichages: 33

Tail

XLDnaute Occasionnel
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

XLDnaute Occasionnel
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
 

Discussions similaires

Réponses
9
Affichages
680

Statistiques des forums

Discussions
312 931
Messages
2 093 721
Membres
105 796
dernier inscrit
Max...26