- ベストアンサー
エクセルマクロ、アウトラインについて
zap35の回答
- zap35
- ベストアンサー率44% (1383/3079)
実際の動作は確認していませんが、 a = 3 ExecuteExcel4Macro "SHOW.DETAIL(2," & a & ")" ではいかがでしょうか？
関連するQ&A
- エクセル2010でマクロからリボンの最小化の変更
キーボードからは、Ctrl+F1キー作業で、タグバーが残る状態で最小化ができるので、マクロ(VBA)により実行できないものかご相談いたします。 私には解決できない難題です。どうかご教示願います。 相談箱 質問 QNo.6530721(エクセル2010でマクロからリボンの最小化したい) の経緯を拝見、利用させていただきましたがタグバーまでも消えてしまうので、別のコードを追加することで、タグバーを残すことが出来ないものか、しかし、何もできない状態でおります。 (リボンの最小化) Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",FALSE)" (リボンの再表示） Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",TRUE)"
- 締切済み
- オフィス系ソフト
- エクセル2010をマクロによりリボンの最小化処理
キーボードからは、Ctrl+F1キー作業で、タグバーが残る状態で最小化ができるので、マクロ(VBA)により実行できないものかご相談いたします。 私には解決できない難題です。どうかご教示願います。 相談箱 質問 QNO.6530721(エクセル2010でマクロからリボンの最小化したい) の経緯を拝見、利用させていただきましたがタグバーまでも消えてしまうので、別のコードを追加することで、タグバーを残すことが出来ないものか、しかし、私の技術不足のため何もできない状態でおります。 (リボンの最小化) Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",FALSE)" (リボンの再表示） Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",TRUE)"
- ベストアンサー
- オフィス系ソフト
- エクセルマクロアウトライン検索
アウトラインのプラスマークがある場所（行、列）をマクロで探すことはできますか？ やりたいこと：マクロでプラスマーク（マイナスマーク）がある行、列すべてを塗りつぶしたい。現在、該当行、列のセルに何か値を入れておいてそれを探して場所を探しています。
- ベストアンサー
- オフィス系ソフト
- マクロでエクセル内のアウトラインをすべて折りたたむ
エクセル2010を使っています。 表題の通りなのですが、 マクロでエクセル内のアウトラインをすべて折りたたむ方法を知りたいです。 どなたか詳しい方がいらっしゃいましたら、教えていただけませんでしょうか。 よろしくお願いいたします。
- ベストアンサー
- その他MS Office製品
- EXCEL マクロでアウトラインのクリア処理が不完全
おはようございます。 EXCELのマクロで”アウトラインのクリア”処理 を実行させたとき、きれいに消える場合とそうでない場合があります。 完全にアウトラインが消える方法を教えてください。
- ベストアンサー
- オフィス系ソフト
- エクセル2010をVBAによりリボンの最小化処理
前回、「エクセル2010をマクロによりリボンの最小化処理(QNo.7450319)」により、 Sub macro1() CommandBars.ExecuteMso "MinimizeRibbon" End sub とします。 再度実行すると再表示します。 との回答をいただき早速利用しておりますが、FALSEとTRUEを使い、最小化と再表示を下記の様なコ－ドで出来ないものか、ご教示願います。 (リボンの最小化) Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",FALSE)" (リボンの再表示） Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""RIBBON"",TRUE)"
- 締切済み
- オフィス系ソフト
- excel マクロ リンクを一斉に外すマクロ
https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q11157690516 （ヤフー知恵袋です）の方が質問しているマクロを自分も利用したいのですが、勉強中の自分には難しくうまく作動しません。oshapeのところで変数が指定されていませんとなります…可能であれば解説いただけると幸いです。
- ベストアンサー
- Excel（エクセル）
- Excel2000のマクロが2007で型が一致しませんと表示されます
自作マクロを作成し別ブックから転記するものですがExcel2000では正常に動くのですが、Excel2007では、転記対象のセルが0なら空白にするという行（IF文）で「型が一致しません」と表示されてしまいます。 ExecuteExcel4Macroが悪いのか、いろいろ調べましたが型とは？などマクロ初心者なので分からないです。宜しくお願いします。 For i = 1 To 7 Cells(i, 1).Value = ExecuteExcel4Macro("'\[meca.xls]Sheet1'!R" & i & "C1") If ExecuteExcel4Macro("'\[meca.xls]Sheet1'!R" & i & "C1") = "0" Then Cells(i, 1).Value = "" Next i
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロでファイルからデータを取り込みたい
以下のような操作をするマクロを作りたいのですが、やり方を教えていただけるかあるいは文献やURLを紹介していただけないでしょうか？ テキストファイルに以下のように変数と数値が並んでます。 A=1.00 B=2.00 C=1.43 変数の数は数十個あります。これをエクセルのファイルに読み込んで AA 1.00 BB 2.00 CC 1.43 などとように指定の場所に数字を記入します。テキストファイルは５個程度あり、全部について行います。読み込む先のエクセルファイルにシート別に記入したいのです。 マクロの経験は、ボタンを押してから再び押して終了するまでの間の操作をマクロ登録する方法で２，３回作ったことがある程度です。今回はファイル操作もあるのでこの方法がつかえません。
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロ・Criteria1:=の扱いについて
エクセルのマクロ・Criteria1:=の扱いについて お世話になっております。 エクセルで、「部署全体で担当している案件の一覧」を月ごとにまとめております。 これを月初に、 フィルタで担当者別に案件表示し、それを手動で印刷して、各人に配布しているのですが、 マクロで処理したいと考えています。 記録マクロを使用し、フィルタでＡさんを抽出し印刷という工程を 下記のとおり、確認したのですが --------------------------- Sub Macro1() ' ' Macro1 Macro ' ' ActiveSheet.Range("$A$2:$EJ$1503").AutoFilter Field:=10, Criteria1:="Ａ さん" ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)" ActiveWindow.SmallScroll Down:=81 End Sub ---------------------- Ｂさん、Ｃさんと順々に印刷させていくには、 上記と同様の内容のスクリプトをCriteria1:="Ｂ さん"に変えていくしか方法がないのでしょうか？ これでは人数分スクリプトを用意しなくてはならず、また人員の変動のたびに Ａさんは削除、Ｄさんを追加などと、手間がかかります。 月初毎にフィルタをかけて担当者別に印刷を行う効率の良い方法はないものでしょうか アドバイス等お願い申し上げます。
- ベストアンサー
- オフィス系ソフト
お礼
ありがとうございます。できました。