Discussion :

[Pioufy]

Bonjour,

Je suis nouveau sur ce forum et je ne sais pas très bien si je vais réussir à exposer mon pb facilement.

Voilà je m'arrache les cheveux pour réussir à transposer une formule de calcul en vba. Mon pb vient du fait que cette formule va chercher les infos dans un autre classeur. Or, pour que les données s’actualisent il faut ouvrir les deux classeurs. Je voudrais que les données s’actualisent à l’ouverture du classeur où il y a la formule sans avoir besoin d’ouvrir l’autre.

Je me suis dit qu’avec une procédure en vba et un joli bouton dans le fichier je règlerai le pb. Seulement je n’arrive pas à transposer ma formule que voici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=(SOMMEPROD((MOIS('Cheminfichier.xls]Courriers-2013'!$C$2:$C$5000)=1)*('Cheminfichier.xls]Courriers-2013'!$J$2:$J$5000="RC")))

Merci par avance parce que là j’ai passé un temps fou là-dessus sans parvenir à trouver la solution … vous êtes mon dernier espoir

A +

[titou31000]

Pour transposer la formule, il faut trouver les noms des fonctions!!

Sommeprod : sumproduct

et mois : month

[Pioufy]

Merci

Mais j'ai déjà essayé et ça ne fonctionne pas. J'ai essayé en enregistrant la marco et cela donne cette formule qui ne fonctionne pas du reste. Même en l'adaptant je bloque

Voici ce que ça donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
ChDrive "H"
Range("P17").Select
ActiveCell.FormulaR1C1 =SUMPRODUCT([C:\SD_Rsep\COMMUN_SD_Rsep\Transvers_sd\Infosecr\Suivi-courriers\Courriers2013.xls].range(C2:C5000)=1)*([C:\SD_Rsep\COMMUN_SD_Rsep\Transvers_sd\Infosecr\Suivi-courriers\Courriers2013.xls].range(C2:C5000)="RC"))
End Sub