|
|
| Řádek 1: |
Řádek 1: |
| Makro pro převedení vzorců na hodnoty
| |
|
| |
|
| (označ vše, zkopíruj, vlož jinak - hodnoty)
| |
|
| |
|
| |
|
| |
| Cells.Select
| |
| Selection.Copy
| |
| Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
| |
| :=False, Transpose:=False
| |
| ' Range("A1").Select
| |
| Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
| |
| SkipBlanks:=False, Transpose:=False
| |
| Application.CutCopyMode = False
| |
| Range("A1").Select
| |
| End Sub
| |