Schakelen tussen 2 Excel bestanden via Macro

[Afe1]

Hallo,

ik ben nieuw op dit Forum en  heb volgend probleem :

ik open een bestand via een celwaarde in "3Transfert"

in "3Transfert" selecteer ik een range die ik wil kopiëren naar het

geopend bestand "varCellvalue"

In mijn macro wordt de file goed geopend, maar ik kan de juiste instructie

om naar de andere file te gaan niet aan de praat krijgen. Ziehier mijn code :

 

Dim varCellvalue As String

    varCellvalue = Range("T11").Value
    ChDir "C:\Users\Gebruiker\OneDrive\Quinntra"
    
    Workbooks.Open Filename:=varCellvalue
  
    Windows("3Transfert.xlsm").Activate
    Sheets("Dorawa").Select
    Range("B2:K36").Select
    Selection.Copy
    Windows(varCellvalue).Activate
    Range("C63").Select
    Selection.PasteSpecial Paste:=xlPasteFormulasAndNumberFormats, Operation:= _
        xlNone, SkipBlanks:=False, Transpose:=False

"Windows(varCellvalue).Activate" werkt niet.

Hoe kan ik dit oplossen?

(de originele macro doet daarna nog een hele reeks verder)
 

[emielDS]

een voorbeeld bestand (zonder gevoelige info) zou veel duidelijk maken maar het zal ongeveer zo iets zijn.  

   

 

[Afe1]

Hallo Emiel,

 

hier een simpel voorbeeld.

In "Datajuist" werkt de code 'Windows("varCellvalue").Activate' niet.

DataJuist.xlsm Februari.xlsx

[emielDS]

Wat juist de bedoeling versta ik niet.

in macro 3 heb ik uw code een beetje opgeschoond maar de 2 bestanden moeten in dezelfde map staan.

een nieuwe maand kan je daar natuurlijk niet met aanmaken

 

in macro 4 staat een voorbeeld waar je maar 1 bestand moet openen om het blad op te slaan.

DataJuist (2).xlsm

[Afe1]

Even de volledige uitleg:

Maandelijks download ik een file van een extern bureau waarin ik prestaties van die maand in kopieer.

File van het bureau is hier "Februari" en mijn  file is "DataJuist"

In mijn file draait een macro die een hele reeks data oplaadt en die klaarzet om naar bijv. "Februari" te kopiëren.

Volgende maand is dit dus naar de file "Maart". Daarom wil ik ook de naam van de te openen file variabel maken.

In bijlage een kopie van de betrokken file "Februari(2)"

Hier staan alle personeelsleden onder elkaar en moeten mijn gegevens achtereenvolgens naar

C63,  C120 ,  C177,  C234,  C291 komen. Vermits ik niets aan die file kan en mag wijzigen zou het ideaal zijn om die

bestemmingen ook aanpasbaar te maken, zonder telkens mijn macro te wijzigen. Ik denk dan aan een lus die het aantal

werkbladen in mijn file telt en zoveel maal kopieert naar hun file. Maar volgende maand zijn die adressen uiteraard niet

gelijk aan deze maand. Ik zou bijv. In de file "Februari(2)" telkens naar de cel "Datum " gaan, daarna 2 posities naar beneden

en dan 2 posities naar rechts. Hier kom ik op de juiste cel om mijn data in te kopiëren.

Mijn kennis van VBA is te basic om dit te realiseren, dus zie je de mogelijkheid om dit gedaan te krijgen?

Alvast bedankt.

Februari(2).xlsx

[emielDS]

ik ga er mijn tijd niet insteken want dit is gans iets anders dan uw eerste voorbeeld.

Het volgende zal zijn

 

even de volledige uitleg

het klopt voor de maand februari maar in de maand maart zijn er 31 dagen hoe moet ik dat dan doen?

[Afe1]

Sorry voor je tijd, maar in maart zullen er steeds 31 dagen zijn,

dus kopieer ik 31 lijnen naar de file waar ook 31 lijnen zullen staan

en in april 30 enz...

 

Maar toch bedankt voor je moeite.

 

Gr.