XL 2016 copie valeurs par VBA

mcj1997 · 10 Octobre 2023

Bonjour,

J’utilise un ancien fichier avec la macro suivante :

Derlig = Worksheets("maison").Range("D" & Rows.Count).End(xlUp).Row + 1

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B4].Value

Cette macro me permet de rapporter sur la feuille maison colonne D (dernière ligne dispo) la valeur en B4 de la feuille statistique.

Ma demande : au lieu de renvoyer la valeur B4, je souhaite renvoyer la somme de B4 + B5 toujours de la feuille statistique vers la feuille maison

Merci d’avance,

sylvanu · 10 Octobre 2023

Bonjour Mcj,
Votre titre n'est guère évocateur.
Essayez :

VB:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B4]+Worksheets("statistique").[B5]
ou encore
Sheets("maison").Range("D" & Derlig) =Application.Sum(Sheets("statistique").[B4:B5])

Lolote83 · 10 Octobre 2023

Bonjour
Peut être en faisant soit :
- La somme sur la feuille Statistique et y faire appel
Exemple somme en B10 = B4+B5

VB:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B10].Value

- La somme directement via le code

Code:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B4].Value + Worksheets("statistique").[B5].Value

Cordialement
Lolote83

mcj1997 · 10 Octobre 2023

sylvanu à dit:
Bonjour Mcj,
Votre titre n'est guère évocateur.
Essayez :

VB:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B4]+Worksheets("statistique").[B5] ou encore Sheets("maison").Range("D" & Derlig) =Application.Sum(Sheets("statistique").[B4:B5])

Merci je vais tester

mcj1997 · 10 Octobre 2023

Lolote83 à dit:
Bonjour
Peut être en faisant soit :
- La somme sur la feuille Statistique et y faire appel
Exemple somme en B10 = B4+B5

VB:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B10].Value

- La somme directement via le code

Code:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B4].Value + Worksheets("statistique").[B5].Value

Cordialement
Lolote83

Merci

mcj1997 · 10 Octobre 2023

Lolote83 à dit:
Bonjour
Peut être en faisant soit :
- La somme sur la feuille Statistique et y faire appel
Exemple somme en B10 = B4+B5

VB:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B10].Value

- La somme directement via le code

Code:

Worksheets("maison").Range("D" & Derlig) = Worksheets("statistique").[B4].Value + Worksheets("statistique").[B5].Value

Cordialement
Lolote83

Merci

XL 2016 copie valeurs par VBA

mcj1997

XLDnaute Accro

sylvanu

XLDnaute Barbatruc

Lolote83

XLDnaute Barbatruc

mcj1997

XLDnaute Accro

mcj1997

XLDnaute Accro

mcj1997

XLDnaute Accro

Discussions similaires