Lezen in een andere workbook via VBA

[Filip]

Hallo,
In een excelbestand wil ik via VBA een ander bestand (excel) openen op de
achtergrond en van een bepaald tabblad uit dit geopend bestand cellen
uitlezen en schrijven in cellen op een tabblad van het originele bestand.
Ik heb al aan het zoeken geweest doch ik kom er niet uit.Wie kan helpen ?

Hopende op een spoedig antwoordje dank ik jullie reeds.

Met vriendelijke groeten,
Filip

[Arie]

Filip,

Ik gebruik onderstaande macro voor het ophalen van een nummer uit een
ander excel bestand.
Als je dit een beetje aanpas kom je er vast wel uit.

Groeten
Arie

On Error GoTo 1

myfile = ActiveWorkbook.Name

If Range("invulblad!C1") <> "" Then Exit Sub
Application.ScreenUpdating = False

Workbooks.Open Filename:="C:\Mydocuments\opdrachten\Volgnummers"
'dit is het bestand wat geopend moet worden

MyCMR = Range("A8")

Range("A8") = MyCMR + 1
ActiveWorkbook.Save
ActiveWindow.Close

Windows(myfile).Activate

Range("invulblad!C1") = MyCMR

Application.ScreenUpdating = True
1
End Sub

[Wigi]

Via de eerste de beste zoekactie in Google:

http://www.ozgrid.com/forum/showthread.php?t=14068

--
<a
href="http://users.skynet.be/fa436118/wim/opdrachten.htm">http:/www.wimgielis.be</a>: Excel (VBA code + example files), sports and music.

[Aow67NEE]

Misschien een andere mogelijkheid te overwegen:
Veel sneller en voor de gebruiker onzichtbaar.
Zelf "zweer" ik bij de methode vanuit het ene bestand gegevens weg te
schrijven naar een txt of csv bestand.
Deze gegevens in het andere bestand lezen m.b.v

Open besrtand.csv" For output As #1
write #1, cells("q1")
Close #1

Open besrtand.csv" For Input As #1
Input #1, gegevens
Close #1

(Al in meerdere topics behandeld)

Groeten
Frits