- ベストアンサー
Excel初心者向けの使い方と注意点
tom04の回答
- tom04
- ベストアンサー率49% (2537/5117)
こんばんは！ VBAでの一例です。 ↓の画像のように1行目はタイトル行で、データは2行目以降に入力するとします。 画面左下の操作したいSheet見出し上で右クリック → コードの表示 → VBE画面が出ますので ↓のコードをコピー＆ペーストしてデータを入力してみてください。 Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range(Columns(2), Columns(3))) Is Nothing Or _ Selection.Count <> 1 Then Exit Sub Dim i, j, k As Long Application.ScreenUpdating = False For j = 2 To Cells(Rows.Count, 2).End(xlUp).Row If WorksheetFunction.CountA(Range(Cells(j, 2), Cells(j, 3))) = 2 Then Cells(j, 4) = Cells(j, 2) & "_" & Cells(j, 3) End If Next j i = Target.Row If Cells(i, 1) > 1 Then k = i - Cells(i, 1) + 1 Else k = i End If If WorksheetFunction.CountIf(Range(Cells(k, 4), Cells(i, 4)), _ Cells(i, 2) & "_" & Cells(i, 3)) > 1 Then MsgBox "すでに入力済みです。" Target = "" Target.Select End If Application.ScreenUpdating = True End Sub 'この行まで ※ D列を作業用の列として使用していますので、D列にはデータがないという前提です。 ※ D列が目障りであれば「非表示」にしておいてください。 ※ メッセージ表示後、もう一度入力セルを空白・選択するようにしています。 （すなわち、重複データは入力できません） ※ 入力 → 確定 の時点でマクロが走りますので、すでにデータが入っている場合はメッセージは表示されません。 ご希望の方法でなかったらごめんなさいね。m(_ _)m
関連するQ&A
- Excel2000で表を作っていますが、うまくできません
Excel2000で表を作っていますが、うまくできません（T_T） セルA1+B1=C1 C1+A2+B2=C2 C2+A3+B3=C3.... のようなC列に合計欄がある表を作っています。(元帳のような物です) (A列、B列の欄には必ずしも全て数字が入る訳ではありません。) しかし、セルA列とセルB列に数字を入力していない場合、C列に全て「0」が 表示されてしまいます。 数字入力後は、全て下まで残高が入ってしまいます。 セルA列,B列に最後に数字を入れた行まで、Cに数字が入るようにしたいのですが、 できないでしょうか? (30行まで表を作って20行まで数字を入れたとき、21行から30行に残高も入らないように したいのです。) 何だかうまく説明できませんが、是非教えていただけますでしょうか。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- EXCEL教えてください
EXCEL初心者です もしわかりましたら教えてください A列には1から連続する数字がはいっています ただし任意で途中で1からまた始ります B列には任意の数字がはいっています C列にA列の1から連続した数字までの合計を自動で算出させるようにしたいです C列にはどのような関数を入れたらよいでしょうか？ A B C 1 300 1200 2 400 3 500 1 100 500 2 100 3 300 1 200 1300 2 400 3 600 4 100 説明がわかりずらかったらすみません 補足しますのでその旨記載お願いします
- ベストアンサー
- オフィス系ソフト
- Excel関数、VBA
A列に数字を入力するとB列に合計が出るようにしたい。 但し、条件があります。 数字の入力範囲はA1からA20まで。 B列の合計はA列の数字が連続した部分の最後に表示。 例 A列 B列 10 10 10 30 20 20 10 30 40 上記のように数字の入力は1行だけの時もあり、5行の時もあるので次の空欄までの合計をB列に表示したい。 VBでも関数でも構いませんので、どなたか詳しい方教えて下さい。
- ベストアンサー
- Visual Basic
- Excel関数
Eccel2003を使用して以下のような入力作業を行っております。 A列～C列のセルに「1～10」いずれかの数字を入力して行きます。 入力パターンは (1)A列だけ入力 (2)A列とB列に入力 (3)A列～C列全てのセルに入力 の3パターンです。 複数の列に数字を入力する場合((2)及び(3))、同じ数字を入力することはありません。 【例】 A B C D 1 5 4 1 2 6 3 1 2 4 2 4 5 ・ ・ ・ このとき、A～C列に一つでも該当の数字（ここでは2と4と5）が入力されていた場合に、 ある文言（30文字くらい）をD列に反映させたいのですが、何か良い関数等ありますでしょうか？ ※ 上記例の場合、1,3,4行目のD列に文言を反映 例の4行目のように全ての列に該当の数字を入力することもあります。 ご教示頂きたく何卒宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- Ｅｘｃｅｌ関数について（初級者）
例えば以下の表データがあり、 Ａ Ｂ １ 数字 記号 ←タイトル行 ２ １ ａ ３ ２ ｂ ４ ３ ｃ Ａ行のある数字を入力するとＢ行の同じ列の記号を表示させるのは（入力欄をＣ２、結果表示セルをＤ２として） Ｄ２に VLOOKUP(C2,A2:B4,2) でうまくいきました。つまり２を入力するとｂという答えです。 でも逆にＢ行のある文字を入力するとＡ行の同じ列の数字を表示させるのに（入力欄をＣ３、結果表示セルをＤ３として） Ｄ３に VLOOKUP(C3,A2:B4,1) つまりｃと入力すると３の答え でやってみたが＃Ｎ／Ａのエラーがでてうまくいきません。 間違った点のアドバイスをお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel関数
Eccel2003を使用して以下のような入力作業を行っております。 A列～C列のセルに「1～10」いずれかの数字を入力して行きます。 入力パターンは (1)A列だけ入力 (2)A列とB列に入力 (3)A列～C列全てのセルに入力 の3パターンです。 複数の列に数字を入力する場合((2)及び(3))、同じ数字を入力することはありません。 【例】 A B C D 1 5 4 1 2 6 3 1 2 4 9 1 3 ・ ・ ・ このとき、A～C列に一つでも奇数が入力されていた場合に、 ある文言をD列に反映させたいのですが、何か良い関数等ありますでしょうか？ ※ 上記例の場合、1,3,4行目のD列に文言を反映 例の4行目のように全ての列に奇数を入力することもあります。 ご教示頂きたく何卒宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- EXCEL2007
Win7EXCEL2007を使っております。3列3行とします。A1に100、B1には3、C1には、A1×B1にするため、=A1*B1と入力しました。C1には300と入ります。下の行も同様にするため、C1を下にドラッグしましたら、ゼロが並びました。質問は、ゼロを表示しない方法は有りますか？-が出る場合も有りますが、無表示が希望です。スッキリしますので。（実際は50行位有りますから）宜しくお願いします。
- ベストアンサー
- その他（インターネット・Webサービス）
- エクセルで一致するをセルを参照して入力したい
お世話になります。 わかりにくいタイトルで申し訳ないのですが以下の場合について教えてください。 Ａ列に1,2,3,4,5・・・というように重複しない数字が入っています。 Ｃ列にも1,3,4・・・など重複しない数字が入っています。（１と３の間に空白セルはない） Ｄ列には任意の文字が入っています。 Ｃ列の数字と同じ数字は必ずＡ列には存在します。（逆にＡ列の数字がすべてＣ列にあるわけではない） ここであいているＢ列にその左のＡ列と同じ数字をＣ列から探し、その右側のＤ列の文字を入力したいのです。 （Ａ列と同じ数字がＣ列にない場合は空白にする。） 例 A1:1 Ｃ列で「1」が入っているセルがC1、D1:みかん の場合 B1:みかん とする A2:2 Ｃ列に2がない場合 B2:空白 A3:3 Ｃ列で「3」が入っているセルがC2、D2:りんご の場合 B3:りんご とする この場合Ｂ列にはどのような計算式を入れておけばよいのでしょうか。 よろしくお願いします。 Excel2002です。
- ベストアンサー
- オフィス系ソフト
- （Excel VBA）またまた困っています・・・ o...rz
どうもrozzerです。 またもや高くそびえ立つVBの壁に激突して死にかけてしまっています・・・orz 今度は単純なマクロだと高を括っていたので鼻歌交じりでマクロを組んでいたのですが どうも如何せん上手くいきません！ もう死にたいです！ 現在エクセルで、とある業務で使うデータベースをマクロを組み最適化を図っています。 まず A列の2行目から任意の行に（10行までしかなかったり、1000行まであったりとランダムにあるとする）、任意の整数値があるとします。 その値の合計を、セル【B1】に表示させたいのです。 ですが、ここで問題なのですがセル【B1】に入力される式はSUM等の関数式ではなく、ただの「数値」として表示させたいのです。 つまりA列の2行目から任意の行（最終行まで）に入力されている整数値に、後々、変更があった場合に【B1】に表示されている値が、一番初めに合計の値をはじき出した値から変化しない様にしたいのです。 そして今度はセル【C1】に、A列の2行目から任意の行（最終行）までの合計値を「SUBTOTAL」関数[=subtotal(9,C1:**)]を入力したいのです。 ここまでの動作をマクロ化したいのですが、どうも如何せんどうも如何せん上手くいきません！ もう死にたいです！ 何卒、ご教授頂けましたら幸いで御座います。
- ベストアンサー
- Visual Basic