Discussion :

[rapheb]

Bonjour,

Je possède une base de données (une 20aine de colonnes et plusieurs milliers de lignes) faisant référence à des opérations quelconques (1 par ligne).
Dans l'une de mes colonnes ait indiqué le trimestre de l'opération sous le format suivant : "3 Q 11" pour le troisième trimestre 2011 ou "1 Q 12" pour le premier trimestre 2012, etc...

Sur ces références de trimestre je souhaiterai appliquer une condition du type :
Si "1 Q 12" > "3 Q 11" alors "Plus récent" sinon "Plus ancien".

Comment faire comprendre à Excel ce format ? VBA avec un tableau (i Q j, i = 1 to 4 et j = 11 to 99 ?)

Merci pour votre aide,

[Didier Gonard]

Bonjour,

rien à voir avec les dates si tu ne veux pas un casse tête, vois dans les tutos les traitements de chaîne de caractères ainsi que la fonction Split / aide VBA

un code soupe pour te donner une piste :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub DG()
Dim A, B, C, D
Dim chaine1
Dim chaine2
 
chaine1 = "1 Q 11"
chaine2 = "2 Q 09"
 
A = Left(chaine1, 1)
B = Left(chaine2, 1)
C = Right(chaine1, 2)
D = Right(chaine2, 2)
 
MsgBox A > B
MsgBox C > D
 
End Sub

Cordialement,

Ps : si le côté technique de la réponse = OK ou pas => pensez à cliquer sur les pouces et quand question résolue à la taguer résolue, et chaque action vous rapporte des points

Didier

[rapheb]

Super la fonction Split, je connaissais pas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub test()
Dim trim() As String
For i = 1 To 5
trim = Split(Cells(i, 1), " Q ")
Cells(i, 2) = trim(1) & trim(0)
Next i
End Sub

Mes "3 Q 11", "1 Q 12", etc en première colonne et une concanétation en colonne 2 qui donne respectivement 113 et 121.. je peux ensuite faire mes comparaisons.


Merci