Discussion :

[melodyyy]

Voila, en fait j'ai 3 onglets:
A qui contient tout, B ou excel doit retrouver la ligne de A, et C, ou Excel doit marquer la différence entre les 2 lignes de chaque colonne...

Par exemple: sur A j'ai une ligne B10 et dans une des cellule (on ne parle que pour une colonne la, mais je dois le faire pour toutes les colonnes de la ligne) de cette ligne j'ai 10, dans la même colonne dans le fichier B et dans la ligne B10 j'ai 11, Excel doit marquer dans C : B10 = 1 (11-10)

Il est possible qu'il ne retrouve pas la ligne dans B. Dans ce cas, il doit l'écrire dans C en mettant 0 partout. Si elle est dans B mais pas dans A, il doit l'inscrire dans C en mettant les chiffres de C (copier coller).


Qui peut m'aider ? j'ai presque pas d'idées...

[Larsen21]

Pourrais tu détailler un peut plus svp ?
Merci

[melodyyy]

c'est déja hyper détaillé je trouve, que voudrais tu savoir en + ?

[Larsen21]

Je pense que tu peux utiliser find pour chercher ces valeurs

d'abord dans A

puis ensuite une fois que find te renvoi le Range de la bonne cellule alors,
avec les propriétés Row et Column

tu va chercher la meme cellule mais dans B

puis ensuite tu les compares.

Est ce que ça t'aide ?

[melodyyy]

c'est pas bete...mais c'est le ensuite tu les compare...
je débute si tu veux, je commence à me débrouiller mais bon...

[Larsen21]

En fait je ne sais pas si tu fait ton action a partir d'un bouton, doit tu faire écrire le résultat de C de toutes les lignes correspondantes de A et B car si c'est oui.
Tu n'a pas besoin de VBA pour faire ça excel sait très bien le faire.

Mais si tu veux le faire a la demande avec une textbox par exemple alors c'est différent tu peux utiliser VBA.

Deux petits exemple :
Sans VBA :

il te suffit d'entrer cette formule dans la cellule de C puis de l'etendre dans les autres :

Code :

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

=SI(ESTVIDE(B!A1);0;A!A1-B!A1)

si c'est avec vba alors dis moi en plus sur la façon dont tu veux effectuer ce calcul et la rechercher.

Mais je te donnes un exemple quand meme :

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
18
19
 
'ça c'est pout faire ta recherche a partir d'une combobox1 en tapant la valeur recherchée dedans
On Error Resume Next
With Sheets("A").Columns(1)
 .Find(What:=TextBox1.Text, LookIn:=xlValues, SearchDirection:=xlNext, _
 SearchOrder:=xlByRows, MatchCase:=False).Select
 End With
On Error GoTo 0
'ça sa te donne le nbre de la ligne et de la colonne recherchée
L = ActiveCell.Row
c = ActiveCell.Column
 
Sheets("C").Select
'calcul en prenant en compte le fait que si la cellule concernée en B est vide alors en C = 0
If Sheets("B").Cells(L, c).Value = "" Then
Sheets("C").Cells(L, c).Value = 0
Else
Cells(L, c).Value = Sheets("A").Cells(L, c).Value - Sheets("B").Cells(L, c).Value
End If

Voila

j'espère que sa t'aide plus

a+

[Larsen21]

Je suis désolé mais je ne comprend pas clairement ce que tu veux faire