sobota, 31. oktober 2015

Excel - Kje se nahaja PERSONAL.XLSB

Za office 365
C:\Users\Username\AppData\Roaming\Microsoft\Excel\XLSTART

http://wheatblog.com/2011/08/where-is-the-excel-personal-macro-workbook-located/

ponedeljek, 5. oktober 2015

Shranjevanje Excel delovnih listov v datoteke

Večkrat imamo Excelov dokument v katerem je vsakemu zaposlenemu namenjen svoj  list. Kroženje takega dokumenta povzroča nejevoljo, zato vsak list shranimo kot ločeno tabelo:
Vhodni dokument shranim (premaknem) v novo (prazno) mapo, ga odprem in z

<Alt><F11>
odprem Visual Basic. Nto pa kliknem:

Insert, Module

in v novo okno prekopiram:

Sub Splitbook()
'Updateby20140612
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
    xWs.Copy
    Application.ActiveWorkbook.SaveAs Filename:=xPath & "\" & xWs.Name & ".xls", FileFormat:=56
    Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub


Nato pa ga poženem:

<F5>

Cel kup dela prišparanga. Datoteke so v obliki xls za Excel 2003.
Makro povzet iz:
http://www.extendoffice.com/documents/excel/628-excel-split-workbook.html
http://www.rondebruin.nl/win/s5/win001.htm