Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

45199 / 76732

←次へ　｜　前へ→


	【36535】Re:初心者なのでおしえてください

白い鳩 - 06/4/2(日) 18:55 -


	引用なし

	パスワード

▼komoro さん：

初心者だからコード全てを教えてもらおうってわけじゃないんですね？
もし自分でコードの内容を理解しようとか、VBAをもっと理解しようって意識があるなら、自分で調べてみましょう。

まず、Sheets("Sheet1").Range("I2") = Sheets("Sheet2").Cells(AA, 2)
これは、Sheets("Sheet1").Range("I2")にSheets("Sheet2").Cells(AA, 2)を入れる意味です。

金額がゼロ表示されるのであれば、Sheets("Sheet2").Cells(AA, 2)の値が０ってことです。
もしくは、ちゃんとした値が入った後、別のコードで０って上書きされてるか。
MsgboxなどでSheets("Sheet2").Cells(AA, 2)の値を確認してから代入してあげればいいかと思います。
自分の思ったとおりの動作を確認してからMsgboxなどは全部コード内から消してあげればいいと思います。

最初から全部のコードを作るなんてベテランの人もやってないとおもいます。
Msgboxとかいろいろな方法で確認をとりながらコードを作成しています。
確認が取れた時点で、MsgboxとかDebug.Printとか確認の部分を削除してコードが完成します。

3 hits

▼

【36480】初心者なのでおしえてください komoro 06/4/1(土) 12:08