Marion1985
XLDnaute Nouveau
Bonjour, je dois remplir un tableau Excel dont les données proviennent de fichier différents. Pour cela jai crée un commandbutton dont le code est:
Private Sub CommandButton3_Click()
Application.DisplayAlerts = False
For j = 17 To 18
Cells(i, j).Select
numfichier = j - 16
ActiveCell.FormulaR1C1 = "='L:\cdg\TDBG\Technique\[0 & numfichier & SPIARDEPVL 2006.XLS]37'!R67C4"
Next j
Application.DisplayAlerts = False
End Sub
Quand je lance le code mes cellules se remplissent de #REF!. Pourquoi? Ma concaténation est-elle mauvaise? J'ai essayé plein de choses mais j'ai toujours le même problème....
Private Sub CommandButton3_Click()
Application.DisplayAlerts = False
For j = 17 To 18
Cells(i, j).Select
numfichier = j - 16
ActiveCell.FormulaR1C1 = "='L:\cdg\TDBG\Technique\[0 & numfichier & SPIARDEPVL 2006.XLS]37'!R67C4"
Next j
Application.DisplayAlerts = False
End Sub
Quand je lance le code mes cellules se remplissent de #REF!. Pourquoi? Ma concaténation est-elle mauvaise? J'ai essayé plein de choses mais j'ai toujours le même problème....