FC2ブログ
エホバの証人二世の、個人研究&趣味blogです。
2019/02«│ 2019/03| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 »2019/04
文字色の変化のON/OFFが出来ます。文字サイズ文字サイズ:大文字サイズ:中文字サイズ:小
23:45:48
今年中にエクセル内のいらないものを消したいのですが、いらないものが多すぎるっ!!!
何故こんなにいらないものがあるのでしょうか。そして一発で消して大丈夫なのかが分かりません。
会社のパソコンでは処理落ちしそうで嫌ですね。

Sub 非表示の名前を削除する()
Dim nm
For Each nm In Names
If nm.Visible = False Then
nm.Delete
End If
Next
End Sub

Sub 非表示のシートを削除する()
Dim ws
For Each ws In Worksheets
If ws.Visible = False Then
ws.Delete
End If
Next
End Sub

Sub シートの保護を解除する()
Dim ws
For Each ws In Worksheets
If ws.Protect = True Then
ws.Unprotect
End If
Next
End Sub

Sub 条件付き書式を削除する()
Dim ws As Worksheet
For Each ws In Worksheets
If ws.Cells.FormatConditions.Count <> 0 Then
ws.Cells.FormatConditions.Delete
End If
Next ws
End Sub

こんな感じです。これで不要なものが消えていきます。まだまだ一杯有るけどね~~~。
何故ゴミがたまるのか。


コメント
コメントの投稿










トラックバック
トラックバックURL
→http://ayukt0526.blog.fc2.com/tb.php/506-81971a61
この記事にトラックバックする(FC2ブログユーザー)
プロフィール

はなかな

Author:はなかな
FC2ブログへようこそ!

最新記事
最新コメント
月別アーカイブ
カテゴリ
フリーエリア
ランキング参加しています。 にほんブログ村 哲学・思想ブログ エホバの証人へ にほんブログ村 にほんブログ村 本ブログ 読書日記へ にほんブログ村 にほんブログ村 音楽ブログへ にほんブログ村
音楽(J-POP) ブログランキングへ
小説(読書感想) ブログランキングへ
キリスト教 ブログランキングへ
ブログランキング ブログ王ランキングに参加中!
検索フォーム
RSSリンクの表示
リンク
このブログをリンクに追加する
ブロとも申請フォーム

この人とブロともになる

QRコード
QR
FC2アフィリエイト