- 締切済み
エクセルのマクロの事で質問です。
DIooggooIDの回答
- DIooggooID
- ベストアンサー率27% (1730/6405)
例えば、セルN1には、 <div align="center"><b>【D1】</b></div> <div align="center"><a rel="nofollow" href="【H1】"><img src="【I1】" border="0" alt="【C1】"></a></div> <div align="center"><a rel="nofollow" href="【H1】">【C1】</a></div> 【E1】 【F1】 <!--【A1】【B1】--> のような内容にする、ということでしょうか?
関連するQ&A
- エクセルのマクロで再度質問
エクセルのマクロの件 再度質問です。 昨日、以下の質問をした者です。 =========================================================================== エクセルにはセルA~Mまでデータが入っています。(件数的にはかなりの量です) そこでマクロを使ってセルN内に以下のようなHTMLを入れたいです。 <div align="center"><b>【Dのセル】</b></div> <div align="center"><a rel="nofollow" href="【Hのセル】"><img src="【Iのセル】" border="0" alt="【Cのセル】"></a></div> <div align="center"><a rel="nofollow" href="【Hのセル】">【Cのセル】</a></div> 【Eのセル】 【Fのセル】 <!--【Aのセル】【Bのセル】--> =========================================================================== そこで、サンプルとして以下のマクロを教えてもらいました。 質問ですが、これを繰り返すにはどうすればいいでしょうか? (N2以降、N3N4・・・も同じように表示するには) Sub test() Dim st As String, s As String, stmp As String Dim sht As Worksheet, rw As Long, col As Long st = "<div align='center'><b>$4</b></div>@<div align='center'><a rel='nofollow' href='$8'><img src='$9' border='0' alt='$3'></a></div>@<div align='center'><a rel='nofollow' href='$8'>$3</a></div>@$5@$6@<!--$1$2-->" st = Replace(Replace(st, "@", Chr(10), 1, -1, 1), "'", Chr(34), 1, -1, 1) Set sht = ActiveSheet '//現在のシートを設定 '------- 1行分の処理 ---- rw = 2 '//処理対象の行番号(2行目に設定) s = st '//雛型の文字をコピー For col = 1 To 9 '//A~I列までをループ(col=列番号) stmp = "$" & Format(col, "#") '//各セルの内容で置換え s = Replace(s, stmp, sht.Cells(rw, col).Text, 1, -1, 1) Next col sht.Cells(rw, 14).Value = s '//結果をN列に入れる End Sub
- 締切済み
- オフィス系ソフト
- エクセル マクロ ループで?
度々すいません。マクロはほぼ初心者ですがよろしくお願いします。 前回の質問で、ある程度教えていただいたのですがループさせる方法がよくわかりません。 http://okwave.jp/qa4469670.html サンプルでコードは Sub test() Dim st As String, s As String, stmp As String Dim sht As Worksheet, rw As Long, col As Long st = "<div align='center'><b>$4</b></div>@<div align='center'><a rel='nofollow' href='$8'><img src='$9' border='0' alt='$3'></a></div>@<div align='center'><a rel='nofollow' href='$8'>$3</a></div>@$5@$6@<!--$1$2-->" st = Replace(Replace(st, "@", Chr(10), 1, -1, 1), "'", Chr(34), 1, -1, 1) Set sht = ActiveSheet '//現在のシートを設定 '------- 1行分の処理 ---- rw = 2 '//処理対象の行番号(2行目に設定) s = st '//雛型の文字をコピー For col = 1 To 9 '//A~I列までをループ(col=列番号) stmp = "$" & Format(col, "#") '//各セルの内容で置換え s = Replace(s, stmp, sht.Cells(rw, col).Text, 1, -1, 1) Next col sht.Cells(rw, 14).Value = s '//結果をN列に入れる End Sub です。 マクロを実行するとセルN2に出力されます。これをN2以降、N3N4・・・も表示されるようにしたいです。 rw = 2 '//処理対象の行番号(2行目に設定)を固定させないでループすればいいようなのですが、どのようにすればいいのでしょうか? Sub test()~End Sub内全てを教えていただけないでしょうか? よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- マクロを使ってこんな事って出来ますか?
エクセルでこんな事できるでしょうか? Aのセルにカテゴリ名 Bのセルにタイトル CのセルにURL を入力しておき マクロを使って <b>カテゴリ1</b> <ol> <li><a href="http://123.com/>テスト1</a> <li><a href="http://aaa.com/">テスト2</a> </ol> <b>カテゴリ2</b> <ol> <li><a href="http://456.com/">テスト3</a> <li><a href="http://bbb.com/>テスト4</a> </ol> このようにしたいですが出来るでしょうか? 自分なりにエクセルのセルにタグを入力してマクロの記録を使ってやってみたのですが、どうしても思うようにいきません。 マクロに詳しい方、どうか教えてください。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- HTMLの質問です。画像を並べて名称を表記します。
ホームページビルダーで作成しました。 今回の例では画像を横4枚、縦2段に並べて画像下にテキストを表記します。 各画像にはリンクを貼っています。 ところが画像下のテキストの右端だけがダブって表記されます。 具体的にはタイトル4とタイトル8というテキストです。 問題点が分かる方はご教授願います。 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html lang="ja"> <head> <title>ホームページのタイトル</title> <link rel="stylesheet" type="text/css" href="hpb9tm04_8.css" id="hpb9tm04_8" a:link { text-decoration:underline; color:#0000FF; } a:visited { text-decoration:underline; color:#9900CC; } a:active { text-decoration:underline; color:#00FF00; } a:hover { text-decoration:underline; color:#00FF00; position:relative;top:3px;left:3px; }</style> </head> <body style="color: #000000; background-color: #ffffff" background="壁紙画像"> <div> <table class="hpb-main" id="HPB_LAYOUTTABLE_05" cellspacing="0" cellpadding="0" width="760" border="0"> <tbody> <tr> <td class="hpb-cnt-cell1" id="HPB_LAYOUT_LMH0" valign="top" align="center" height="18"> <table class="hpb-hmenu1" id="HPB_LINK_MENU_TABLE_01" cellspacing="0" cellpadding="0" align="center" border="0"> </table> </td> </tr> <tr> <td class="hpb-cnt-cell3-x" valign="top" align="center"><div style="float:left"><img height="43" alt="ホームページのタイトル" width="232" border="0" src="ホームページのタイトル画像" /> <table class="hpb-lb-tb1" cellspacing="0" cellpadding="0" align="center" border="0"> <tbody> <tr> <td class="hpb-lb-tb1-cell3" id="HPB_LAYOUT_CONTENTS" valign="top" height="400"> <p><div style="float:left"><img height="37" alt="ホームページのサブタイトル" width="510" border="0" src="ホームページのサブタイトル画像" /></p> <p> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル1" width="140" border="0" src="画像" /><br />タイトル1</div></a> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル2" width="140" border="0" src="画像" /><br />タイトル2</div></a> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル3" width="140" border="0" src="画像" /><br />タイトル3</div></a> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル4" width="140" border="0" src="画像" /><br />タイトル4</div></a> <div style="clear:both"></div></p> <p> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル5" width="140" border="0" src="画像" /><br />タイトル5</div></a> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル6" width="140" border="0" src="画像" /><br />タイトル6</div></a> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル7" width="140" border="0" src="画像" /><br />タイトル7</div></a> <a target="_blank" rel="nofollow" リンク先URL"><div style="float:left"><img height="210" alt="タイトル8" width="140" border="0" src="画像" /><br />タイトル8</div></a> <div style="clear:both"></div></p> <p> </td> </tr> </tbody> </table> </td> </tr> </tbody> </table> </div> </body> </html>
- ベストアンサー
- HTML
- エクセル、マクロの事で・・・?
ある1つのフォルダにエクセルシートがあります。 仮に・・・ A1のセルに「野菜類」B1のセルに「野菜について」 A2のセルに「肉類」 B2のセルに「肉について」 A3のセルに「酒類」 B2のセルに「酒について」 このようにあるとします。 場合によっては、3つで終わる場合もあれば、20ぐらいまで行く場合もあります。 そこでマクロを使いエクセルシートがあるフォルダ内に・・・ 「野菜類」 「肉類」 「酒類」 各フォルダを作成して、その各フォルダ内に「Bのセル名.txt」のファイルを作成したいと考えています。(.txtの中身は空です) 今は、手作業でやっているのですが数が多く間違えたりするので、マクロを使って行いたいのですが、その方法がわかりません。 そこで、大変申し訳なのですが、マクロの方法を教えていただけないでしょうか? よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロについて 教えてください。
エクセルのマクロについて 教えてください。 1 2 … A あ い う え お □ □ □ ※□はスペース B か □ □ □ き く け こ C さ し □ □ す せ そ □ : 上記、表を下のように並べ替えたいのですが… ※1行目は4つのセルの結合 1 A あ い う え 2 A お □ □ □ : 1 B か □ □ □ 2 B き く け こ : 1 C さ し □ □ 2 C す せ そ □ :
- ベストアンサー
- その他MS Office製品
- エクセルのマクロの組み方
マクロの初心者です。エクセルのマクロを組んでいるのですが,壁にぶち当たってしまいました。次のようにしたいのですが。 たとえば,A1のセルに「りんご」B1に「割引(1)」C1に「割引(2)」が入っている場合にはD1のセルに200を返す。A1が「りんご」でB1が空欄,C1が「割引(2)」ならD1に230を返す,A1が「みかん」でB1,C1が空欄ならD1に150を返す,のようにいくつかのセルの入力内容によって特定のセル(この場合はD1)に返す値を変えるようなマクロってありますでしょうか。 Selection.Replaceのようなものを使おうと思ったのですが,見当違いでしょうか。 ご指導をお願いします。
- ベストアンサー
- その他MS Office製品
- Excelマクロでこんな事できますか?
お世話になります。Excelを始めたばかりの初心者です。 早速ですが、 たとえば、A1のセルに「赤」と入力すると、自動にB1のセルに「くだもの」、C1のセルに「いちご」といった具合に表示できるようにしたいのですが、マクロでそのような事が出来るのでしょうか?(この説明でお解かりになるでしょうか)出来るとすれば、その操作の手順とか、操作方法などのご教授をお願い致します。 また、このようなマクロの操作を解説している著書、あるいわホームページ等があればお教えねがいます。宜しくお願い致します。
- 締切済み
- オフィス系ソフト
- エクセル2010のマクロについての質問です。
エクセルにてマクロを組もうと色々調べているのですが、 どうしてもわからないため教えていただきたいことがあります。 現在、マクロを実行すると固有の文字をアクティブセルに挿入するというマクロを作成しました。 このマクロを少し改造したいのですが、A1とB1に=のものが入っている行の特定の列のセルに固有の文字を挿入するという風にしたいです。 例えば、Aの列にはA1には1、A2には2という風に順に10間での数字が入っていて、 B1には9が入っている場合、C9のセルに固有の文字を挿入するという感じです。 B1を7に変えた場合、C7に固有の文字が挿入されるという感じにしたいです。 質問の仕方が下手でわかりにくいかも知れませんがお知恵をお貸しください。 よろしくお願いします。
- 締切済み
- Visual Basic
補足
DIooggooIDさんこんにちは、説明が不十分で申し訳ありません。 DIooggooIDさんのおっしゃるとおりです。