Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel.C
Bonsoir. Une fonction, même appelant une macro, ne peut que modifier la valeur d'une cellule. Modifie ton code comme suit :
Function Eric(cel1 As Range, cel2 As Range)
Dim Val As String
Eric = cel1.Value & " " & cel2.Value
End Function
et, dans le module de la feuille, ajoute :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.HasFormula = True And LCase(Left(Target.Formula, 6) = "=eric(") Then Target = Target.Value End If End Sub
Cordialement. Daniel
Bonsoir,
J'aimerai pouvoir récupérer les valeurs de ma fonction et non pas la formule dans la cellule destination.
Si vous avez une diée je suis preneur, voici ci-dessous mon code.
Bonsoir.
Une fonction, même appelant une macro, ne peut que modifier la valeur
d'une cellule. Modifie ton code comme suit :
Function Eric(cel1 As Range, cel2 As Range)
Dim Val As String
Eric = cel1.Value & " " & cel2.Value
End Function
et, dans le module de la feuille, ajoute :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.HasFormula = True And LCase(Left(Target.Formula, 6) =
"=eric(") Then
Target = Target.Value
End If
End Sub
Cordialement.
Daniel
Bonsoir,
J'aimerai pouvoir récupérer les valeurs de ma fonction et non pas la formule
dans la cellule destination.
Si vous avez une diée je suis preneur, voici ci-dessous mon code.
Bonsoir. Une fonction, même appelant une macro, ne peut que modifier la valeur d'une cellule. Modifie ton code comme suit :
Function Eric(cel1 As Range, cel2 As Range)
Dim Val As String
Eric = cel1.Value & " " & cel2.Value
End Function
et, dans le module de la feuille, ajoute :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.HasFormula = True And LCase(Left(Target.Formula, 6) = "=eric(") Then Target = Target.Value End If End Sub
Cordialement. Daniel
Bonsoir,
J'aimerai pouvoir récupérer les valeurs de ma fonction et non pas la formule dans la cellule destination.
Si vous avez une diée je suis preneur, voici ci-dessous mon code.