Discussion :

[nomade333]

Bonjour,
comment écrire le résultat du code ci dessous dans une cellule?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Set myRange = Worksheets("04").Range("L19:L137")
    answer = Application.WorksheetFunction.Min(myRange)

Merci par avance

[Golonne]

En utilisant Value

Dans la cellule A1 de la feuille1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

worksheets(1).Range("A1").Value = answer

Cordialement,

Guillaume