Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Problème de report de valeurs d'une feuille à une autre

  • Initiateur de la discussion Thibaut
  • Date de début
T

Thibaut

Guest
re-re-bonjour le forum ;o)
Promis, c est mon dernier problème de la journée... Bon, J ai un classeur composé de 4 feuilles... Sur la première sont importées des données et certains calculs sont effectués. En reprend les valeurs pour les mettre sur les autres feuilles... Mais (et je ne comprends pas pourquoi) lors de l exécution de la macro les cellules des 3 autres feuilles se remplissent de #NAME?
Voici une partie de mes lignes de codes... (ben oui, je ne vais pas tout mettre vu que c est souvent le même avec juste des différences de références de cellules)

Sheets("jan-apr.").Select

Range("B9").Select
ActiveCell.Formula = "='Feuille de calcul'!AE6"
Range("B9").Select
Selection.AutoFill Destination:=Range("B9:B39"), Type:=xlFillDefault
Range("B9:B39").Select
ActiveWindow.ScrollRow = 1

Range("C9").Select
ActiveCell.Formula = "='Feuille de calcul'!AF6"
Range("C9").Select
Selection.AutoFill Destination:=Range("C9:C39"), Type:=xlFillDefault
Range("C9:C39").Select
ActiveWindow.ScrollRow = 1

Range("E9").Select
ActiveCell.FormulaR1C1 = "='Feuille de calcul'!AE37"
Range("E9").Select
Selection.AutoFill Destination:=Range("E9:E37"), Type:=xlFillDefault
Range("E9:E37").Select
ActiveWindow.ScrollRow = 1

Range("F9").Select
ActiveCell.FormulaR1C1 = "='Feuille de calcul'!AF37"
Range("F9").Select
Selection.AutoFill Destination:=Range("F9:F37"), Type:=xlFillDefault
Range("F9:F37").Select
ActiveWindow.ScrollRow = 1


Merci à quiconque pourra me venir en aide

Bonne aprèm

Thibaut
 
T

Thibaut

Guest
Je crois avoir trouvé...

ActiveCell.FormulaR1C1 = "='Feuille de calcul'!AE37"

devient

ActiveCell.Formula = "='Feuille de calcul'!AE37"

p ... je teste ça et je vous dit quoi...
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…