selection d'une plage dans un tableauRésolu

Question

Bonjour,
mon probl&#232;me est le suivant, j'ai un tableau avec bcp de donn&#233;es et je souhaite trouver une macro pour selectionner ou recuperer une plage de valeurs dans ce tableau ...
Pour etre plus clair....
Dans les cellules  D1:D365 j'ai des dates et dans les cellules E1:E365 j'ai donn&#233;es num&#233;riques correspondant &#224; chaque date...
alors ce que je voudrais faire c'est de taper en A1 le d&#233;but de ma date de selection et en A2 la fin de ma date de selection et que la macro aille me selectionner dans le tableau la plage de cellule,  par la suite aller par exemple chercher la valeur max ou min dans le plage cellule E1:E365 correspondant au date de d&#233;but et de fin .....

je ne sais pas si j'ai et&#233; assez clair enfin bon je l'esp&#232;re

merci d'avance

jrivet · Accepted Answer

Salut,

J espere que ce qui suit peux t'aider:

Ca Cherche le minimum et le maximum dans la plage de date donnee en A1 et A2

Maximum donnee en C1 et Minimum en C2

Private Sub CommandButton2_Click()
Dim DateDebut As Date
Dim DateFin As Date
Dim iJour As Integer
Dim MemDebut As Integer
Dim MemFin As Integer
DateDebut = CDate(ActiveSheet.Range("A1"))
DateFin = CDate(ActiveSheet.Range("A2"))



For iJour = 1 To 365    If CDate(ActiveSheet.Range("D" & iJour)) DateDebut Then MemDebut iJour
    If CDate(ActiveSheet.Range("D" & iJour)) = DateFin Then
        MemFin = iJour
        Exit For
    End If
Next



ActiveSheetRange("C1").Formula = "=MAX(E" & MemDebut & ":E" & MemFin & ")"
ActiveSheetRange("C2").Formula = "=MIN(E" & MemDebut & ":E" & MemFin & ")"



End Sub

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

fred.toto · Answer

Le probl&#232;me c'est qu'une page Excel ne va que jusqu'a la colonne 257 maxi 

Sinon, ben j'ai encore &#233;t&#233; trop lent &#224; r&#233;pondre,tant pis pour ma solution

souk69 · Answer

Merci, pour ta r&#233;ponse mais ya un bug quelque part, tout me parait bon ( je pense )mais &#231;a veut pas ??? 
mais en tout cas merci

jrivet · Answer

SAlut,

Mais ca veut pas???? Quoi?

Il faudrait expliquer.
Je l'ai teste sous Excel 2000 et pour ce que j ai compris du probleme, ca avait l'air d'y repondre. mais sinon explique l'endroit ou ca ne veux pas???

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

souk69 · Answer

non &#231;a marche ya po de soucis c'etait juste que je l'avais mal adapt&#233;e au mon v&#233;ritable tableau et tite faute de ma part mais en tous cas un grand merci

jrivet · Answer

Re,

Mais il n'y a pas de quoi.

Un petit r&#233;ponse accept&#233;e sur le ou les posts qui t'on aid&#233;s serait le bienvenu.
(Si tu l'as fait pendant que j'ecrit ce message, excuses moi.)

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

Selection d'une plage dans un tableau

6 réponses

Discussions similaires