Discussion :

[nsqualli]

bonjour,

ce que je veux faire, est d'afficher la valeur de somme dans la cellule

Code :

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

FeuilDst.Range("B" & DerLig1 + 1).

SVP dites moi si cette instruction est fausse, car ça marche pas :

Code :

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

FeuilDst.Range("B" & DerLig1 + 1).Value = somme

sachant que somme est une variable qui contient un double, et qui s'affiche quand j'utilise msgbox.

[peaceandloveman01]

Bonjour,

Quand tu utilise ceci:

Code :

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

FeuilDst.Range("B" & DerLig1 + 1) = somme

quelle est la déclaration de tes variables ??

Cordialement,

Lyonel

[nsqualli]

Bonjour,

Quand tu utilise ceci:

Code :

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

FeuilDst.Range("B" & DerLig1 + 1) = somme

quelle est la déclaration de tes variables ??

Cordialement,

Lyonel

pour la creation de la nouvelle feuille:

Code :

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

1
2
3
Sheets.Add
ActiveSheet.Name = "conso-factu TMA AXA"
Set FeuilDst = ActiveSheet

pour derlig1:

Code :

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

1
2
Dim DerLig1, DerLig2 As Long
DerLig1 = .Range("G" & Rows.Count).End(xlUp).Row

somme c une variable de type double

[peaceandloveman01]

essaie avec ça plutôt pour voir si ça change quelque chose:

Code :

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

FeuilDst.cells(DerLig1 + 1,2) = somme

[nsqualli]

essaie avec ça plutôt pour voir si ça change quelque chose:

Code :

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

FeuilDst.cells(DerLig1 + 1,2) = somme

bein toujours rien

[nsqualli]

bein toujours rien

là j'ai fais un travail pas trop professionel, mais ça marche

Code :

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

FeuilDst.Cells(3, 2) = sommeALAMI

et je dois faire ça pour chaque ressource

[oOVaveOo]

Tu as déclaré ta feuildst ?

Code :

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

Dim feuildst as worksheet

[nsqualli]

Tu as déclaré ta feuildst ?

Code :

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

Dim feuildst as worksheet

oui biensur

[oOVaveOo]

Bonjour,

Essaye avec :

Code :

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

sheets("FeuilDst").Range("B" & DerLig1 + 1) = somme