Excel VBA質問スレ Part10

[表示 : 全て最新50 1-99 101- 201- 301- 401- 501- 601- 2chのread.cgiへ]
Update time : 09/08 12:54 / Filesize : 170 KB / Number-of Response : 630
[このスレッドの書き込みを削除する]
[＋板最近立ったスレ＆熱いスレ一覧 : ＋板最近立ったスレ／記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

1 名前：デフォルトの名無しさん mailto:sage [2009/02/23(月) 04:56:43 ]: ExcelのVBAに関する質問スレです

前スレ pc11.2ch.net/test/read.cgi/tech/1228372971/

★1 質問テンプレ(雛形)は用意しませんが､OSとExcelのバージョンは必ず書きましょう。

★2 ExcelのVBA以外の部分に関する質問はNGです。
　　　但し､VBA無しでも出来ることだが､あえてVBAでやりたいって物に関してはOK。

★3 ExcelのVBE(Visual Basic Editor)を使うとしても､VBAの分野以外に関してはスレ違いです。

　VBAとは､『Visual Basic for Application』の略で
　　Application
　　├Workbooks
　　｜└Workbook
　　｜　 ├Worksheets
　　｜　｜└Worksheet
　というApplication以下のオブジェクトを､VB言語で操作するものを指します。
　例えExcel付属のVBE(Visual Basic Editor)を利用しようとも､このApplication以下のブックやシート､
　セルやオブジェクト等を操作するもの以外はVBA分野の話ではないので､ここでは聞かないでください。

★4 とりあえず､Excelのインスタンスを作らずにVB6で出来ることは全てスレ違いだと思ってください。

★5 レベルはどうあれ､ここはプログラマ用の板スレです。プログラマとは､自分でプログラムを組み
　　　コードを書く人の事なので､自分でやるきは全く無く､丸投げしようって人はお断りです。
　　　ヒントを貰えばあとは自力でなんとかしますって人のみどうぞ。

★6 わからなければとりあえず「マクロの記録」（Alt, T, M, R）
267 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 06:51:01 ]: 基礎が出来てないから、VBAの保守ごときで右往左往してしまう件
268 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 07:59:58 ]: >>267
保守できないのは努力が足りない？
269 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 09:13:24 ]: 集計するならピボットもVBAもイラン
いまのとこ数式で事足りてる
270 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 10:21:22 ]: やたらとセルにどっからでもアクセスできるからソースはクソになりがちではある
271 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 10:27:52 ]: とあるExcelで作られたシステムを引き継いだんだけど
これってVBで作ったほうがよくね？って思ってる。
なぜExcelで作ったのかなぞだ。
272 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 10:35:25 ]: この話題が出てるときに、このあからさまなネタw
273 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 11:11:34 ]: この話題だから書いただけなのに
274 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 12:01:08 ]: で？
275 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 12:11:44 ]: <font size="2">
276 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 12:13:50 ]: そんなにExcelがすきなの？
277 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 12:48:21 ]: すべてvbaで作って自分しか保守れないようにするんだ
278 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 12:51:28 ]: </font>
279 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 15:26:16 ]: >>262
プログラムを書いたことが無いのかもしれないが、
入出力が変わったら、どんな言語ツールでもプログラムを書き換えるだろ。
280 名前：デフォルトの名無しさん [2009/03/14(土) 15:27:06 ]: マクロって隠すことできるんですか？
たくさんマクロが組まれてそうなファイルを手に入れて
分析したいのですが、標準モジュールには簡単なマクロしか
入ってません。

フォームのボタンらしきもので色々動くファイルなのですが
ボタン自体が保護されているような状態。
281 名前：デフォルトの名無しさん [2009/03/14(土) 15:30:39 ]: デザインモードでアクセスできました
すみません。
282 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 17:05:29 ]: 俺はRDBをExcelにDumpingして、VBSの正規表現を使って仕事してる。
どんな会社でも、どんな業種でもExcelファイルなら開けるってシェアの大きさは有利だよ。

シェア率って、本当に大切だよ。
283 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 17:13:43 ]: >>282
VBS・・・？
284 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 17:17:05 ]: COMのVBScript.RegExpのことじゃないの？
285 名前：デフォルトの名無しさん [2009/03/14(土) 19:27:11 ]: 質問ですー
VBEの画面でOと0の見分けがつかんの何とかならんですか？
286 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 19:38:32 ]: フォントは自由に選べますよ
287 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 19:44:26 ]: >>285
プロポーショナルフォントじゃ無くせばOK。
例）Pゴシック→ゴシック　って意味ね。
288 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 19:45:40 ]: 区別できるフォントを捜して設定すればいいんですね
週明けに早速試してみますありがとうございます
289 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 19:58:29 ]: Range("A" & i)
290 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 20:51:35 ]: 質問です。
指定した1秒未満の短い時間(0.5秒など)だけマクロを停止させたいと考えています。
Application.Wait メソッドなどでは最短でも1秒は停止しなければならないようですが
これは可能なのでしょうか？
291 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 21:00:55 ]: APIでSleep()がGetTickCount()定義して処理する
292 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 21:13:03 ]: 基本的なことだが、VBAとVB6はほぼ同じ。
グーグルでVB6をつけて検索すれば大抵のことは解決する。
初心者さんはまずVB6で検索してくれ。
293 名前：デフォルトの名無しさん mailto:sage [2009/03/14(土) 22:28:19 ]: >>291
Sleepを使う事で解決できました。ありがとうございます。
294 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 01:33:19 ]: Application.Wait [NOW()+"0:00:00.1"]
295 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 01:54:45 ]: WaitやOnTimeは、1秒未満を指定してもエラーにはならないけど
1秒単位に丸めて処理されるから意味無いよ

Application.Wait [NOW()+"0:00:00.1"]
Application.Wait Now()
は同じで
Application.Wait [NOW()+"0:00:00.6"]
Application.Wait [NOW()+"0:00:01"]
も同じ
296 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 01:58:36 ]: うそ、仕様が変わったのか？
297 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 02:05:18 ]: Sub a()
t1 = Timer
Application.Wait [NOW()+"0:00:00.1"]
Debug.Print Timer - t1
End Sub

0.1103516
0.1000977
298 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 02:16:28 ]: 確か丸めは環境依存だったような。
確実な方法では無いから普通は使わないけど。
299 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 03:55:41 ]: これが環境依存とは聞いたことないな。
みんな普通に使ってるようだけど。
300 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 07:27:51 ]: >>297やってみたら

97%くらいは
0

3%くらいが
0.015625

だった
301 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 11:17:35 ]: Waitやってるやつ環境くらい書けば？
XP, Excel2000,はOK
302 名前：デフォルトの名無しさん [2009/03/15(日) 13:38:34 ]: これさ
ミリ秒単位ってほぼとれてなくない？
数字の上でどうでてようととれるもんはめちゃくちゃなんだけど？
0ms5msって交互にとれるけどホントか？これ？(笑)
303 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 15:02:00 ]: 今やってるのは100ミリ秒だろ
304 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 16:17:21 ]: Application.Wait [NOW()+"0:00:00.1"]
は、うちでも0.1秒前後になるけど、WinAPIのSleepと比べるとものすごくばらつきが大きい。
Sleepだと100回やって100～104msと100ms未満になることは無かったし超過も僅かだが
Application.Waitは80ms台が数回出たし、超過誤差もSleepの10倍以上。

処理上、僅かな超過が出るのは仕方のないことだし、それは環境にも依存することだが
その超過量が同条件でのSleepより遙かに大きかったり、指定未満になったりするのは
明らかにApplication.Waitの欠陥で、1秒未満の処理がまともに出来ているとは言いがたい結果だな。

因みに環境はWinXP/Excel2003
305 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 16:53:42 ]: >>304
Application.Wait [NOW()+"0:00:00.25"]
だとどう？
306 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 16:56:57 ]: >>304
あるいは、
Application.Wait [NOW()+"0:00:00.0625"]
とか
307 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 16:58:07 ]: >>297はXPSP3 Excel2007

10ミリ秒の精度が必要か？
所詮、いくらSleepの精度が高くてもCPUやメモリなどの競合で
処理の遅延することは避けられないし
308 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 17:15:17 ]: まあ、そもそも>>290がどんな要件に使うのかすら、オレには想像つかない。
309 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 18:09:52 ]: そうか？
>>290は1秒じゃ長いから0.5秒くらいで待ちたいと言ってんだろ？
そのときに0.01秒の誤差なんか気にするか？
0.1秒の誤差も気にならないかも
310 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 18:19:03 ]: 俺はそんなもの測れると思ってないけどね
長年ゲームアプリ作ってきた勘
テキトーな間隔でテキトーに止まるとは思うけど
数秒に数回成功するって目安だな
311 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 18:44:41 ]: そうか？
1秒で待つか0.5秒で待つかで実際やってみると体感的に違うけどな
312 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 18:45:47 ]: VB6のSleep() APIでも数ミリ秒の誤差はある
VB系でミリ秒気にするのは病みすぎ
スレッド使える他言語でやれよ
（ActiveX使えとかWindowsじゃ無理とか言うなよｗ)
313 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 19:00:50 ]: お前ら、よく知らんことには口出すな
314 名前：デフォルトの名無しさん [2009/03/15(日) 19:19:44 ]: 教えてください。
上位のコンボボックスの選択しだいで、下位のコンボボックスが空の場合も、値が入っている場合もあります。下位のコンボボックスに値が入っている場合のみ実行したいコードがあるのですが、条件式としてはどのように記述すればいいのでしょうか？
お願いします。
315 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 19:26:36 ]: なんらかのトリガ時に両方見ればいくね？
316 名前：314 [2009/03/15(日) 19:32:44 ]: >315
ごめんなさい。よく分かりません。
317 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 19:47:00 ]: ボタンかなんか押してプログラムが動くんだろ？
だったら、ボタン押した時に2つのボックスの中身を見て判断すれば良いんじゃねーの？
この内容が分からないんなら、コンボボックスの使い方を説明してるHP見たほうが早い。
318 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 21:38:22 ]: >>314
上位のコンボボックスの選択されている値をみればいいんじゃないかな
下位のコンボボックスに値をセットしたり空にしたりする処理があるんだから、
そのための判定式がその処理のとこにあるだろう
319 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 21:59:07 ]: >>314
ttp://www1.axfc.net/uploader/He/
He_205317.xls
Pass : prog
320 名前：314 [2009/03/15(日) 22:45:03 ]: >319さんへ
わざわざ親切にありがとうございました。
私の説明が悪かったのですが、「下位のコンボボックスが空」とういうのは、「ボックスに何も
表示されていない状態」のことではなく、「ボックスに何も表示されていないし、ボックス中に
何の選択肢もない状態」のことなんです。上位に対応する下位がない場合、ボックスを空に
しているのです。「ComboBox2.Text <> ""」という記述は前者のようです。
もしよかったらまた教えてください。
321 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 22:53:00 ]: >>320
どちらにしろTextが空なんだからそのIfでOKだろ？
嫌ならListCountで項目数判定汁
322 名前：314 [2009/03/15(日) 23:02:24 ]: ListCountでできました。
ありがとうございました。
じぶんなりによく考えて、よく調べたつもりだったんですが・・・
まだまだ初心者の域を抜け出せてないようです。
323 名前：デフォルトの名無しさん mailto:sage [2009/03/15(日) 23:05:29 ]: >>314
ユーザー入力でCombo Textの空文字判定が曖昧になること心配しているなら、
ComboをReadOnlyにするという方法もある。
まあ頑張って下さい。
324 名前：デフォルトの名無しさん [2009/03/18(水) 22:02:18 ]: 2007 xlsm　vista
今まで(2003 xpでは)正当に動いていたマクロが機能していません。
どのように修正したらいいものかさっぱりの状態ですので、教えてください。
よろしく。

sub モジ()
Aマクロ
Bマクロ
Cマクロ
end sub
で、Aマクロの中にapplication.run "dataweb" があるのですが、
webデータ取得（を全くすることなく）前に、 Bマクロにさっさといってしまいます。
325 名前：デフォルトの名無しさん mailto:sage [2009/03/18(水) 22:24:01 ]: ブックごとうpしろ
出来ないなら帰れ
326 名前：324 [2009/03/19(木) 00:57:50 ]: ブックごとのアップはできません、悪しからず。
調べる端緒がほしいので、よろしく。

2003で同期だったものが、2007では非同期になってしまうということです。
そうゆうことはあり得るのでしょうか？
327 名前：デフォルトの名無しさん mailto:sage [2009/03/19(木) 01:07:54 ]: >>326
Bマクロでブレイクすれば、データが取れるの？
328 名前：324 [2009/03/19(木) 01:46:10 ]: Bマクロでブレイクして、データ取得はできます。

なお、Aマクロ単独での動きは、2003及び2003互換モードで正常ですが、
2007ではやはり、勝手に先に動きます。
329 名前：デフォルトの名無しさん mailto:sage [2009/03/19(木) 04:04:03 ]: Call
330 名前：デフォルトの名無しさん mailto:sage [2009/03/19(木) 05:53:09 ]: >>326
それは同じマシンでもそうなるの？
2007から複数コアCPUがサポートされてるから、そうなる可能性はあるとは思うが

関係ないかもしれないが、一度マルチスレッド計算のオプションはずして試してみては？
331 名前：324 [2009/03/19(木) 10:51:06 ]: >>330　サンクス。
2007 XP機で試してみました。ちゃんと正常に動いたことから、
VISTA機でのみ正常に、動作していないことになります。
マルチスレッド計算のオプション外しもやってみましたが、変わり無しです。

なお、VISTA機ではmsgboxだけなら止まるのですが、msgboxの次にendがあったりすると
msgboxは流れています。
inputメソッドも止めることなく、流れていってます。
この症状は、Aマクロの中でも、Bマクロの中でも同様に起こっています。
332 名前：324 mailto:sage [2009/03/19(木) 10:55:03 ]: >>329
Callは書いても書かなくても一緒でした。
333 名前：デフォルトの名無しさん [2009/03/19(木) 11:23:15 ]: procedureの呼び方ですが、
「プロシージャ」と「プロシジャー」
どちらが一般的なのでしょうか。
334 名前：デフォルトの名無しさん [2009/03/19(木) 11:30:57 ]: プロシージャ
335 名前：デフォルトの名無しさん mailto:sage [2009/03/19(木) 13:07:50 ]: prэsi':dзэ(r)
336 名前：デフォルトの名無しさん [2009/03/19(木) 15:41:11 ]: 手続き
と日本語で解釈ｂ
337 名前：デフォルトの名無しさん mailto:sage [2009/03/19(木) 19:56:29 ]: >>331
msgboxは流れる　ってのがよくわからんが、msgboxでok押す前に次の行が実行されてるってことか？
簡単に試したがうちではそうならないし、現象が発生する最低限のコード晒して見たら
338 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 05:53:15 ]: 質問です。
userFormのTextBoxsに09と入れ、セルに入力すると9になります。
変数(string)代入しても、上手くいきません。
どうしたらいいでしょう？
対象セルの書式設定も文字列にしています。
339 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 06:53:59 ]: ' を頭に結合させてみてはいかがかな。

cells(1,1).value = "'" & textbox.value
のように。
340 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 07:27:25 ]: >>339
上手くいきました！
ありがとうございます！
341 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 09:30:53 ]: >>338
対象セルの表示形式が文字列になってれば、おれんとこじゃ09になるけど？
342 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 09:35:01 ]: >>324
あんたの質問内容ってこう見えるよ。何を答えろと・・・

今、車で走ってて道に迷いました。今まで普通に走ってきた道ですが・・・
どうしたらいいでしょう。よろしく。

出発点
　ルートA、ルートB、ルートC
到着点

ルートAに看板があるのですが、暗くて分かりません。

Q そもそもどこ走ってる？A 言えません
Q 地図ねーの？ A 今までの地図と違うみたいです
Q 誰か近くにいねーの？A 止まってくれません・・・
343 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 09:41:47 ]: コード晒す気がないみたいだから答えてほくないんだろ
もしくは荒らし
344 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 10:00:43 ]: やっぱりそうだよね。真剣に考えて損したよ。
一応、エスパースレいってみれば？ >>324
345 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 10:10:37 ]: >>338
文字列変換用関数というのもある。こっちの方が便利かと
string str = Format$(123, "00000")
346 名前：デフォルトの名無しさん [2009/03/20(金) 19:39:25 ]: これってどう？

Excel VBA アクションゲーム作成入門 Excel 2007/2003/2002 対応
ttp://www.amazon.co.jp/gp/product/4844326864/
347 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 22:59:07 ]: リアルタイム処理を考慮されてない言語で無理矢理ゲームを作るのは
趣味としてやるには面白いかもしれないけど実用性は低い
348 名前：デフォルトの名無しさん mailto:sage [2009/03/20(金) 23:59:25 ]: ミニゲーム系はFlashの独壇場。
Excelでやる必要性はない。
349 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 00:00:39 ]: はぁそうですか
350 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 00:40:17 ]: Excel VBAしか知らないから
俺には丁度いいかも
351 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 10:38:52 ]: VBAで出来ない事じゃないし、やってる人もいるけどさ・・・。
それはあくまで ”出来る” であって、向いてる訳じゃないのよ。

例えば、アクションゲームならばFPSって概念を持ってるFlash(ActionScript)で作った方がいいよね。
衝突判定の関数をVBAで組むならば、ASにはその物ズバリの関数が既にある訳。シェイプが接触したいるかどうかをbooleanで返す。
Flashはドローツールから派生してるんで、シェイプを扱う能力が超高い。現状だと最高峰。
MovieClipって形で、duplicate、attack、色んな複製をしつつ、それら全てにプログラムを組みこむ事も出来る。
リアルタイムで動くタイムラインを、全てのシェイプが保持出来る訳で、ゲームには凄く向いてる。

決してVBAがダメと言ってる訳じゃないよ。VBAが光る分野は別の所。
向き不向きがあるから、それに則る方が良いかも。と言う観点で。
352 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 10:42:15 ]: だいたいなんらかのプログラムが組めるなら別の言語なんて習得に１週間かかんねぇだろ
やらないで怖がってるだけの奴は馬鹿
なんでもかんでもＶＢＡでやろうとすんな
353 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 12:02:05 ]: Flash厨うぜえぞ
354 名前：デフォルトの名無しさん [2009/03/21(土) 13:18:32 ]: 「セルをドットに見立ててゲームをつくる」とかすごすぎw

なに？
>ワークシート上のセルを方眼紙のように正方形にしてどっとに見立てて、ワークシートを
>縮小して表示することで、グラフィックを表現する手法で、セルの１つ１つの背景色が
>そのままドットの色になります。
って
355 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 15:49:14 ]: attachですた。
356 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 15:59:42 ]: attach No.1・・・って、違うか？！
357 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 17:30:13 ]: オートシェイプをスプライトに見立てて作ったゲームってのも
あってもよさそうだが見たことがない。
みんなワークシートにドット絵を描きたがるのはなんでだろう。
358 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 17:54:34 ]: >>357
座標関係じゃね？セル位置のほうが初心者には直感的。
もしくは、オブジェのNewとか、オブジェクトの一意のID指定がメンドイとか。

個人的には、VBAで2Dゲームは初心者に向いてると思う。
描画の基礎は勉強できるでしょ。
359 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 18:06:52 ]: >>352
スレチだが言語によると思うぞ。俺はVC/JAVA屋でC#に四苦八苦。
さらにDirectXなんかは思想の理解にてこずるし。
まあ、言語というよりはフレームワークの問題だが・・・

あと、半月くらいVB系触らないと構文殆ど忘れるしｗ
360 名前：デフォルトの名無しさん mailto:sage [2009/03/21(土) 19:53:36 ]: >>354
アラン・ケイの本に、セルを使って棒グラフを表現する例が載っていたから、
画期的なアイデアと言うほどではないな。
361 名前：デフォルトの名無しさん mailto:sage [2009/03/22(日) 10:30:03 ]: すいません。次のことをしたいのですが、簡単だと思ったのですが、
出来なく困っています。

最初にB列の任意のセルを一つ選び、
その選んだB列のセルに、常にR24のセルをコピーし
貼り付けたいのですが、色々やりましたが出来ません。

例えば、
セルB28を選び、マクロを実行したらR24をコピーし同じくB28に貼り付ける。
セルB30を選び、マクロを実行したらR24をコピーし同じくB30に貼り付ける。
セルB77を選び、マクロを実行したらR24をコピーし同じくB77に貼り付ける。

たったこれだけのことですが、このマクロの部分が相対参照にしても出来ません。
識者の方宜しくお願い致します。
なお
EXCEL;ver2000
OS:win2000
VBA;多少使えます。

宜しくお願い致します。
362 名前：デフォルトの名無しさん mailto:sage [2009/03/22(日) 10:43:12 ]: ActiveCell = Range("R24")

> VBA;多少使えます。
それはないだろ…
363 名前：デフォルトの名無しさん mailto:sage [2009/03/22(日) 10:55:31 ]: lol
364 名前：デフォルトの名無しさん mailto:sage [2009/03/22(日) 10:58:01 ]: デフォルトプロパティを省くな
365 名前：デフォルトの名無しさん mailto:sage [2009/03/22(日) 10:58:10 ]: >>362
有難うございます。しかし調べ、いろいろ試し下記のコードを作成したのですが・・・

ActiveCell = Range("R24").Copy
ActiveCell.Offset(30, -2).Range("A1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
End Sub

↑出来ませんでした。R24だと手間が掛かってしまうと思うので、

任意のB列のセルにセルA1の値をコピーし貼り付ける。

という例で結構ですからコードをお願いできないでしょうか？

例えば、

セルB5を選び、マクロを実行したらA1をコピーし同じくB5に貼り付ける。

たったこれだけで良いです。宜しくお願い致します。
366 名前：デフォルトの名無しさん mailto:sage [2009/03/22(日) 11:45:26 ]: cell(2,5).value = cell(1,1).value
cell(2,5).interior.colorindex = RGB(255,255,255)
こんな感じだった気がする
367 名前：デフォルトの名無しさん mailto:sage [2009/03/22(日) 12:16:38 ]: >>366
cell → cells
colorindex → color

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef