Bonjour à tous,
Je cherche à faire référence à des classes nommées d'un autre classeur que le classeur actif, sachant que ce classeur porte un nom variable, qui est donc stocké dans une variable string..
Pour le moment, ma macro fait ce que je veux en activant tour à tour les classeurs (bonjour les yeux) et en stockant la valeur à "transférer" dans une variable temporaire
Je souhaiterais quelquechose comme :
For i = 1 to 10
With Workbooks("Ulysse.xlsm").Sheets("PCG")
.Cells(j + i, Range("PCG_debitctrl").Column)range(nomfichierfacture!nomfeuille!TOTAL).offset(i,0)
end with
next i
POur le moment ça fonctionne tant bien que mal comme ceci:;
For i = 1 to 10
With Workbooks("Ulysse.xlsm").Sheets("PCG")
Workbooks(nomfichierfacture).Activate
temp = Range("TOTAL").Offset(i, 0) 'debité ctrl d'après facture
Workbooks("Ulysse.xlsm").Activate
.Cells(j + i, Range("PCG_debitctrl").Column) = temp
end with
next i
MERCI par avance à tous pour votre aide précieuse.
Emmanuel
Je cherche à faire référence à des classes nommées d'un autre classeur que le classeur actif, sachant que ce classeur porte un nom variable, qui est donc stocké dans une variable string..
Pour le moment, ma macro fait ce que je veux en activant tour à tour les classeurs (bonjour les yeux) et en stockant la valeur à "transférer" dans une variable temporaire
Je souhaiterais quelquechose comme :
For i = 1 to 10
With Workbooks("Ulysse.xlsm").Sheets("PCG")
.Cells(j + i, Range("PCG_debitctrl").Column)range(nomfichierfacture!nomfeuille!TOTAL).offset(i,0)
end with
next i
POur le moment ça fonctionne tant bien que mal comme ceci:;
For i = 1 to 10
With Workbooks("Ulysse.xlsm").Sheets("PCG")
Workbooks(nomfichierfacture).Activate
temp = Range("TOTAL").Offset(i, 0) 'debité ctrl d'après facture
Workbooks("Ulysse.xlsm").Activate
.Cells(j + i, Range("PCG_debitctrl").Column) = temp
end with
next i
MERCI par avance à tous pour votre aide précieuse.
Emmanuel