(_最初に見たときに思ったほど時間はかかりませんし、安全です!)
以下の手順では、2つのシートがあります。
元のシートを YourOriginalSheet
と呼んでみましょう(これは元のシートの実際の名前を表します)。
もう一方のシート ShortSheet
を呼び出してみましょう。
(1) YourOriginalSheet
, Select
, Copy
に関連するセルの範囲を記入する(まだどこにも貼り付けないでください)。
(2) ShortSheet
という名前の新しいシートを追加し、_コピーする範囲の**左上隅*を表すセル(おそらくA1
)にカーソルを入れて、このように貼り付ける。
(2a) Paste Special...
> Formulas
[右クリックして左上隅のセル]
(2b) Paste Special...
> Values
(2c) Paste Special...
(2d) Formats
(2e) シートの見栄えを良くするのに役立ちそうな他のPaste Special...
オプションを入れてください。
(3) Column Widths
を押して、Paste Special
の右下隅を見つけ、関連するデータがすべて含まれていることを確認する。
(4) Ctrl-Shift-End
ワークブックを作成する。
(5) ShortSheet
を削除 (関連データは現在Save
に保存されています)
(6) Save As ...
の名前を元のシートの実際の名前に変更YourOriginalSheet
macroShortSheet
SelectShortSheet
Copy`.
Nothing has changed except to make the workbook a lot smaller, so all macros, external references to this worksheet, etc. should still work.
Here is a Personal.xlsb
to accomplish the steps in (2).
0x1&
_Before using the macro, Ctrl + Shift + V
を押して、それに変更します。