Récupérer valeurs dynamique

[Florian53]

Bonjour à tous,

Désolé pour le titre peu explicite mais je ne vois pas trop comment formuler ma demande avec quelques mots.

Je voudrais récupérer et différencier des valeurs d'un tableau dynamique.

je suis désolé de pas en dire plus dans le message mais je n'arrive à l'expliquer clairement sans exemple.

Merci à vous

 

[Paf]

Bonjour

Je voudrais récupérer et différencier des valeurs d'un tableau dynamique.

je suis désolé de pas en dire plus dans le message mais je n'arrive à l'expliquer clairement sans exemple.

Avec l'exemple non plus d'ailleurs, on ne sait pas ce que signifie différencier ni de quelles valeurs il s'agit ?

A+

 

[Florian53]

Désolé je me suis trompé de fichier, erreur corrigée

 

[Dranreb]

Bonjour.

Essayez avec ça dans le module Feuil2 :

Option Explicit

Private Sub Worksheet_Activate()
Dim TE(), TS(1 To 5000, 1 To 4), LE&, LS&, PasFait As Boolean, NbLig&, TOn As Double
TE = Feuil1.UsedRange.Value
For LE = 2 To UBound(TE, 1)
   If TE(LE, 1) <> "" Then
      If LS > 0 Then TS(LS, 4) = NbLig
      LS = LS + 1: TS(LS, 1) = TE(LE, 1)
      PasFait = True: NbLig = 0: TOn = 0
   Else
      If PasFait Then
         If Val(TE(LE, 2)) <> 0 Then TOn = Val(TE(LE, 2))
         If TE(LE, 3) <> "" And TE(LE, 4) = "non" Then TS(LS, 2) = Val(TE(LE, 3)): TS(LS, 3) = Val(TE(LE, 3)) - TOn: PasFait = False
         End If
      NbLig = NbLig + 1: End If: Next LE
TS(LS, 4) = NbLig
[A2:D5001].Value = TS
End Sub

 

[pierrejean]

Bonjour Florian
Salut Dranreb

Mon essai
NB: je n'ai pas saisi quelle était la dernière valeur a chercher !!!

 

[Dranreb]

Salut pierrejean.
Il dit en dernier: le nombre de lignes par cycle.
Mais en point 2 il dit le temps du premier "OFF" de chaque cycle dans la Feuil 2
J'ai supposé qu'il s'agissait de la différence entre ce OFF et le ON qui précède.

 

[Florian53]

2 - : Récupérer le temps du premier "OFF" de chaque cycle dans la Feuil 2

Par exemple pour le cycle 1 la valeur cherché est 6.8, en fait tous les cycles commence par un "ON" à un temps 0.00 et je voudrais récupérer le temps du 1er OFF a chaque cycle

3 - : Récupérer le nombre de ligne par cycle:

en gros avoir le nombre de lignes entre chaque cycle pour a la fin les diviser par 2 se qui me donnera le nombre de commutation

Merci à vous , car pour l'instant ça correspond tout a fait à ce que je voudrais il manque seulement le point 2 mais ma demande était pas très clair.

 

[pierrejean]

Re
Vois si cela te convient

 

[Florian53]

Nickel, un grand merci a vous. c 'est énervant de voir comment sa paraît facile pour vous . je vais faire des recherche ainsi qu'un petit mode pas à pas pour essayer de comprendre .

encore merci PierreJean, Dranreb.

 

[Florian53]

Bonjour a tous,

Je reviens vers vous afin de demander une modification,

je voudrais modifier ma demande sur le point suivant:

3 - : Récupérer le nombre de ligne par cycle:

en gros avoir le nombre de lignes entre chaque cycle pour a la fin les diviser par 2 se qui me donnera le nombre de commutation

En fait je voudrais récupérer le nombre de ligne par cycle seulement à partir du moment que la presence est " Oui" dans la colonne D et le tout diviser par 2 afin d'indiquer le nombre de commutation.

Merci à vous

 

[Dranreb]

Bonjour.

Et il ne vous est pas venu à l'idée d'étudier le code fonctionnant tel que vous le vouliez de façon à trouver comment le modifier pour qu'il fasse ce que vous voulez désormais ?

 

[Florian53]

Effectivement j'ai essayé de comprendre le code dés réception de celui mais il s’avère qu'avec les histoires de boucle j'ai beaucoup de mal à comprendre. Et ce n'est pas non plus le manque d'avoir essayé car je les fais avant de vous contacter mais malheureusement mon essai ne fonctionnait pas. C’est pour cela que je fais une demande en discussion.


Et pour ce qui est de penser, c’est souvent en utilisant que l’on voudrait perfectionner les outils utilisés.

 

[Dranreb]

À priori dans mon code c'est juste l'instruction NbLig = NbLig + 1 qui doit être changée de place pour qu'elle ne soit plus effectuée à chaque fois. Peut être ça deviendrait plus simple en rebaptisant CEstFait le Boolean PasFait et en intervertissant le sens de leurs valeurs True/False.

 

[pierrejean]

Re
vois ceci
NB: ne donne pas, a mon avis ,le nombre de commutation mais comme demandé le nombre de oui divisé par 2

 

[Florian53]

Ok super merci à vous. je vais prendre le temps de regarder ça. Mais sa fonctionne parfaitement