VBA - ajouter une valeur aux données d'une colonne

[Guillaumega]

Bonjour,

Je cherche à ajouter 0,25 aux cellules non vides (contenant des valeurs numériques) de la plage A10:A65536.
Sauriez vous comment on fait s'il vous plait?

En vous remerciant par avance,
Cordialement,
Guillaumega

 

[BOISGONTIER]

Re : VBA - ajouter une valeur aux données d'une colonne

Bonjour,


Manuellement:
-0,25 dans une cellule
-Edition/Copier
-Sélectionner A10:A65000
-Edition/Atteindre
-Constantes
-Edition/collage spécial/Addition

 For Each c In [A10:A65000].SpecialCells(xlCellTypeConstants, 23)
   c.Value = c.Value + 0.25
 Next c

JB

 

[Guillaumega]

Re : VBA - ajouter une valeur aux données d'une colonne

Bonjour et merci pour ta réponse !

Je ne suis pas très doué il faut dire en vba et je ne suis pas parvenu à appliquer le code que tu m'as donné.
L'erreur est-elle facile à repérer dans le code ci-après?

En vous remerciant,
Guillaume

Private Sub Sensibility_Click()
    Application.ScreenUpdating = False
        For i = 0 To 3
        For Each c In [g11:g65000].SpecialCells(xlCellTypeConstants, 23)
        c.Value = c.Value - 0.01 + 0.0025 * i
        Next c
            Worksheets("CF").Range("IrrUnleveraged").Copy
            Worksheets("Sensibility analysis").Range("f6").Offset(i).PasteSpecial xlPasteValues
            Worksheets("CF").Range("IrrLeveraged").Copy
            Worksheets("Sensibility analysis").Range("f15").Offset(i).PasteSpecial xlPasteValues
        Next i
     Application.CutCopyMode = False
End Sub