trends4media

[XL-2010] Fusion données ayant date identique sujet

mardi 8 avril 2014

Bonjour a tous,

je viens de m'inscrire sur ce forum car mes compétences sur Excel, assez limitées, ne me permettent pas d'arriver à mes fins .... jusque là j'ai toujours réussit à bidouiller grâce aux formules et aux réponses des forums mais là je pense que je vais devoir passer par le VBA, or je n'ai aucune compétence en code....
Bref assez parler de moi, venons-en à mon petit soucis, qui pourra surement intéresser d'autres personnes !

En effet, je souhaite "fusionner" deux séries de données correspondant à des mesures réalisées à des dates et horaires précis.
Je possède donc :
- une série de données avec un champ "date et heure" et un champ "mesure automatique"
- une série de données avec un champ "date et heure" et un champ "mesure manuelle"

je souhaiterais obtenir donc obtenir une seule série de données contenant les trois champs "date et heure" "mesure automatique" et "mesure manuelle" me permettant ainsi de comparer directement les valeurs.

Mon principal soucis provient du fait que l’élément de référence est une date, ce qui signifie que des mesures réalisées le 18/03/2014 à 08:31:00 peuvent avoir plusieurs valeurs une fois converties au format nombre dans mon cas 41716,3548611146... et 41716,3548611111... Ce petit détail m'empêche par exemple d'utiliser la fonction rechercheV ....

Si quelqu'un possède donc une macro ou un fichier excel sur lequel je pourrais me baser cela m'arrangerait beaucoup !

merci d'avance !!

Julien

Twig calcul de durée ( date ) sujet

Bonjour à tous et à toutes,

S'il vous plait, je suis encore débutant en Symfony2, et en développant une application, je souhaite afficher pour les utilisateurs des notifications avec la durée ( comme facebook ) par exemple : <notification> il y'a 50 min / 2heures ... ou bien hier à 23h
voila mais je ne sais pas comment je dois faire pour afficher cette durée là.

Je vous remercie d'avance chers amis :)

[AC-2003] AFFICHER UNE DATE EN FORMAT FRANCAIS dans un Texte_box sujet

Bonjour,

J'ai un formulaire ou j'ai inseré :
- 2 Texte_box date
Dans ces 2 Texte_box, j'inscris une datedebut et une datefin en format francais jj/mm/aaaa hh:mm
- une liste_box qui normalement doit m'afficher un tableau avec des données

Le soucis, c'est que, lorsque j'affiche la datedebut et la datefin en format francais, ma liste_box reste vide.
Et lorsque j'affiche la datedebut et la datefin en format anglais ( mm/jj/aaaa hh:mm), les données s'affichent dans ma liste box.

Comment faire en sorte, que ma liste_box m'affiche les données avec une datedebut et une datefin en format francais jj/mm/aaaa hh:mm

Merci d'avance de votre aide

Voici mon code vba

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
Option Compare Database

Dim Vdatedebut As Date
Dim Vdatefin As Date

Dim txt_ChaineSQL As String
Dim strSQLSELECT As String
Dim strSQLFROM As String
Dim strSQLWHERE As String
Dim strSQLGROUPBY As String
Dim strSQLHAVING As String
Dim strSQLORDERBY As String



Private Sub Cmd_vrac_Click()



Vdatedebut = CDate(Texte_datedebut)
Vdatefin = CDate(Texte_DateFin)


MsgBox (Vdatedebut)

MsgBox (Vdatefin)


With Me.Listevrac
.RowSourceType = "Table/Requête"
.ColumnCount = 5 ' nombre de colonne que dois avoir le formulaire
.BoundColumn = 1 ' la colonne de reference


strSQLSELECT = "SELECT dbo_vwParts.DisplayName AS Antennes, Count(dbo_vwItemEventHistory.ItemID) AS [Nbre colis injectés]"

strSQLFROM = "FROM dbo_vwItemEventHistory INNER JOIN dbo_vwParts ON dbo_vwItemEventHistory.PartID = dbo_vwParts.ID"

strSQLWHERE = "WHERE(((dbo_vwItemEventHistory.EventTime)>=#" & Format(Vdatedebut, "dd/mm/yyyy HH:mm:ss") & "# And (dbo_vwItemEventHistory.EventTime) <=#" & Format(Vdatefin, "dd/mm/yyyy HH:mm:ss") & "#))"

strSQLGROUPBY = "GROUP BY dbo_vwParts.DisplayName"

strSQLHAVING = "HAVING (((dbo_vwParts.DisplayName) Like 'injection*'))"

strSQLORDERBY = "ORDER BY dbo_vwParts.DisplayName;"





txt_ChaineSQL = strSQLSELECT & vbCrLf & _
                strSQLFROM & vbCrLf & _
                strSQLWHERE & vbCrLf & _
                strSQLGROUPBY & vbCrLf & _
                strSQLHAVING & vbCrLf & _
                strSQLORDERBY
                
  MsgBox txt_ChaineSQL
                
Debug.Print txt_ChaineSQL
                



.RowSource = txt_ChaineSQL
.Requery

End With

End Sub