Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3601 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【61225】結合されたCellにコピー ｐｐ 09/4/17(金) 12:27 質問[未読]
【61227】Re:結合されたCellにコピー つん 09/4/17(金) 14:43 発言[未読]
【61229】Re:結合されたCellにコピー ｐｐ 09/4/17(金) 15:15 お礼[未読]
【61225】結合されたCellにコピー
質問  ｐｐ  - 09/4/17(金) 12:27 -
引用なし
パスワード
   はじめまして

2003　XP
結合されたCellに値(数字）を入れています。

"A10:A11,A18:A19,A27:A28,A35:A36,A43:A44,A52:A53,A60:A61,A68:A69,A77:A78,A85:A86,A93:A94"の各セルに


　　12,345　→　小合計 ￥12,345-　
　　　　　　　　　↑
このように表示したいのですが
始めたばかりなので、どのようにしていいか、よくわかりません。

　　宜しくお願い致します。

Option Explicit
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
　 Application.EnableEvents = False
　　　　ActiveSheet.Range("A10:A11,A18:A19,A27:A28,A35:A36,A43:A44,A52:A53,A60:A61,A68:A69,A77:A78,A85:A86,A93:A94").Value _
　　　　= Range("A2:A3").Value
　 Application.EnableEvents = True
End Sub
【61227】Re:結合されたCellにコピー
発言  つん  - 09/4/17(金) 14:43 -
引用なし
パスワード
   はじめまして、こんにちは＾＾

えと、回答じゃないですが・・・

この質問では、イマイチ不明瞭な部分が多くて、
おそらく回答がつきにくいと思います。
（私の読解力の乏しさもあるんやろけど）

まず、


>結合されたCellに値(数字）を入れています。
数字が入ってるちうことですが、

>　　12,345　→　小合計 ￥12,345-

ということだけど、
「小合計」ってことは、計算式が入ってるんですか？
一つのセルに「小合計 ￥12,345-」これだけ入力するようにするの？
したら、「数値」じゃなくなるけど、そんでいいんですか？

>ActiveSheet.Range("A10:A11,A18:A19,A27:A28,A35:A36,A43:A44,A52:A53,A60:A61,A68:A69,A77:A78,A85:A86,A93:A94").Value _
>　　　　= Range("A2:A3").Value


これをみると、（A10:A11…これで一つの結合されたセルだと思うけど）、結合された指定されたセルに、「A2:A3」の値を等しく入れるつもりみたいやけど？？？

元はどういうデータ（数字？数式？）が入力されているか？
コピーする「A2:A3」はどうなってんのか？

などなど、もう少し詳しく書かれたらええんじゃないかと思います。
そしたら、誰か達人の方がレスいれてくれるでしょ〜。多分＾＾；

で、なんで「SheetChange」なん？


マクロ使うならセルの結合は御法度！とか突っ込まれそうな気もする・・・・
【61229】Re:結合されたCellにコピー
お礼  ｐｐ  - 09/4/17(金) 15:15 -
引用なし
パスワード
   説明不足で申し訳ありません。
もう1度、整理して、再度質問し直します。
つんさん　有り難うございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3601 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free