Visual Basic - Makro W Excelu, Pilne

[rafalf]

Witam

 

Mam pewien problem:

 

Muszę stworzyć skoroszyt w Microsoft Excel, który sumowałby wartości komórek z innych skoroszytów Excelowskich.

 

W praktyce miałoby to wyglądać tak:

Posiadam np. 4 skoroszyty (c:\budzet\budzet1.xls, c:\budzet\budzet2.xls, c:\budzet\budzet3.xls, c:\budzet\budzet4.xls).

 

Muszę stworzyć skoroszyt (niech będzie budzet-zbiorczy.xls), w którym byłoby makro, które sumowałoby konkretne wartości każdej z komórek (np. komórka D3 z budżet1.xls + D3 z budżet2.xls + D3 z budżet3.xls itd.)

 

Gdybym mógł to zrobić za pomocą formuły odwołań do poszczególnych plików Excela, byłoby to dla mnie łatwe zadanie. Niestety, Pan Dyrektor uparł się, że ma to być zrobione za pomocą makra.

 

Czy znalazłaby się osoba, która mogłaby mi napisać te nietrudne makro w VB?

 

Sprawa jest dość pilna. Dziękuję za każdą radę.

[Haze]

1. Tworzysz arkusz "budżet-zbiorczy" i deklarujesz w nim makro.

 

2. Żeby pootwierać te pliki z budżetami używasz

 

Workbooks.Open("c:\budzet\budzet1.XLS")

3. A żeby przemieszczać się pomiędzy otwartymi plikami używasz:

 

Workbooks("budzet1.XLS").Activate

4. I normalnie odwołujesz się do komórek:

 

cells(x,y)

a jeżeli w danym dokumencie jest więcej podformularzy używasz:

Worksheets("wydatki").Activate