Affecter la valeur trouvée par Msgbox à une variable
Saad1988
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je souhaite ne pas affiché Msgbox mais affacter la valeur trouvée à une variable appelée valeurtrouve ?
Merci d'avance !!
je souhaite ne pas affiché Msgbox mais affacter la valeur trouvée à une variable appelée valeurtrouve ?
Dim rngData As Range, rngLabelRow As Range, rngLabelColumn As Range, fn As WorksheetFunction, Dim valeurtrouve as single
Set fn = Application.WorksheetFunction
With ThisWorkbook1.Worksheets("Feuil1")
Set rngData = .Range("Y2:AK6")
Set rngLabelRow = .Range("X2:X6")
Set rngLabelColumn = .Range("Y1:AK1")
End With
With fn
MsgBox .Index(rngData, .Match(pvnai, rngLabelRow, 0), .Match(semaig, rngLabelColumn, 0))
End With
End Sub
Merci d'avance !!
A voir également:
- Affecter la valeur trouvée par Msgbox à une variable
- Formule pour copier la valeur d'une cellule excel ✓ - Forum Excel
- En code ascii le caractère est code par la valeur - Guide
- Voici du code ascii : 34 2d 3f 3d 31 décodez-le et résolvez l'énigme trouvée ✓ - Forum Loisirs / Divertissements
- Voici du code ascii : 34 2d 3f 3d 31 décodez-le et résolvez l'énigme trouvée. - Forum Loisirs / Divertissements
- Impossible de créer le fichier de travail. vérifiez la variable d'environnement temp ✓ - Forum Microsoft Office