Transformation d'une formule SI en VBA

Fermé
nini95 - 3 déc. 2012 à 14:38
nini95340 Messages postés 2 Date d'inscription lundi 3 décembre 2012 Statut Membre Dernière intervention 3 décembre 2012 - 3 déc. 2012 à 16:27
Bonjour,

J'espère trouver ma solution sur ce forum et vous en remercie par avance. J'aurais une questions pour vous.

Serait il possible de transformer la formule si dessous en macro
=SI(ET(X3="oui";Y3="");AA3;"")

(Cette formule est mise dans la colonne AB, la formule si dessus est l'exemple de la troisième ligne, mais la formule a été "glissée" sur les 800 lignes de mon tableau et j'aimerais que la macro fonctionne pour toutes les lignes de la colonne AB)

Par avance merci beaucoup de votre aide

A voir également:

4 réponses

nightsheart Messages postés 319 Date d'inscription mardi 23 octobre 2007 Statut Membre Dernière intervention 1 juin 2018 30
Modifié par nightsheart le 3/12/2012 à 14:58
Salut,

Essai ce bout de code :


Sub Transfo_si()

Application.ScreenUpdating = False

Range("AB1").Select

For i = 1 To 800

If ActiveCell.Offset(0, -4) = "Oui" And ActiveCell.Offset(0, -3) = "" Then

ActiveCell = ActiveCell.Offset(0, -1).Value
Else
ActiveCell = ""
End If
ActiveCell.Offset(1, 0).Select

Next i

Application.ScreenUpdating = True

End Sub
0
nini95340 Messages postés 2 Date d'inscription lundi 3 décembre 2012 Statut Membre Dernière intervention 3 décembre 2012
3 déc. 2012 à 15:10
Ca ne veux pas fonctionner je ne comprend pas pourquoi....
Mon tableau commence à la troisième ligne cela peut il y avoir une incidence?

Merci
0
nightsheart Messages postés 319 Date d'inscription mardi 23 octobre 2007 Statut Membre Dernière intervention 1 juin 2018 30
3 déc. 2012 à 15:18
C'est possible mais pourrais-tu m'envoyer un exemple de ton tableau ?
Ce serait plus simple.
De plus, colles-tu ce code dans un module ?
0
nini95340 Messages postés 2 Date d'inscription lundi 3 décembre 2012 Statut Membre Dernière intervention 3 décembre 2012
3 déc. 2012 à 16:27
Je suis nouvelle sur ce site et malheureusement je ne vois pas comment insérer un fichier...

Non je ne l'ai pas coller dans un module
0