A voir également:
- Récupération zone de données VBA
- Zone telechargement - Accueil - Outils
- Recuperation de données - Guide
- Reinstaller windows sans perte de données - Guide
- Convertisseur récupération de texte - Guide
- Le serveur de récupération n'a pas pu être contacté - Forum MacOS
1 réponse
Le Pingou
Messages postés
12222
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
3 décembre 2024
1 452
24 juin 2010 à 14:36
24 juin 2010 à 14:36
Bonjour,
Cette petite procédure parcourt la plage désirée et un message vous indique la valeur de la dernière cellule de la ligne traitée. Remplacer le message par l'opération que vous désirez effectuer.
Sub RecupValeur()
Dim cel As Variant
For Each cel In Range("ES5:EZ371")
MsgBox "sur la ligne " & cel.Row & " valeur de EZ" & cel.Column & " est : " & cel.Offset(0, 7).Value
Next
End Sub
Cette petite procédure parcourt la plage désirée et un message vous indique la valeur de la dernière cellule de la ligne traitée. Remplacer le message par l'opération que vous désirez effectuer.
Sub RecupValeur()
Dim cel As Variant
For Each cel In Range("ES5:EZ371")
MsgBox "sur la ligne " & cel.Row & " valeur de EZ" & cel.Column & " est : " & cel.Offset(0, 7).Value
Next
End Sub
24 juin 2010 à 14:42