Makra (Propojení s Microsoft Excel)
Z Prirucky
Makra (Propojení s Microsoft Excel)
Převod na hodnoty
(označ vše, zkopíruj, vlož jinak - hodnoty)
Cells.Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Application.CutCopyMode = False Range("A1").Select End Sub
Obarvení názvu listu
Pevně určený název listu
Sheets("1.7.2015").Select With ActiveWorkbook.Sheets("1.7.2015").Tab .Color = 5287936 .TintAndShade = 0 End With
Aktivní list
With ActiveWorkbook.ActiveSheet.Tab .Color = 5287936 .TintAndShade = 0 End With
Zamknutí listu
Sheets("1.6.2015").Select ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Jméno aktivního listu
aktivni_list = ActiveSheet.Name