• ベストアンサー

VBAを使用し10行おきにセルの下に罫線を引く方法

Excel2003のVBAを使用し、10行おきに太い罫線をセルの下側に引きたいのですが、ご存知な方教えて頂けないでしょうか？ 出来る事なら、セルの中に×が入っている行は自動的に省いて(選ばず)10行おきに罫線を引きたいと思っています。 先日、解決した内容の質問ですが、新たに3行目から最終行までとか罫線を引きたい行を指定出来るようにコーディングいただけると大変助かります。

質問者が選んだベストアンサー

  • ベストアンサー
  • mt2008
  • ベストアンサー率52% (885/1701)
回答No.1

http://okwave.jp/qa/q8145552.html ↑のベストアンサーのコードの…… For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row ↓ For i = 3 To Cells(Rows.Count, 1).End(xlUp).Row 少しは回答されたコードを理解しようとしましょう。

makabeti
質問者

お礼

ご回答頂き有難うございます。 ご指摘いただいたように、頼みっぱなしで理解しようとしてませんでした。 これを気に、勉強していこうと思います。

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • VBAで10行おきにセルの下に罫線を引く方法

    Excel2003のVBAを使用し、10行おきに太い罫線をセルの下側に引きたいのですが、ご存知な方教えて頂けないでしょうか？ 出来る事なら、セルの中に×が入っている行は自動的に省いて(選ばず)10行おきに罫線を引きたいと思っています。

  • VBAでのセルの罫線を残す

    ExcelVBAで外枠罫線の入った表の最終行のセル範囲をDeleteで削除すると下罫線も消えてしまいます。 罫線を消さないように削除できませんか？ 削除後下罫線を引きなおさないとだめでしょうか？

  • Excel　複数行のセル欄を罫線をなくしたい

    Excel表で A B Cセル 1～8行だとして Cセル5～8行を一つの欄にしたいのですが 5～8行の罫線をなくすにはどうすればいいですか

  • Excelのセルに沿って罫線や棒線を引きたい

    Excel上の指定した二つのセルを結ぶような、横の棒線を引きたいのですが… 例えばセル番号 （x(1),y(1)） と （x(2),y(1)） で、上側の罫線でもなく下側の罫線でもなく、その中間に 引くイメージです。 また、上側の罫線を引く場合、もしくは下側の罫線を引く場合はどうしたらよいでしょうか。

  • マクロで指定の行に罫線を引く方法

    エクセル2003です。 やりたいことはタイトルにあるように指定行に罫線を引くなのですが 具体的には、 A列の10行目から80行までランダムに1から3までの数字が入っていて、"1"が入ってるセルの上側でその行のA～AC列まで二重罫線を引きたいという状況です。 条件付けで1を探してそのセルの範囲で罫線を引かせるってのは、For Nextで探しつつって感じなんでしょうか？ よろしくお願いします。

  • Excel:セルの幅を個別の行に適用したい

    「excel:セルの大きさを小さくしたい」 http://okwave.jp/kotaeru.php3?q=2081753 ここで質問させてもらい、セルの幅や高さを指定する方法を教えてもらいました。 「エクセル基本講座　セル幅の調整」 http://www.eurus.dti.ne.jp/~yoneyama/Excel/cell_ido.htm#habatyousei ただ、このやり方ではシートの行全体に同じセル幅を適用することしかできません。 一行目はセル幅5で、 二行目はセル幅10で、 といったやり方は存在しないのでしょうか? どういうことがしたいかというと、 表を作っているのですが、その表では一行目に5個の項目があり、 それらを罫線で囲っています。 ところが二行目にはその倍以上の項目があり、 それらを罫線で囲まなければならないのですが、 罫線はセルの幅や高さに沿ってしか作成できないようで、 困っています。 よろしくお願いします。

  • VBAの行削除について

    VBAで行を削除したいです。 データが何百行かあって、その下から空白行が最終行までできています。 その空白行部分を削除したいのですが。 どのようにコーディングすればいいのですか？

  • エクセルでA列セルが空白の時その行に罫線を引くには

    エクセルでA列セルが空白の時、その行の下側のみに２重罫線を引くマクロを教えて下さい。 色々試しましたがうまくいきません。例えば下記の様な表で３行目、７行目、１２行目の各下側にのみ２重罫線を引くマクロです。行数と空白行は、日々取り込んでいるデータによって変わります。知恵をお貸し下さい。（A列空白セルのＣ列にはSUM関数を入れております。うまく表記が出来ませんので念のため） 　　　　　　　A列　　　B列　　　Ｃ列 1行　　　　　123　　　　酒　　　 100 2行　　　　　123　　　　酒　　　 100 3行　 ========================　 4行　　　　　215　　　ビール　 　200 5行　　　　　215　　　ビール　 　200 6行　　　　　215　　　ビール　 　200 7行 =========================　　 8行　　　　　324　　　　ワイン　 300 9行　　　　　324　　　　ワイン　 300 10行 　　　　324　　　　ワイン　 300 11行 　　　　324　　　　ワイン 　300 12行 ========================　　　　　　　　　　　　　　　 　

  • [エクセルＶＢＡ]あるセルにおける罫線の種類を調べるには、どうしたら良

    [エクセルＶＢＡ]あるセルにおける罫線の種類を調べるには、どうしたら良いですか？ 罫線があるかないかを調べる術については分かったのですが、 さらに、罫線があるという場合に、その罫線の種類（線の種類や幅、色）について調べる方法については、ネット上を調べたのですが、見つかりませんでした。 この件についてご存知の方、教えて下さい。 宜しくお願いします。

  • EXCEL2000　VBA　罫線を引く　その２

    http://www.okweb.ne.jp/kotaeru.php3?q=564008 こちらで質問させていただき、#2の方法で出来たと思い締め切ったのですが、どうやらセルの高さが初期値でない場合、全部のセルに罫線を引く事がわかりました（汗） １）あくまでも、データが入っている場合のみ罫線を引く方法 ２）データが入っている行のみあとから行の高さを80にする方法 他に解決策があれば、よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する