Calcul à partir d'une plage de valeurs

Résolu
thekorrigan29 -  
 thekorrigan29 -
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
Configuration: Windows XP
Firefox 2.0.0.11

2 réponses

  1. dandypunk Messages postés 838 Statut Membre 83
     
    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
    0
  2. thekorrigan29
     
    merci mon problème est résolu
    0