Minulla on useampi työkirja, joissa kaikissa samassa solussa luku. Haluaisin lukujen summan kaikkien työkirjojen tietystä solusta. Kuinka pystyn sen helposti toteuttamaan.
Kiitoksia etukäteen
Kiitoksia etukäteen
Tietojen kokoamine
tepa
3463
0Äänestä
Muut lukivat myös
Odottaa vastausta
Näihin keskusteluihin ei ole vielä vastattu. Ole ensimmäinen.
Vastaukset 3
Vanhimmat
yksinkertainen summakaava
=SUM([Book1]Sheet1!$A$1;[Book2]Sheet1!$A$1)
Pystyykö Excelillä toiminnon tekemään automaattisemmin, niin ettei tarvitse kirjoittaa työkirjan nimeä.
Esim. Että merkkaan jotenkin ne työkirjat joista tieto poimitaan ja mihin erillisen työkirjan kenttään tieto summataan?!
Kyse on kymmenistä dokumenteista, joista tieto tulee poimia.
Avaa kaikki tarvittavat työkirjat, laita tämä makro tyhjään työkirjaa, aja se. Soluissa pitää olla lukuja muuten tulee siansaksaa tai makro pysähtyy.
Sub KirjojenSolut()
Dim Kirja As Workbook
Application.DisplayAlerts = False
Application.ScreenUpdating = False
For Each Kirja In Workbooks
If Kirja.Name ThisWorkbook.Name Then
ThisWorkbook.Worksheets(1).Cells(1, 1) = ThisWorkbook.Worksheets(1). _
Cells(1, 1) Kirja.Worksheets(1).Cells(1, 1)
Kirja.Close
End If
Next Kirja
End Sub