複数シートのグループ化ができるマクロについて

最近の書き込み件数: 今日 0件、昨日 0件
未読分:2件

最新20件 最新50件 最新100件 最新200件 200件以前
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)


Excel VBAでIEを思いのままに操作できるプログラミング術 Excel 2013/2010/2007/2003対応

近田 伸矢, 植木 悠二, 上田 寛

IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。

Message#2 2015年2月5日(木)17時25分
From: sakura
返事 削除 変更
以下は、ThisWorkbook モジュール貼り付けます。
このマクロは、Sheet12 以上であっても、Sheet11のみを除外して保護設定します。

'//
Const PSWD As String = "****" '私の場合は、いつも外に置きます。
Private Sub Workbook_Open()
 Dim ws As Worksheet
 For Each ws In ThisWorkbook.Worksheets
  Select Case ws.Name
   Case "Sheet11" '除外するシート名
   Case Else
    ws.EnableOutlining = True
    ws.Protect Password:=PSWD, DrawingObjects:=True, _
    Contents:=True, UserInterfaceOnly:=True
  End Select
 Next ws
End Sub
'//

'おまけ(同じモジュールで使ってください。)
Sub OpenProtect()
'解除用
 Dim ws As Worksheet
 For Each ws In ThisWorkbook.Worksheets
  ws.Unprotect Password:=PSWD
 Next
End Sub

Message#1 2015年2月5日(木)17時18分
From: ちくさっく
返事 削除 変更
EXCELのVBA初心者です。

現在、sheet数11(sheet1から10が各担当の月別、商品別売上げ、sheet11が各担当のsheetから月別に商品毎、売上合計を集計)のEXCELを作成しました。

各担当毎の行数、列数も比較的多いことから、列と行をグループ化しています。
また、いくつかのセルで計算式(例えば売上個数と単価)を設定しています。
※各担当毎の書式や計算式を設定したセルはすべて同じ

このEXCELファイルを共有化して、複数人で処理すること、また、コピペなどにより計算式を削除されないようにシートに保護をかたところ、グループ化のコマンドが操作できなくなってしまいました。

いろいろ調べたところ、以下のVBA(マクロ)で解決できると知ったのですが、このマクロでは、設定したsheetのみにしか対応できません。

複数のsheet(今回はSheet1からsheet10まで、sheet11は不要)に対応させるにはどうすればよいのでしょうか?

どなたかご教授いただけると助かります。


調べたマクロ
*************************
Private Sub Workbook_Open()
Sheets("Sheet1").EnableOutlining = True
Sheets("Sheet1").Protect Password:="****", DrawingObjects:=True, _
contents:=True, UserInterfaceonly:=True
End Sub
************************

最新20件 最新50件 最新100件 最新200件 200件以前
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降

ExcelのVBAについてのQ&A掲示板

↑ExcelのVBA全般について分からない事があればこちらの掲示板よりご質問ください^^

VBAのInternetExplorer操作入門

↑ExcelのVBAをマスターできたら、エクセルVBAのIE(InternetExplorer)操作にも挑戦してみてください^^

VBAのIE制御入門RSS

RSSフィードを登録すると最新記事を受け取ることができます。

VBAIE操作のスカイプレッスン

エクセルVBAのステートメント

こちらでは、エクセルVBAの事例で利用したステートメントをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

スポンサー リンク

エクセルVBAのオブジェクト

こちらでは、エクセルVBAの事例で利用したオブジェクトをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

スポンサー リンク

エクセルVBAのプロパティ

こちらでは、エクセルVBAの事例で利用したオブジェクトのプロパティをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

エクセルVBAのメソッド

こちらでは、エクセルVBAの事例で利用したオブジェクトのメソッドをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

エクセルVBAのイベント

こちらでは、エクセルVBAの事例で利用したオブジェクトのイベントをまとめたものです。ExcelのVBAには様々な機能が用意されていますので一度ご確認ください。

dmb.cgi Ver. 1.068
Copyright(C) 1997-2014, hidekik.com