Excel VBA質問箱 IV

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

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


40042 / 76732 ←次へ | 前へ→

【41794】VBAで商品マスターから入力
質問  kazuo  - 06/8/23(水) 2:08 -

引用なし
パスワード
   VBAの大先輩の皆さん よろしくお願いします。
sheet5に"商品マスター"を作成し、sheet3の"内訳明細"の
A列とB列の2つの条件が一致したら
C列とE列に呼称・単価を記入したいのです。
VLOOKUP関数ならだいたい出来るのですが
どうしても商品名が3千〜4千ありますので、VBAで作成したいのですが

sheet3内訳明細側
  A   B   C   D   E
2 品名 形状  呼称    単価入力
3 ○○ ▲▲  m      550
4 ○○ ■■  個      800
  ・
  ・

sheet5商品マスター側
  A   B     C      D      E      F
2 品名 形状     呼称   単価一般   同業単価   特別価格
3 ○○ ▲▲     m    550      450       350
4 ○○ ××     個    220      200       180
5 ○○ ■■     個    800      700       600
   ・
   3000〜4000行あります
   ・

上記表のsheet5で解るように3種類(D列・E列・F列)の単価設定の必要があります。
よって
1.最初にinputboxで単価設定(1.一般チャンネル・2.同業チャンネル・
 3.特別チャンネル)を実行したい。または(ファームのボタン選択可能にしたい)
 2通り出来れば最高です
 そのときに現在のチャンネルをsheet3"内訳明細"の"L1"に表示。
2.その後sheet3"内訳明細"の入力を開始。
3.[#41557]のcase3の条件を満たしたい。
   Case 3
    If .Value = "式" Then
     Application.EnableEvents = False
     .Offset(, 1).Value = 1
     .Offset(0, 2).Select
     Application.EnableEvents = True
    End If
4.[#41638]下記です。
  'C列に値が入ったかどうかのチェック
  With Cells(Target.Row, 3)
   If .Value <> "" Then
    .Offset(, 1).Activate
   Else
    .Activate
   End If
  End With
条件が多くてすみません。
以上です、検討の程よろしくお願いします。

1 hits

【41794】VBAで商品マスターから入力 kazuo 06/8/23(水) 2:08 質問
【41795】Re:VBAで商品マスターから入力 かみちゃん 06/8/23(水) 7:24 発言
【41805】Re:VBAで商品マスターから入力 色々な方 06/8/23(水) 11:20 発言
【41806】Re:VBAで商品マスターから入力 kazuo 06/8/23(水) 11:42 発言
【41810】Re:VBAで商品マスターから入力 かみちゃん 06/8/23(水) 14:45 回答
【41813】Re:VBAで商品マスターから入力 kazuo 06/8/23(水) 16:08 質問
【41817】Re:VBAで商品マスターから入力 かみちゃん 06/8/23(水) 17:33 回答
【41825】Re:VBAで商品マスターから入力 kazuo 06/8/23(水) 19:41 質問
【41827】Re:VBAで商品マスターから入力 かみちゃん 06/8/23(水) 20:21 回答
【41841】Re:VBAで商品マスターから入力 kazuo 06/8/23(水) 23:34 発言
【41842】Re:VBAで商品マスターから入力 かみちゃん 06/8/23(水) 23:52 回答
【41843】Re:VBAで商品マスターから入力 kazuo 06/8/23(水) 23:59 発言
【41844】Re:VBAで商品マスターから入力 かみちゃん 06/8/24(木) 0:05 発言
【41845】Re:VBAで商品マスターから入力 kazuo 06/8/24(木) 0:09 発言
【41846】Re:VBAで商品マスターから入力 kazuo 06/8/24(木) 0:14 発言
【41847】Re:VBAで商品マスターから入力 かみちゃん 06/8/24(木) 0:17 発言
【41857】Re:VBAで商品マスターから入力 kazuo 06/8/24(木) 12:26 お礼

40042 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free