faire une macro pour remplacer la touche F9

Question

Bonjour,

J'ai des fichiers dans lesquels j'ai fait des recherche X mais je dois envoyer ces fichiers à des tiers et alors a moins d'envoyer mon fichier source en meme temps que le fichier en question je dois sur toutes les cellules ou j'ai fait mes recherche x sélectionner la cellule appuyer sur F9 puis sur entrée pour passer à la cellule suivante et ainsi de suite.

J'ai essayé d'automatiser le processus en faisant une macro mais celle-ci prend en compte le nom de la cellule dans laquelle j'ai fait l'action et quand j'appuie sur CTRL + F cela me renvoie systématiquement à cette cellule.

Comment modifier le code VBA pour que si je sélectionne une ou plusieurs cellules en appuyant sur CTRL +F dans toutes apparaissent le résultat de la formule de calcul et non plus la formule liée au fichier source.

Voilà ce que donne le code VBA créer :

Sub MACROF9()

'

' MACROF9 Macro

' renvoie le resultat de la formule grâce à F9

'

' Touche de raccourci du clavier: Ctrl+f

'

Range("H10").Select 

ActiveCell.FormulaR1C1 = "50" 

Range("H11").Select 

End Sub.

Merci à tous pour votre aide.

Answer 1

Bonjour,

L'exécution de cette macro émule la touche F9 :

Sub test()
Application.SendKeys ("{F9}")
End Sub

Cordialement.

Daniel