Zao mi je sto je toliki naziv teme ali nisam mogao da ga skratim,a i problem je manje vise jasan iz naslova.
Imam tabelu sa 280 sheetova i treba mi mogucnost da sve sheetove i njihove sadrzaje kopiram u prvi od njih.
Posle toga bi vrsio selekciju kako mi odgovara.Makro koji sam snimio je sledeci:
Sub Macro6()
'
' Macro6 Macro
'
' Keyboard Shortcut: Ctrl+t
'
Rows("6:7").Select
Selection.Copy
Sheets("Statement1").Select
Range("A19").Select
Selection.PasteSpecial Paste:=xlPasteAllUsingSourceTheme, Operation:=xlNone _
, SkipBlanks:=True, Transpose:=True
Range("A21").Select
End Sub
Ali mi svaki sledeci sheet koji izaberem snimi sa pocetkom na A19,a i sa ovim moram svaki sheet da aktiviram
Nikada nisam radio nista u VBA pa se nadam da mi neko moze pomoci,posto sam se ubio googlajucu,ocigledno ne ispravno.Rucno nema sanse posto ima kao sto sam rekao 280 sheetova!!!
Tnx a lot