FORMULE POUR MACRO

a10

XLDnaute Impliqué
bonjour,

J'ai dans une macro que j'ai récupéré ce code:
ActiveCell.FormulaR1C1 = _
"=COUNTIF(A!C1:C12,'B'!RC1&""R7"")"

Comment je peux écrire une nouvelle formule du même type ?


A+
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonjour à tous,

Une méthode simple:

  • construire la formule dans la cellule où elle devra se trouver sur la feuille de calcul
  • enregistrer une macro en cliquant sur le bouton dans la barre d'état au bas de la page
  • sélectionner la cellule de la formule
  • taper sur la touche de fonction F2 (on se retrouve dans la barre d’édition de formules)
  • taper sur entrée (pour valider la formule)
  • arrêter l'enregistrement de la macro
  • dans le code VBA enregistré, on retrouve la syntaxe désirée
 

Pièces jointes

  • a10- formule pour VBA- v1.xlsm
    22.7 KB · Affichages: 27

ROGER2327

XLDnaute Barbatruc
Bonsoir à tous.

Un essai...
Sélectionnez une cellule et exécutez ce code :

VB:
Sub xxx()
Dim x As Boolean
  x = Application.DisplayAlerts
  Application.DisplayAlerts = False

  ActiveCell.FormulaR1C1 = "=COUNTIF(A!C1:C12,'B'!RC1&""R7"")"

  ActiveCell.Value = "'" & ActiveCell.FormulaLocal
  Application.DisplayAlerts = x
End Sub

ℝOGER2327
#8505


Mercredi 4 Pédale 144 (Saint Michet, idéaliste - fête Suprême Quarte)
8 Ventôse An CCXXV, 8,2686h - violette
2017-W08-7T19:50:40Z
 

Discussions similaires

Réponses
3
Affichages
132
Réponses
6
Affichages
132

Statistiques des forums

Discussions
312 206
Messages
2 086 219
Membres
103 158
dernier inscrit
laufin