Discussion :

[Coco_O]

Bonjour,

Dans un classeur toto.xls, feuille1 j'ai la valeur 500 en B2.
Dans une macro, je voudrais pouvoir utiliser cette valeur pour faire un produit
A = X * var_B2

Je pensais à quelque chose du genre:

Code :

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

1
2
dim var_B2 As Range
set var_B2 = Workbooks("toto.xls").Sheets("feuille1").Range("B2").Value

Mais ca ne marche pas :/

[pgz]

Bonjour.


Le type de var_B2 est incorrect. Cela ne doit pas être un objet mais une donnée. Type Single, par exemple. Ou alors tu ne prends pas .Value...

Après, cela devrait marcher si

• le nom du classeur est correct
• si le classeur est ouvert et dans la même application Excel
• si le nom de feuille est correct.

Tu n'as pas indiqué si ton code lève une erreur.

Cdlt,

PGZ

[Coco_O]

Heureusement que le we approche, je fais vraiment n'importe quoi, merci de ta patience PGZ. Voici ce que j'ai fait et ca marche bien!

Code :

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

1
2
3
4
5
6
Dim tjm_fin As String
 
    Windows("DSIC-Outil-Planif RH_V0.2.xlsx").Activate
    Sheets("TJM Brut par Producteur").Select
    Range("B2").Select
    tjm_fin = Selection.Value

Je n'arrive jamais à avoir la bonne syntaxe pour faire

tjm_fin = Workbooks("").Sheets(""). etc.

[pgz]

Re,

Normalement,

Code :

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

tjm_fin = Workbooks("DSIC-Outil-Planif RH_V0.2.xlsx").WorkSheets("TJM Brut par Producteur").Range("B2").Value

Devrait fonctionner.

PGZ