[ vojvoda1010 @ 01.11.2015. 13:56 ] @
Molim za pomoc.
Hteo bih da koiram neke podatke iz vise sheet-ova u jedan sheet.
Primer: radni SHEET1, u njega hocu da kopiram podatke iz SHEET2 i to celiju A1, SHEET3 celiju A1, SHEET4 celiju A1... SHEET129 celijaA1.
Kako da u SHEET1 uradim da ne moram rucno da upisujem u A1 =SHEET1,A1, pa u A2 =SHEET2,A1.
Da li postoji automatizam za to?
[ elektroing @ 01.11.2015. 18:37 ] @
Mozes jednostavno odraditi pomocu macroa.

Code:

Private Sub CommandButton1_Click()
For i = 1 To 128
Sheets("Sheet1").Cells(i, 1).Value = Sheets("Sheet" & i + 1).Cells(1, 1).Value
Next i
End Sub
[ vojvoda1010 @ 02.11.2015. 09:14 ] @
evo primera pa ako moze iz svakog sheet-a u jedan sheet izvuci vrednosti iz celija A10
[ elektroing @ 02.11.2015. 11:40 ] @
Code:

Sub Button1_Click()
For i = 1 To 8
Sheets("UK").Cells(i, 1).Value = Sheets("Sheet" & i ).Cells(10, 1).Value
Next i
End Sub


Kratko pojasnje da mozes poslije da prilagodjavas

For i = 1 To 9
petlja koja ide od prvog do zadnjeg sheet-a, zavisno kolko ih imas

Sheets("UK").Cells(i, 1).Value
sheet u kojos se smjestaju rezultati u koloni A


Cells(10, 1) = A10, npr. B9=Cells(9, 2)
[ vojvoda1010 @ 02.11.2015. 12:20 ] @
Hvala ti puno, samo kad bi mi jos rekao kako se snima macro bio bih jos vise zahvalan
[ Jpeca @ 02.11.2015. 13:55 ] @
O radu sa makroima imaš posebnu temu: http://www.elitesecurity.org/t222802-Office-Rad-sa-makroima

Rešenje bez makroa podrazumeva korišćenje funkcije INDIRECT. Npr ako u sumarnom listu u kolonu A uneseš nazive listova sa koga se uzivaju vrednosti
INDIRECT( A1 & "!A10") vratiće vrednost ćelije A10 iz Sheet1, pa kopiraš formulu nadole za ostale listove.

Pogledaj list sumarni u prilogu