Calcul à partir d'une plage de valeurs

Résolu/Fermé

thekorrigan29 - 1 févr. 2008 à 10:28
thekorrigan29 - 1 févr. 2008 à 19:28

Bonjour, je reposte parce ce que j'ai evolué dans mes recherches. je n'arrive toujours pas à faire la somme des plages de cellules. ni a récupérer les plages dans une autre cellule pour faire le calcul.

voici la macro:
Sub SelectionPlageAvecSouris()

Dim Plage As Range
Set Plage = Application.InputBox("Sélectionnez une plage !", "Sélection de cellules", Type:=8)
MsgBox ("La plage que vous avez séléctionnez est : " & Plage.Address)
Range("L21") = Plage
Dim Plage2 As Range
Set Plage2 = Application.InputBox("Sélectionnez une plage !", "Sélection de cellules", Type:=8)
MsgBox ("La plage que vous avez séléctionnez est : " & Plage.Address)
Range("L22") = Plage2
End Sub

le problème vient peut être du dim as mais je n'arrive pas a faire autrement.

merci par avance

A voir également:

2 réponses

Réponse 1 / 2

dandypunk Messages postés 831 Date d'inscription jeudi 3 janvier 2008 Statut Membre Dernière intervention 11 septembre 2011 82
1 févr. 2008 à 11:13

Essayes ce code

Sub SelectionPlageAvecSouris()

Dim Plage As Range
Dim Plage2 As Range

    Set Plage = Application.InputBox("Sélectionnez une plage !", "Sélection de cellules", Type:=8)
    MsgBox ("La plage que vous avez séléctionnez est : " & Plage.Address)
    Range("L21").Value = Plage.Address
    
    Set Plage2 = Application.InputBox("Sélectionnez une plage !", "Sélection de cellules", Type:=8)
    MsgBox ("La plage que vous avez séléctionnez est : " & Plage.Address)
    Range("L22").Value = Plage2.Address

End Sub

Réponse 2 / 2

thekorrigan29
1 févr. 2008 à 19:28

merci mon problème est résolu

Discussions similaires

Retrouver l'image originale après avoir fait des modifications ?

Annuaire portable gratuit à partir d'un nom

Comment trouver un numéro à partir du nom et prénom

exo pix

Trouver un numero de portable a partir d'un nom svp

Discussions similaires

Newsletters