écrire une formule dans une ou plusieurs cellules

Résolu/Fermé

pactoine2 Messages postés 5 Date d'inscription jeudi 21 septembre 2017 Statut Membre Dernière intervention 10 octobre 2018 - 10 oct. 2018 à 14:53
pactoine2 Messages postés 5 Date d'inscription jeudi 21 septembre 2017 Statut Membre Dernière intervention 10 octobre 2018 - 10 oct. 2018 à 17:03

Bonjour,
J'aimerais solliciter votre aide:
en effet je souhaite par le moyen d'une VBA pouvoir écrire une formule dans une ou plusieurs cellules si la ou les cellules avoisinantes ne sont pas vides sinon les cellules doivent rester vierges (voir le photo)
Avec tous mes remerciements

A voir également:

écrire une formule dans une ou plusieurs cellules
Formule excel pour additionner plusieurs cellules - Guide
Formule excel - Guide
Formule si et - Guide
Aller à la ligne dans une cellule excel - Guide
Verrouiller une cellule excel dans une formule - Guide

2 réponses

Réponse 1 / 2

danielc0 Messages postés 837 Date d'inscription mardi 5 juin 2018 Statut Membre Dernière intervention 22 avril 2024 74
10 oct. 2018 à 15:44

Bonjour,

Sub test()
Dim C As Range
For Each C In [A8:A17]
  If C.Offset(, 3) <> "" Then
    C.FormulaLocal = "=SI(ESTNA(RECHERCHEV(D" & C.Row & ";Bases!B2:F370;5;0));"""";RECHERCHEV(D" & _
      C.Row & ";Bases!B2:F370;5;0))"
  End If
Next C
End Sub

Daniel

Réponse 2 / 2

pactoine2 Messages postés 5 Date d'inscription jeudi 21 septembre 2017 Statut Membre Dernière intervention 10 octobre 2018
10 oct. 2018 à 17:03

MERCI DANIEL
c'est exactement ce qu'il me fallait
SUPER!!!!
a bientôt

Discussions similaires

exo pix

je veut créer des codes

formule de calcule

Discussions similaires

Newsletters