Jak obnovit všechny pozice komentářů v aplikaci Excel?
V listu, který je naplněn několika komentáři, někdy potřebujeme upravit nebo přesunout pozici pole pro komentář, aby se zobrazil obsah buňky za polem pro komentář, v tomto případě budou pole pro komentář přesunuta na různé pozice. Po dokončení operace musíte vrátit pole komentářů na jejich původní pozici, jak byste mohli obnovit všechny pozice komentářů najednou v aplikaci Excel?
Resetujte všechny pozice polí komentářů pomocí kódu VBA v aplikaci Excel
Jedním kliknutím resetujete všechny pozice polí komentářů Kutools for Excel
Resetujte všechny pozice polí komentářů pomocí kódu VBA v aplikaci Excel
Následující kód VBA můžete použít k obnovení všech polí komentářů do jejich původních pozic najednou.
1. Podržte ALT + F11 klávesy pro otevření Okno Microsoft Visual Basic pro aplikace.
2, klikněte Vložit > Modula vložte následující kód do Okno modulu.
Kód VBA: Resetuje všechny pozice komentářů v aktivním listu
Sub ResetComments()
'Update 20141110
Dim pComment As Comment
For Each pComment In Application.ActiveSheet.Comments
pComment.Shape.Top = pComment.Parent.Top + 5
pComment.Shape.Left = pComment.Parent.Offset(0, 1).Left + 5
Next
End Sub
3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a všechny pozice komentářů v aktivním listu byly resetovány najednou. Zobrazit snímky obrazovky:
 |
 |
 |
Resetujte všechny pozice pole s komentářem pouze jedním kliknutím
Zde představujeme Obnovit pozici komentáře užitečnost Kutools for Excel. S tímto nástrojem jediným kliknutím můžete rychle obnovit všechny pozice komentářů v aktivním listu nebo ve všech listech.
Před aplikací Kutools for Excel, Prosím nejprve si jej stáhněte a nainstalujte.
1. Pokud chcete pouze obnovit pozici všech polí poznámek v aktivním listu, klikněte prosím Kutools > Moře > Obnovit pozici komentáře > Aktivní list.
Chcete-li obnovit polohu všech polí komentářů ve všech listech aktuálního sešitu, klikněte prosím Kutools > Moře > Obnovit pozici komentáře > Všechny listy. Viz snímek obrazovky:
Po kliknutí na Aktivní list nebo Všechny listy budou všechny pozice komentářů na aktivním listu nebo na všech listech okamžitě obnoveny do původních pozic.
Pokud chcete mít bezplatnou zkušební verzi (30-den) této utility, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.
Jedním kliknutím resetujete všechny pozice polí komentářů Kutools for Excel
Související články:
- Jak změnit barvu indikátoru komentáře v aplikaci Excel?
- Jak zvýraznit všechny buňky komentáři v aplikaci Excel?
- Jak automaticky přidat datum a čas pro komentář v aplikaci Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své excelentní dovednosti pomocí Kutools for Excela zažijte efektivitu jako nikdy předtím. Kutools for Excel Nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab Přináší rozhraní s kartami do Office a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
