締切済み

マクロで行がグループ化されているか認識することはできますか？

2007/04/12 14:27

shinmai31515
お礼率0% (0/25)

Visual Basic
回答数2
ありがとう数0

みんなの回答 （2）
専門家の回答

みんなの回答

Bickyon
ベストアンサー率41% (42/101)

2007/04/15 00:31 回答No.2

アクティブなセルが結合されているか否かを判断するには、 If Selection.MergeCells Then MsgBox "結合されている" Else MsgBox "結合されていない" End If でいけます。

himajin100000
ベストアンサー率54% (1660/3060)

2007/04/12 16:09 回答No.1

行ね？列だと結構難しいんだけど。 http://www.excelforum.com/showthread.php?t=378137 OutlineLevelプロパティが2以上であるかで調べてはどうか？という提案がありますね

関連するQ&A

エクセルマクロで表示行だけ認識するには

オートフィルタをかけて必要な行のデータだけ表示している状態で、複数の行のセルを範囲指定し、それらの行の内容だけを他のファイルにコピーすることをマクロを使って行いたい。この場合、範囲指定した行番号は判るのだが、フィルターを掛けて見えない行のデータまで拾ってしまう。画面に見えているところだけを認識するコマンドがわからない。教えてください。
エクセルVBA　行のグループ化を外すマクロ

いつもお世話になります。 6行目から55行目までと、7以降の行から55行目までの2重にグループ化している行があり、現状は Rows("6:55").Rows.Ungroup Rows("6:55").Rows.Ungroup でグループ化を解除しているのですが、3重以上や、1重しかグループ化していないことも想定しておく必要があるのです。このコードだと、2重以上のグループ化をしていない時にエラーが起こってしまうし、3重以上だと解除しきれないのですが、何重にグループ化していても、もしくはグループ化していなくてもエラーを起こさず解除できる方法はありますでしょうか？
【Excel-マクロ】グループとアウトラインの設定をマクロで管理する方法

Excelマクロについての質問です。教えてください。 "グループとアウトラインの設定"を使用して、あるシート上の列or行をグループ化しています。このグループ化された列or行について、ある列or行が「展開されている状態か？(表示)」　　　　　　　なのか「閉じられている状態か？(非表示)」 Excelのマクロで判断するにはどうしたら良いでしょうか？教えてください。質問の背景は、「あるグループ化された列が表示されている」ならば、「他のグループ化された行を表示する」っといった機能を実現したいと考えています。また、グループのアウトラインで上記が不可能な場合でも、単純な列or行の表示・非表示で同様の状態管理が可能であればその方法を教えてください。皆様、宜しくお願いします。
エクセルのマクロで指定条件一致行をグループ化したい

エクセル２００７を使用しています。次の様なシートで、特定列で条件（ブランク）に一致する行を一括してグループ化するコードを教えてください。　　　　　Ａ　　　　　　　Ｂ　　　　　　Ｃ　　　　　　　D 1　　　コード　　科目　　　　　　実績　　　予算 2　　　5000 　販売収入　　　　100　　　　90 3　　　5001　　受取手数料　　　 4　　　5002　　その他収入 5 　　　　　【売上高】 100　　　　90 この様な会計の管理帳票で、1シート約800行あり、シートが部門毎に全部で約100シートが一つのブックに収めてあります。全部のシートに対して、例えばＣ列がブランクの行を一括してグループ化させる様なマクロのコードを教えていただきたいと思います。（この場合だと3～4行目）他の部門では使わない補助科目が多く、折りたたまないと使い物にならないため、現在は手作業で行っております。どうぞよろしくお願い致します。　
マクロでの行選択

Excelのマクロについて質問です。例えば、A1～A5セルをセル結合したときに、3行目～5行目を行選択しようとしたときに手動で行なうとうまく選択できるのですが、マクロで実行するとなぜか結合されている1行目から5行目が選択されてしまいます。具体的に以下のようなマクロを書きました。 Rows.("3:5").select 手動のみでマクロ化は無理なのでしょうか？今のままですと、一回連結をといてセルを選択して処理を実行、そののちにセルを再び連結させるということをやらなければいけなくなってしまいます。
Excelのマクロで行を間引きたい

3万行以上ある時系列データのデータ量を減らすため、マクロを使って3行目以降から5行毎に間引きたいのですが、　　　どうすれば良いでしょうか？
アクティブになっている行をマクロで削除したい

特定の文字の入っている行とそれ以下の行全部を削除したいのですがどうしたらよいでしょうか例えば"小計"の入っている行から下の行を削除したいのですが行の位置はいつも違っていますセルの位置は検索で分かりますし行の削除はShift+スペースで消しそれより下はShift+ctrl+方向キー+delで出来るのですがそれだとマクロで実行するときいつも同じ行を消してしまいますどの位置にも関係なくアクティブセルの含まれている行とそれ以下の行をマクロで削除するにはどのように記述すればいいですか
図のグループ化をマクロに組み込むには

お世話になります。 Excel2007を使っています。 QNo.4467047の続きです。 A1～B4の８つのセルに図が複数（１～３）入っています。一つのセル内の図、複数のセル内の図をグループ化、グループ解除をマクロでしたいのですが、マクロの記録からでは生成してくれませんよろしくお願いします。
マクロ　指定行数で改ページ　不足行を追加

グループごとに連番を振ってある表があり、マクロを活用して、指定行数で改ページ印刷をしたいのですが、やり方がわかりません。ご存知の方教えていただけますでしょうか。【表】 Aグループ　１～30の連番 Bグループ　１～25の連番【やりたいこと】 20行ごとに改ページ印刷 20行未満は空白行を挿入する【出力イメージ】１ページ目はAグループ１～20で印刷２ページ目はAグループ21～30と空白行10行で印刷３ページ目はBグループ1～20で印刷４ベージ目はBグループ21～25と空白行15行で印刷
マクロで行挿入がうまくいかない理由は？

ＸＰでＯＦＦＩＣＥ２００７です。マクロ未熟者です。マクロで、行挿入だけであればうまくいきますが、行挿入した後でその行に文字を入力するマクロでは、その行ではなく１行前のセルに文字が入力されてしまいます。変なことになるのは、マクロを作成する過程で、行挿入が上の書式をコピーすることと関連がありそうなのですが、何に注意すればうまくいくのでしょう。とりあえず今のところは行挿入を使わずに上の行をコピーして挿入する方法でうまくいっています。しかし行挿入後の文字入力がうまくいかないのか、その理由と対処方法がわかれば教えてください
マクロ　行の高さの変更を繰り返す

2行目から134行目までの「行の高さ」を１行おきに「4」にしたいのですが「マクロの記録ボタン」の「相対参照」で2行分を作って、繰り返してみると結合しているセルが有るせいか、2～134行目全てが「4」になってしまいます仕方ないので、ネットで調べて書いてみたのですが、 Sub Macro1() Dim i As Integer For i = 2 To 134 Step 2 Rows("i:i").RowHeight = 4 Next i End Sub こんな感じで作ったらエラーが出ましたマクロは、かなり久しぶりなので、どう書いたらいいのか教えてやって下さいませ
エクセルの行の高さをそろえてくれるマクロ下さい

エクセルを使っているも、マクロは使ったことなし。しかし、以前にもらった行の高さをまとめて揃えるマクロは便利に使ってました。でもこのたび消えてしまいました。どなたか分けてくださいませんか。 htmlの表とかコピーしたときに揃えるのに便利だったので。お願いします。 (^^;
エクセル　マクロ　行　非表示

マクロについてご教授お願い出来ないでしょうか。マクロ初心者です。エクセル　アクティブセル（ex A120セルやA20セル）の行から1行目までを非表示にさせるマクロがわかりません。　アクティブセルから下の行を非表示にさせるマクロは下記URLにて紹介がありましたが・・ https://www.relief.jp/docs/excel-vba-hide-below-active-cell.html また、もし可能でしたら、アクティブセルからA2行目までの非表示、つまり 1行目は残すマクロが可能でしたら、合わせてご教授どうぞよろしくお願い致します。　
”アクティブセル行」の一行下を選択”するマクロ

■　”アクティブセルの、１個下の行を選択し、新しい空白行を一行挿入” ■次にその”アクティブセルのA列とB列の値を、　新しく作った空白行に、コピー　・・・といったマクロを組もうとしております。たとえば 12行目を選択するプログラム（コマンド？マクロ？）は、　Rows(12:12) となっていたので、それにならって Rows(activecell:B) などとやってみたのですが、うまくいきませんでした。このような場合、どうしたらよいのかアドバイスをいただけると助かります。どうぞ、よろしくお願いいたします。　
「新しいマクロの記録」機能を使っての行挿入

「新しいマクロの記録」機能を使って１行と２行の間に10行の空白行を挿入後、A13のセルを選択というマクロを作りました（マクロ１とします）。このマクロを実行すると１行と２行の間に10行の空白行が挿入された後、A13が選択されます。ここでもう一度、マクロ１を実行すると１行と１２行の間にさらに空白行が10行挿入されA13が選択されます。このようになるのは当たり前と言えば当たり前なのですが、２回目にマクロを実行したときに12行と13行の間に10行の空白行が挿入された後、A24が選択されるようにするには、どのようにマクロを記録すればよいのでしょうか？　ようは、１０行の空白行を挿入した後、セルを１１行下に移動させるというマクロを作りたいのです。ＶＢＡの記述方法はほとんど分からないので「新しいマクロの記録」機能を使うことを前提にご教授ください。
マクロの作成　行の移動

マクロの作成　行の移動ワークシート上の指定行を最終行の次へ移動し、移動した後の空白となった指定行を削除するマクロの作り方を教えてください。
行を挿入するマクロがうまくいきません。

Sheets("りんご").Select Rows("1:1").Select Selection.Copy Sheets("みかん").Select Range("人").Select Selection.Insert Shift:=xlDown Application.CutCopyMode = False End Sub というマクロは、りんごのシートにある１行をコピーして、みかんのシートの人と名前定義してある特定の行にコピーするマクロです。この次に下のマクロを実行すると Sheets("りんご").Select Rows("2:3").Select Selection.Copy Sheets("みかん").Select Range("人").Select Selection.Insert Shift:=xlDown それまでのものが残ってしまい、行がどんどん増えていってしまいます。いずれかのマクロを実行すればリセットされて行が増えないようにコピーするにはどうすればよいでしょうか・・？
accessマクログループの全マクロの実行方法

お世話になります。現在、顧客のデータベースを作成しております。DBは名前、住所等の連絡先を入力したテーブルを元に下記のクエリやマクロを作成しています。取引がない顧客等はメイン名簿テーブルから削除して、メインテーブルの構造をコピーした、削除テーブルに入れるようにしたいと考えています。そこで下記のテーブル、クエリ、グループマクロを作成しました。グループマクロは作成したクエリ３つで構成されています。各アクションクエリは一個一個は正常に作動するのですが、グループマクロを実行しますと、１行目のクエリしか実行されません。実行方法はマクロの画面で更新ボタンを押しても、フォームに削除というボタンを作成してクリック時にグループマクロを実行させるよう設定した場合の両方で起きます。　グループマクロに登録されているマクロを全て実行するにはどうしたらいいのでしょうか。色々調べると、グループマクロは1行目しか実行できないようですが、全て実行する簡単な方法はありませんか？できればVBAではない方法を希望します。大変お手数ですがどうぞ、よろしくお願い致します。　・（テーブル）メイン名簿（以下、名簿tblとします）　　　⇒フィールド：名前、郵便番号、住所、電話、メモ欄、削除の有無、削除処理日　・（テーブル）削除テーブル（以下、削除tblとします）　　　⇒フィールドは上記と同じ　・（更新クエリ）削除処理日追加　　　⇒名簿tblの「削除の有無」フィールドにyesと入力されていれば、「削除処理日」に処理日が　　　　入力されるようにdate関数を設定しています。（date()）　・（追加クエリ）削除tblへ追加　　　⇒名簿tblの「削除の有無」フィールドにyesと入力されていれば、「削除tbl」へそのレコードを、　　　　追加する。　　・（削除クエリ）名簿tblからの削除　　　⇒名簿tblの「削除の有無」フィールドにyesと入力されていれば、名簿tblからそのレコードを、　　　　削除する。　・（マクログループ）削除処理（上から順番に実行希望）　　　　マクロ名　　　　　　　　　　　アクション　　　　　クエリ名　　　　削除処理日追加　　　　　クエリを開く　　　　（更新クエリ）削除処理日追加　　　　削除tblへコピー　　　　　　クエリを開く　　　（追加クエリ）削除tblへ追加　名簿tblからの削除　　　　クエリを開く　　　（削除クエリ）名簿tblからの削除　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　以上
行を挿入するマクロ

画像の右の表を左の表のように自動で整えたいです。 A、ｂ、ｃ…グループがあって、それぞれ連番があります。１から１８行したら次のグループの連番を１から開始となるように、詰まっている部分に空白行を挿入したいです。グループごとの番号は画像のように11で終わるとは限らず、１～18のうちのいずれかの数です。
Excelマクロで行を空ける

説明が下手でスイマセンがお付き合い下さい。 A列に日時(2010/2/1/ 00:00)が昇順に500行並んでいます。 A列の日時で7:00-19:00、19:00-7:00の間に2行空ける。これを、マクロで行いたいのですが、宜しくお願いします。

マクロで行がグループ化されているか認識することはできますか？

みんなの回答

関連するQ&A

エクセルマクロで表示行だけ認識するには

エクセルVBA　行のグループ化を外すマクロ

【Excel-マクロ】グループとアウトラインの設定をマクロで管理する方法

エクセルのマクロで指定条件一致行をグループ化したい

マクロでの行選択

Excelのマクロで行を間引きたい

アクティブになっている行をマクロで削除したい

図のグループ化をマクロに組み込むには

マクロ　指定行数で改ページ　不足行を追加

マクロで行挿入がうまくいかない理由は？

マクロ　行の高さの変更を繰り返す

エクセルの行の高さをそろえてくれるマクロ下さい

エクセル　マクロ　行　非表示

”アクティブセル行」の一行下を選択”するマクロ

「新しいマクロの記録」機能を使っての行挿入

マクロの作成　行の移動

行を挿入するマクロがうまくいきません。

accessマクログループの全マクロの実行方法

行を挿入するマクロ

Excelマクロで行を空ける

注目のQ&A

カテゴリ
一覧

専門家に質問してみよう
専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

マクロで行がグループ化されているか認識することはできますか？

みんなの回答

関連するQ&A

エクセルマクロで表示行だけ認識するには

エクセルVBA 行のグループ化を外すマクロ

【Excel-マクロ】グループとアウトラインの設定をマクロで管理する方法

エクセルのマクロで指定条件一致行をグループ化したい

マクロでの行選択

Excelのマクロで行を間引きたい

アクティブになっている行をマクロで削除したい

図のグループ化をマクロに組み込むには

マクロ 指定行数で改ページ 不足行を追加

マクロで行挿入がうまくいかない理由は？

マクロ 行の高さの変更を繰り返す

エクセルの行の高さをそろえてくれるマクロ下さい

エクセル マクロ 行 非表示

”アクティブセル行」の一行下を選択”するマクロ

「新しいマクロの記録」機能を使っての行挿入

マクロの作成 行の移動

行を挿入するマクロがうまくいきません。

accessマクログループの全マクロの実行方法

行を挿入するマクロ

Excelマクロで行を空ける

注目のQ&A

カテゴリ 一覧

専門家に質問してみよう 専門家登録

あなたにピッタリな商品が見つかる！ OKWAVE セレクト

エクセルVBA　行のグループ化を外すマクロ

マクロ　指定行数で改ページ　不足行を追加

マクロ　行の高さの変更を繰り返す

エクセル　マクロ　行　非表示

マクロの作成　行の移動

カテゴリ
一覧

専門家に質問してみよう
専門家登録