VBA copier formule vers le bas

Résolu
AUREL -  
CASSIEAUREL Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   - 9 janv. 2021 à 18:48
Bonjour,
Pouvez également m'aider? je n'arrive pas à trouver le bon pour copier ma formule : SI(K2 = 0, "NON", "OUI")
qui se trouve en L2 dans toutes les cellules de la colonne L, jusqu'à la dernière ligne contenant une valeur dans la colonne A.
J'ai essayé le code ci-dessous :
Sub CALCULER()
'
' CALCULER Macro

Dim DerLigne As Long
With ActiveSheet
DerLigne = .Cells(Rows.Count, 1).End(xlUp).Row
.Range("L2:L" & DerLigne).Formula = SI(K2 = 0, "NON", "OUI")
End With

MsgBox ("Le calcul a été réalisé avec succès")
End Sub

Merci d'avance pour votre aide



Configuration: Windows / Chrome 87.0.4280.88
A voir également:

4 réponses

M-12 Messages postés 1332 Date d'inscription   Statut Membre Dernière intervention   285
 
Bonjour,
Teste comme ceci
Sub CALCULER()
Dim DerLigne As Long, F As String
  With ActiveSheet
    DerLigne = .Cells(Rows.Count, 1).End(xlUp).Row
    F = "=IF(R2C11=0,""NON"",""OUI"")"
    .Range("L2").Formula = F
    .Range("L2").AutoFill Destination:=Range("L2:L" & DerLigne), Type:=xlFillDefault
  End With
MsgBox ("Le calcul a été réalisé avec succès")
End Sub
1
AUREL
 
Merci pour votre réponse rapide.
La formule rencontre encore une erreur, uniquement des OUI ressortent
et la formule se cope également à la cellule L1.
Il faudrait qu'elle s'applique à partir de L2 seulement.

Pouvez-vous encore m'aider? Merci
0
M-12 Messages postés 1332 Date d'inscription   Statut Membre Dernière intervention   285
 
Re,
place un exemple classeur pour mieux faire
0
CASSIEAUREL Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Je n'arrive pas à le déposer sur le site par contre voici une photo du tableau : la ligne 1 ne doit pas bouger, et les données sont collées en A2 (cellule jaune)
Merci pour votre aide
0
M-12 Messages postés 1332 Date d'inscription   Statut Membre Dernière intervention   285
 
0
CASSIEAUREL Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
C'est parfait! merci beaucoup pour votre aide
0