Ecrire ds une cellule d'1 autre classeur

[Eric D]

Bonsoir à toutes et tous,

je voudrais transférer ma variable 'don' dans la cellule 'A100' de la feuille 'feuil1' ds 1 classeur 'fap', que j'ouvre, et je n'y arrive pas. Voici le code:

Workbooks.Open fap

pour l'ouverture et

Workbooks(fap).Sheets("Feuil1").Range("A100").Value = don

pour écrire ma variable, mais Je viens de m'appercevoir qu'apparement mon 1er classeur n'est plus actif...
car j'écris qqc ds mon 1er classeur, avant l'ouverture du 2ème classeur 'fap', et la même chose dans la cellule en dessous après l'ouverture. Dans la cellule X j'ai bien qqc d'écrit alors que ds la cellule X+1 rien...
Pourquoi je perds la 'main' sur le 1er classeur?

Merci beaucoup pour votre aide.

Eric D

 

[@+Thierry]

Bonsoir Eric, le Forum

Le mieux serait de mettre le code entier, car là j'ai du mal à te comprendre, désolé.

Bon Week End
@+Thierry

 

[Eric D]

bonjour toutes et tous,

Comme je le disais, en 'A90' j'ai bien'don',mais en 'A100', j'ai rien, donc j'en déduit, peut être à tord, que ds mon fichier 'fich' feuille 'feuil1' range 'A100', je ne peux pas avoir 'don'.

fap est le nom complet 'c:\...\fich'.

Range("A90").Value = don
Workbooks.Open fap ' ouvre le nouveau fichier
Range("A100").Value = don
Workbooks(fich).Sheets("Feuil1").Range("A100").Value = don
ThisWorkbook.Save
ThisWorkbook.Close

le classeur que j'ouvre 'fap' n'est pas ds le même répertoire que celui qui a la macro, faut il que 'fich' possede une partie du chemin ie 'rep1\rep2\fich' si mon classeur avec la macro se trouve ds 'rep1' ?

Merci pour votre aide.

Eric D